永发信息网

在网吧用VB的Winsock控件,RemoteHost属性的IP地址应该写什么?

答案:1  悬赏:20  手机版
解决时间 2021-05-19 02:00
  • 提问者网友:低吟詩仙的傷
  • 2021-05-18 10:59

我是一个VB初学者,我自己没有电脑,所以只有在网吧上机学习。我在用Winsock这个控件的时候,其中的RemoteHost属性,也就是要远程连接的机算机的名称,我试着写了很多都不能成功的连接,我这里详细说一下,希望大家帮我看一下我错在哪里:

我先建了两个工程,一个是服务器,一个是客户端,我想要达到的目的是:在客户端的文本框中输入文字,单击command1的时候,winsock与服务器连接,单击command2的时候发送文本框中的文字到服务器,然后服务器接收到客户端的数据后,把接收到的文字信息用print方法显示出来。具体代码如下:

服务器代码:

Private Sub form_load()
Winsock1.LocalPort = 1001
Winsock1.Listen
End Sub

Private Sub winsock1_connectionrequest(ByVal requestID As Long)
Winsock1.Close
Winsock1.Accept requestID
End Sub

Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long)
Dim a As String
Winsock1.GetData a, vbString
Print a
End Sub

客户端代码:

Private Sub command1_click()
Winsock1.RemoteHost = "就是这里不知道写什么???????????"
Winsock1.RemotePort = 1001
Winsock1.Connect

Command1.Enabled = False
End Sub

Private Sub Command2_Click()
Winsock1.SendData Text1.Text
End Sub
其中客户端代码中winsock1的RemoteHost属性我不知道从哪里找,我把服务器和客户端都在一台机器上运行,然后在‘我的电脑’上单击右键,查看属性中的计算机名,里面的计算机名是:038. 我在RemoteHost属性后面写了这个,但是程序运行后服务器端窗体上没有显示客户端输入的文本,然后我在控制面板里找到网络连接里查看IP,在IP后面还有4,5种类似于IP的东西,依次是:IP地址 子网掩码 默认网关 DNS服务器 WINS服务器 这几种后面都是类似IP的数字串,我在RemoteHost属性后面输入了第一个,就是IP地址,这个好像是局域网的IP,但我想是在一台机器上的,应该是IP就行了,但拿入代码后,还是一样没有反应,我还试过进入 http://www.whatchina.com/html/sip.asp这个网站查IP,进这个网站查到的IP,和我之前在控制面板的网络里看到的IP又不一样了,但我把这个IP写进代码,一样还是没有反应,到底是我代码有错,还是IP有错?我真的烦死了,希望哪位高手指点一二啊,真是万分感谢了!

最佳答案
  • 五星知识达人网友:往事埋风中
  • 2021-05-18 12:04

Winsock1..RemoteHost = "127.0.0.1"


填写对方的IP

我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
点此我要举报以上问答信息
大家都在看
推荐资讯