主题:自学Winsock控件问题
这2天看到这个控件,我们教科书里提都没提过的(好烂的书)
但因为想写联网小游戏,想从这个开始学一下
本人对网络知识可以说没有认知,就是前几天在家里连接成功了个小局域网,开始手痒了
正题
我现在写的程序目标是能够在2台机器中建立连接,可是老是出错
以下是我 的代码,大家看一下(所有时钟控件的那个属性都是500刷新一次)
'************************
'接受请求端程序
'*************************
Private Sub Command1_Click()
Winsock1.Listen
End Sub
Private Sub Command3_Click()
Winsock1.Close
End Sub
Private Sub Timer1_Timer()
Label2.Caption = Winsock1.State
End Sub
Private Sub Winsock1_ConnectionRequest(ByVal requestID As Long)
Winsock1.Accept (requestID)
End Sub
'***********************
'发送连接请求端的程序
'**********************
Private Sub Command1_Click()
Winsock1.RemoteHost = "JUJUMAO1" '问题1
Winsock1.RemotePort = 1011 '问题2
Winsock1.Connect
End Sub
Private Sub Command2_Click()
Winsock1.Close
End Sub
Private Sub Timer1_Timer()
Label1.Caption = Winsock1.State
End Sub
Private Sub Winsock1_Connect()
MsgBox ("lianjiechenggong")
End Sub
我2边同时运行后发送请求这里的STATE开始为4,后来就变9了,出错了
现在我有2个问题
问题1:
Winsock1.RemoteHost 这个属性是指要连接的机器的计算机名吗
问题2:
Winsock1.RemotePort这个属性的端口是什么意思,我是看到一个例子,那个例子里的这个属性用的是1011,正确的应该怎么填
但因为想写联网小游戏,想从这个开始学一下
本人对网络知识可以说没有认知,就是前几天在家里连接成功了个小局域网,开始手痒了
正题
我现在写的程序目标是能够在2台机器中建立连接,可是老是出错
以下是我 的代码,大家看一下(所有时钟控件的那个属性都是500刷新一次)
'************************
'接受请求端程序
'*************************
Private Sub Command1_Click()
Winsock1.Listen
End Sub
Private Sub Command3_Click()
Winsock1.Close
End Sub
Private Sub Timer1_Timer()
Label2.Caption = Winsock1.State
End Sub
Private Sub Winsock1_ConnectionRequest(ByVal requestID As Long)
Winsock1.Accept (requestID)
End Sub
'***********************
'发送连接请求端的程序
'**********************
Private Sub Command1_Click()
Winsock1.RemoteHost = "JUJUMAO1" '问题1
Winsock1.RemotePort = 1011 '问题2
Winsock1.Connect
End Sub
Private Sub Command2_Click()
Winsock1.Close
End Sub
Private Sub Timer1_Timer()
Label1.Caption = Winsock1.State
End Sub
Private Sub Winsock1_Connect()
MsgBox ("lianjiechenggong")
End Sub
我2边同时运行后发送请求这里的STATE开始为4,后来就变9了,出错了
现在我有2个问题
问题1:
Winsock1.RemoteHost 这个属性是指要连接的机器的计算机名吗
问题2:
Winsock1.RemotePort这个属性的端口是什么意思,我是看到一个例子,那个例子里的这个属性用的是1011,正确的应该怎么填