我无法 PONG 将 PING 回传给 IRC,它会发回“您必须先注册”错误,这是我正在使用的代码:
Private Sub wsConnect_DataArrival(ByVal bytesTotal As Long)
Dim strData As String
wsConnect.GetData strData
If InStr(strData, "PING") <> 0 Then
MsgBox ("Success!") 'Check it's receiving it.
wsConnect.SendData Replace(strData, "PING", "PONG") & vbCrLf
End If
Me.txtDataIn.Text = Me.txtDataIn.Text & strData
End Sub
有什么帮助吗?