我用一个简单的客户端程序做了下测试,在局域网内数据能正常发送到局域网内的服务器
但现在要连接到外网服务器,(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