vb如何向别的计算机发送文件夹,如何使用vb.net将消息从一台计算机发送到另一台计算机?...

使用TcpClient和相关的库绝对是正确的答案。用于将数据写入

示例代码到一个特定的IP /端口:

'''

''' Send data over TCP/IP network

'''

''' Data string to write

''' The connected destination TcpClient

Public Sub WriteData(ByVal data As String, ByRef IP As String)

Console.WriteLine("Sending message """ & data & """ to " & IP)

Dim client As TcpClient = New TcpClient()

client.Connect(New IPEndPoint(IPAddress.Parse(IP), My.Settings.CommPort))

Dim stream As NetworkStream = client.GetStream()

Dim sendBytes As Byte() = Encoding.ASCII.GetBytes(data)

stream.Write(sendBytes, 0, sendBytes.Length)

End Sub

使用的TcpListener观看传入的数据。

编辑:对于知道什么IP将其发送到...您可以拥有要连接的内部IP列表,也可以让每台联网的计算机“订阅”到您的程序,如果它静态托管在一个盒子上的话。出于我的目的,当我使用此代码时,主机进程位于已知的服务器上。希望接收消息的客户端进程向主机发送一条快速消息,然后主机会记录该IP以便稍后发送。

获得一个请求的客户端的IP:

''Given variable m_listener is an active TcpListener...

Dim client As TcpClient = m_listener.AcceptTcpClient()

Dim requesterIP As String = client.Client.RemoteEndPoint.ToString().Split(New Char() {":"})(0)

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值