Question

我正在尝试从> NET Windows服务器使用套接字IO。相同的代码可以从Windows窗体完美地工作。

声明：

Public socketIO As Quobject.SocketIoClientDotNet.Client.Socket

代码：

 Try
        Dim O As New IO.Options
        O.AutoConnect = True
        O.IgnoreServerCertificateValidation = True
        socketIO = IO.Socket("http://XXXXXX:8000", O)
        'socket = IO.Socket(Socket_Server & ":" & Socket_Server_Port, O)
        socketIO.On(socketIO.EVENT_CONNECT, Sub()
                                                socketIO.Emit("unique", MemCPUID)
                                            End Sub)
        socketIO.On(socketIO.EVENT_RECONNECT, Sub(data)

                                              End Sub)
        socketIO.On(socketIO.EVENT_MESSAGE, Sub(data)

                                            End Sub)
        socketIO.On(socketIO.EVENT_ERROR, Sub(data)

                                          End Sub)

        socketIO.On(socketIO.EVENT_CONNECT_ERROR, Sub(data)

                                                  End Sub)
        socketIO.On("CON", Sub(data As String)
                               Sresp(data)
                           End Sub)
    Catch ex As exception
    End Try

捕获未命中且连接scoketIO = False 而且事件永远不会触发。

从Windows窗体运行的完全相同的代码可以完美运行。已经尝试禁用防火墙。有什么想法吗？

Answer 1

问题出在我使用的DLL版本错误。现在一切正常。

套接字IO 2.0无法从VB.NET Windows服务连接

1 个答案: