如果判断客户端和服务器能正常连接？

Question

winsock吗？
winsock1.state=7
这时连接成功
可以加在
state_changed事件中！

Answer 1

Private Sub Timer1_Timer()
'告诉server一个文件传输完毕
If Client.State <> 7 Then
    cmdSure.Enabled = True
    cmdSendFile.Enabled = False
    cmdSendDir.Enabled = False
    sysMsg.Caption = "断开了与服务器的连接,再次连接"
    If blnConnect Then '断开
        MsgBox "服务器的连接断开"
        blnConnect = False
    End If
    blnConnected = False
End If
End Sub在timer里，每隔一段时间就判断（如果需要的话）
Constant Value Description 
sckClosed 0 Closed (default) 
sckOpen 1 Open 
sckListening 2 Listening 
sckConnected 7 Connected 
sckError 9 Error 

Answer 2

要实现的功能就是：我在客户端上装了应用程序，而应用服务器去不在客户端上。我想知道这台机子是否能正确连接到服务器上，因为我要用到服务器上的COM+组件！

Answer 3

是啊，我用CreateObject的方法创建组件，要知道当前客户端是否已经正确连接到服务器了！如果没有连接，我就不创建，并提示网络出问题了！还有就是在用的过程中，如果网络断掉我也要知道，要不会死机！