<% 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 %>