%
set MsgSender = Server.CreateObject("RealICQCOMInterfaces.CustomMessageSender")
MsgSender.Send "172.28.1.35", 10000, "用户名", "消息内容", 1
' 参数:
' 1、服务器地址
' 2、服务器端口
' 3、接收消息的用户名
' 4、消息内容,格式现暂时约定如下:
'
' EMAIL[换行]
' 消息类别[换行]
' 消息内容[换行]
'
' 以上的“消息类别”可选以下值:
' 0:未读邮件通知,
' 此时“消息内容”的值为未读邮件的数量(数字);
' IM客户端会将未读邮件数量显示在主界面上(每当未读邮件数量有变化时,均应发送此类消息);
' 1: 收到一封新邮件,
' 此时“消息内容”的值为邮件的发送方信息、查看此邮件的URL地址(格式为:xxxxxx@ccc.com)
' IM客户端提示以下文字“您从 xxxxxx@ccc.com 处收到一封新邮件”);
'
'
' 5、消息处理方式
' 0:在线就直接发给用户,否则存到数据库,等用户上线时再发给对方
' 1:在线就发给用户,否则忽略此消息
' 2: 用户如果在线,忽略此消息,但如果不在线,则存至数据库,下次上线时发给对方。
'
'
' 返回值
' MsgSender.Result = 0 用户不在线,存入了离线消息数据库,用户将在下次登录时收到此消息
' MsgSender.Result = 1 用户在线,消息已直接发给了用户
' MsgSender.Result = 2 用户在线,所以消息被忽略
Set MsgSender = nothing
%>