我用一个简单的客户端程序做了下测试,在局域网内数据能正常发送到局域网内的服务器
但现在要连接到外网服务器,(IP是固定IP,端口号也已开发)发送数据就提示'40006'错误-所需事物或请求的错误协议或连接状态
用State属性查看WinSock控件当前的状态 值一直是6(正在连接)Private Sub Form_Load()
SockCl.RemoteHost = 服务器固定IP
SockCl.RemotePort = 服务器开发的端口
SockCl.Connect
End SubPrivate Sub Form_Unload(Cancel As Integer)
SockCl.Close
End SubPrivate Sub SockCl_DataArrival(ByVal bytesTotal As Long)
Dim Su As String
SockCl.GetData Su
Text1.Text = Su
End SubPrivate Sub Command1_Click()
SockCl.SendData Text2.Text
End Sub
但现在要连接到外网服务器,(IP是固定IP,端口号也已开发)发送数据就提示'40006'错误-所需事物或请求的错误协议或连接状态
用State属性查看WinSock控件当前的状态 值一直是6(正在连接)Private Sub Form_Load()
SockCl.RemoteHost = 服务器固定IP
SockCl.RemotePort = 服务器开发的端口
SockCl.Connect
End SubPrivate Sub Form_Unload(Cancel As Integer)
SockCl.Close
End SubPrivate Sub SockCl_DataArrival(ByVal bytesTotal As Long)
Dim Su As String
SockCl.GetData Su
Text1.Text = Su
End SubPrivate Sub Command1_Click()
SockCl.SendData Text2.Text
End Sub
你可以在命令行使用telnet ip port测试一下。