Когда я запускаю приведенный ниже код в 32-битном сервере Windows 2008, поток программы переходит к sckTest_Error() при вызове connect().Различное поведение при подключении к порту 0 в Windows 2008 32/64 бит
Но когда я запускаю тот же код в Windows 2008 64 разрядный сервер, RTE происходит и выполнение программы переходит к ошибке:
Private Sub Form_Load()
On Error GoTo error1
If (Not (Me.sckTest.State = sckConnected)) Then
'
'Log event for outbound client mode connectoin
If Me.sckTest.State <> sckClosed Then
Me.sckTest.Close
End If
'
MsgBox "Going to connect"
Me.sckTest.Connect "127.0.0.1", 0
MsgBox "Connecting"
If Me.sckTest.State = sckConnected Then
MsgBox "Connected"
End If
'
End If
Exit Sub
error1:
MsgBox "RTE " & Err.Number
End Sub
Private Sub sckTest_Error(ByVal Number As Integer,
Description As String,
ByVal Scode As Long,
ByVal Source As String,
ByVal HelpFile As String,
ByVal HelpContext As Long,
CancelDisplay As Boolean)
MsgBox "Error in connecting" & Number
End Sub
Но я получаю сообщение об ошибке, как 10049 в обоих серверах. Может ли кто-нибудь проконсультироваться с проблемой моего поведения кода или сервера.
Благодаря
Почему вы пытаетесь подключиться к нулевому порту? – EJP