VB6 Winsock错误无效参数10014
Private Sub Form_Load()
Winsock1.RemotePort = 22222
Winsock1.Protocol = sckUDPProtocol
End Sub
Private Sub Command1_Click()
Command1.Enabled = False
Dim sendBuff As String
sendBuff = "XXXXX"
Label1:
On Error GoTo Label2
Winsock1.RemoteHost = "andon-eds-1"
Winsock1.SendData sendBuff
Label2:
Winsock1.Close
Winsock1.Protocol = sckUDPProtocol
Winsock1.RemotePort = 22222
Winsock1.LocalPort = 0
Label3:
On Error GoTo EndOfSub
Winsock1.RemoteHost = "andon-eds-1"
Winsock1.SendData sendBuff
EndOfSub:
Command1.Enabled = True
End Sub
Private Sub Command2_Click()
Command2.Enabled = False
On Error GoTo EndOfSub
Winsock1.RemoteHost = "andon-eds-1"
Winsock1.SendData "XXXXX"
EndOfSub:
Command2.Enabled = True
End Sub
Private Sub Command3_Click()
On Error Resume Next
Command3.Enabled = False
Dim sendBuff As String
sendBuff = "XXXXX"
PrintWinsockProperty
Winsock1.RemoteHost = "andon-eds-1"
Winsock1.SendData sendBuff
PrintWinsockProperty
Winsock1.Close
Winsock1.Protocol = sckUDPProtocol
Winsock1.RemotePort = 22222
Winsock1.LocalPort = 0
PrintWinsockProperty
Winsock1.RemoteHost = "andon-eds-1"
Winsock1.SendData sendBuff
PrintWinsockProperty
Command3.Enabled = True
End Sub“主机名”“andon-eds 1”不在网上，我希望我的应用程序可以继续运行。
- 当我单击Command1时，发现一个错误无效的参数: 10014 在>>Winsock1.SendData sendBuff <<，在Label3下面，我的应用程序不能继续
- 当我单击Command2 2次时，它可以在不关闭应用程序的情况下继续
- 当我单击Command3时，它可以继续，而无需关闭应用程序。 我的问题是1之间的区别是什么？)第二条)？和 对于我的问题，“恢复错误”和“错误GoTo”之间有什么区别？
(**我对我的英语能力感到抱歉)
谢谢
私有子Command6_Click() Dim i作为整数命令6. Resume = False On Error GoTo BeginLoop Winsock1.RemoteHost = "Andon-eds-1“Winsock1.SendData "XXXXX”BeginLoop:恢复Next For i=0到2 Winsock1.RemoteHost = "Andon-eds-“&I Winsock1.SendData "XXXXX”Debug.Print Err.Number '0 '0 '0‘0’0下一个在错误GoTo TestLabel上I= 100 /0Command6. End = True Exit Sub TestLabel: End
回答 2
Stack Overflow用户
发布于 2011-09-28 20:19:23
我不知道你在用代码做什么，所以我不能回答你的全部问题，但我可以回答你问题的这一部分：
下一个错误恢复和错误GoTo之间有什么区别？
如果发生错误，“继续下一步”将导致执行继续到下一行代码。对于“On Error GoTo”，这将使您的代码指向在“On”后面的代码部分中在GoTo之后指定的标签。
Stack Overflow用户
发布于 2011-09-29 10:44:34
错误10014 (WSAEFAULT)是不好的地址
系统在试图使用调用的指针参数时检测到无效的指针地址。如果应用程序传递无效的指针值，或者缓冲区的长度太小，则会发生此错误。例如，如果一个参数的长度(它是一个sockaddr结构)小于sizeof of (Sockaddr)。
检查机器"andon-eds-1"是否可用
https://stackoverflow.com/questions/7565720
复制相似问题
腾讯云开发者
