vb.net UDP 本地发送和接收怎么使用同一个端口呢DatagramSocket用于接收和发送UDP的Socket实例 。该类有3个构造函数:DatagramSocket():通常用于客户端编程,它并没有特定监听的端口,仅仅使用一个临时的 。程序会让操作系统分配一个可用的端口 。DatagramSocket(int port):创建实例,并固定监听Port端口的报文 。通常用于服务端 。
vb.net 做的通信程序,设备掉电后出错:无法从传输连接中读取数据: 远程主机强迫关闭了一个现有的连接看下这个异常的类型 在捕捉异常的时候处理为关闭并重新打开端口监听(这个看你自己需求) 然后在socketException下面再catch其它exception 进行弹出错误提示之类的操作 就可以了
VB 编写的端口监听程序 , 监听端口5656 。获得源地址IP正常,获得源端口号出现负数是什么问题 。端口监听应该用的是UDP协议吧 , 获得源地址IP正常只能说明你已经可以和源地址通信 , 源端口号不是自己获得的,而是指定的,例:
你自己的地址是192.168.0.2 端口:1001
源地址的地址是192.168.0.3 端口:5656
那么,你的Winsock1.Protocol = sckUDPProtocol设置未UDP协议
然后设置端口Winsock1.LocalPort = 1001
接着Winsock1.RemotePort = 5656
Winsock1.RemoteHost =“192.168.0.3”
【vb.net端口侦听 netcat监听端口】绑定本地端口Winsock1.Bind “192.168.0.2”
这样就监听成功了,程序我没有测试,你先按照自己的本地配置修改试试看
vb.net2005 tcp聊天程序问题‘客户端向这样写:在窗体说放两个文本框、两个标签、两个按钮、一个列表框
Imports System.Net
Imports System.Net.Sockets
Imports System.IO
Imports System.Threading
Public Class Form1
'网络基础数据流
Private ns As NetworkStream
Private swriter As StreamWriter
Private nsread As StreamReader
Private tcpclient As TcpClient
Private tcpconnected As Boolean = False
Private clisocket As Socket
Private mythread As Thread
'发送
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If Me.TextBox2.Text"" Then
swriter.WriteLine(Me.TextBox2.Text)
swriter.Flush()
Me.TextBox2.Text = ""
Else
MessageBox.Show("发送信息不能为空!", "错误提示")
End If
End Sub
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
If Not (components Is Nothing) Then
components.Dispose()
End If
End If
MyBase.Dispose(disposing)
End Sub
'建立连连接
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Dim ipremote As IPAddress
Dim tcpclient As TcpClient
Try
ipremote = IPAddress.Parse(Me.TextBox1.Text)
Catch ex As Exception
MessageBox.Show("IP地址不合法!", "错误提示")
End Try
Try
tcpclient = New TcpClient(Me.TextBox1.Text, 8000)
ns = tcpclient.GetStream
swriter = New StreamWriter(ns)
Me.StatusBar1.Text = "已经连接上"
Me.Button2.Enabled = False
Me.Button1.Enabled = True
tcpconnected = True
Catch ex As Exception
MessageBox.Show("无法与远程8000端口建立连接!", "错误提示")
End Try
End Sub
Private Sub listen()
Try
Dim tcplistener As New TcpListener(IPAddress.Parse("127.0.0.1"), 8000)
tcplistener.Start()
tcpclient = tcplistener.AcceptTcpClient
ns = tcpclient.GetStream()
nsread = New StreamReader(ns)
While True
Dim msg As String = nsread.ReadLine
If msg = "stop" Then
tcplistener.Stop()
ns.Close()
nsread.Close()
mythread.Abort()
Else
Dim mytime As String = DateTime.Now.ToShortTimeString
Me.ListBox1.Items.Add(mytime""msg)
End If
End While
Catch ex As System.Security.SecurityException
MessageBox.Show("侦听失败!", "错误")
End Try
End Sub
End Class
vb.net端口侦听的介绍就聊到这里吧,感谢你花时间阅读本站内容,更多关于netcat监听端口、vb.net端口侦听的信息别忘了在本站进行查找喔 。
推荐阅读
- mac中安装mysql数据库文件,macbookpro安装mysql
- 玩硬盘游戏黑屏怎么办,硬盘导致游戏卡死
- mongdb怎么安装,mongodb42安装教程
- 关于php载入txt数据的信息
- 非安全设置怎么设置路由器,非安全设置怎么设置路由器密码
- 问chatgpt,问chatGPT的最好问题
- mysql怎么设置数据源 mysql数据库设置
- 电脑提词器安卓怎么用的,电脑端提词器软件
- redis高级,redis高级应用