modwskclient.bas

计算机网络与通信的知识

Attribute VB_Name = "modWskClient"
'===========================
' 客户端通讯错误
'===========================
Public Sub wskClientErr()
MsgBox "通讯错误！可能的原因如下：" + vbCrLf + _
       "    (1) 本机到ICQ服务器的通讯线路故障！" + vbCrLf + _
       "    (2) ICQ服务器关闭 或 出现故障！" + vbCrLf + _
       "    (3) 本用户(用户号：" + strLoginAccount + ")登录后，在服务器端被强行删除！" + vbCrLf + _
       "请检查本机到服务器的通讯线路，并退出系统重新登录！", 16, "ICQ客户"
End Sub