PB中使用AM消息集成组件进行消息发送

来源:百度文库 编辑:神马文学网 时间:2024/05/03 10:38:41
PB中使用AM消息集成组件进行消息发送
    我下载使用了Active Messenger(简称AM),并在Jbuilder中,利用AM附带的java例子,很容易的完成了Java程序中AM消息集成组件发送的工作。    在PB中实现集成过程中,AM提供COM组件,消息发送部分可以通过消息组件来完成。但是还有部分功能是由Powerbuilder程序实现的。现在把方法摘录如下:OLEObject oleIM
long ll_status
oleIM = CREATE OLEObject
ll_status = oleIM.ConnectToNewObject("ASIM.IM")
IF ll_status < 0 THEN
   Messagebox("","err")
ELSE
   oleIM.port = 5001
   oleIM.init("192.168.0.118", "jzx", "123")  //设置服务器地址,发送的用户名jzx及密码
   oleIM.SendMsg("test","boddy","hdm",0)         //发送测试消息到用户hdm
  //
  oleIM.DisconnectObject( )
END IF
DESTROY oleIM