VB.NET消息队列是什么

这篇文章主要介绍VB.NET消息队列是什么，文中介绍的非常详细，具有一定的参考价值，感兴趣的小伙伴们一定要看完！

创新互联，为您提供网站建设公司、重庆网站制作、网站营销推广、网站开发设计，对服务酒店设计等多个行业拥有丰富的网站建设及推广经验。创新互联网站建设公司成立于2013年,提供专业网站制作报价服务,我们深知市场的竞争激烈，认真对待每位客户，为客户提供赏心悦目的作品。 与客户共同发展进步，是我们永远的责任！

消息队列是 Windows 2000（NT也有MSMQ，WIN95/98/ME/XP不含消息队列服务但是支持客户端的运行）操作系统中通讯的基础，也是用于创建分布式、松散连接通讯应用程序的工具。这些应用程序可以通过不同种类的网络进行通讯，也可以与脱机的计算机通讯。VB.NET消息队列分为用户创建队列和系统队列，用户队列分为：

· "公共队列"在整个可传递消息的VB.NET消息队列网络中复制并传输，并且有可能由网络连接的所有站点访问。

· "专用队列"不在整个网络中发布。相反，它们仅在所驻留的本地计算机上可用。专用队列只能由知道队列的完整路径名或标签的应用程序访问。

· "管理队列"包含确认在给定"消息队列"网络中发送的消息回执的消息。指定希望 MessageQueue 组件使用的管理队列

· "响应队列"包含目标应用程序接收到消息时返回给发送应用程序的响应消息。指定希望 MessageQueue 组件使用的响应队列。

系统队列分为：

· "日记队列"可选地存储发送消息的副本和从队列中移除的消息副本。

· "死信队列"存储无法传递或已过期的消息的副本。

· "专用系统队列"是一系列存储系统执行消息处理操作所需的管理和通知消息的专用队列。

现在大家对VB.NET消息队列有了简单的了解后，就该进入主题了。要使用MSMQ进行软件开发需要安装MSMQ。安装完后就该进入实际的开发阶段。先打开IDE中的"服务器资源管理器"展开你想建立消息队列的计算机名，再展开"消息队列"右击它在弹出菜单中选择"新建"建立一个新的消息队列，并为它指定一个名字，这个名字可以随意。也可以通过编程来完成，代码如下：

system.Messaging.MessageQueue
.Create(".\Private$\MyPrivateQueue")
'建立专用队列  
System.Messaging.MessageQueue.
Create("myMachine\MyQueue")
'建立公共队列 

其实我认为使用哪种方法并不重要，重要的是搞清楚专用队列和公共队列的差别（其他队列不是必须的）。在本例中是通过"服务器资源管理器"分别在服务器上建立了专用队列和公共队列。
程序功能：本程序分为两部分包括服务器程序（安装在SQL Server服务器上）和客户端程序，客户端的作用是用来编写t-sql语句并将t-sql语句放在消息中，并将消息发送到SQL Server服务器上的消息队列中去。服务器程序检查指定的VB.NET消息队列当发现有新消息到达时，就开始执行消息中的内容，由于消息中的内容是t-sql语句所以服务器端实际上是执行对数据库的操作。
客户端程序：

public Sub client()  
Dim tM As New System.Messaging.
MessageQueue()  
tM.Path = ".\Private$\jk" '
"FORMATNAME:PUBLIC=3d3dc813-
c555-4fd3-8ce0-79d5b45e0d75"
'与指定计算机中的消息队列建立连接，  
Dim newMessage As New System.
Messaging.Message(TextBox1.Text)
'接受文本筐的t-sql语句  
newMessage.Label = "This is 
the label"'消息名字，  
tM.Send(newMessage)'发送消息  
End Sub  

服务端程序：

public Sub server()  
Dim NewQueue As New System.Messaging
.MessageQueue(".\Private$\jk")'
"FORMATNAME:PUBLIC=3d3dc813-c555-
4fd3-8ce0-79d5b45e0d75"'与指定计算机
中的消息队列建立连接，  
Dim m As System.Messaging.Message  
'查看VB.NET消息队列中的消息  
m = NewQueue.Receive   
m.Formatter = New System.Messaging.
XmlMessageFormatter(New String() 
{"System.String,mscorlib"})  
Dim st As String  
st = m.Body'消息队列中消息的消息内容。
既sql语句  
Dim con As New OleDb.OleDbConnection
("输入自己的数据库连接字符串")  
con.Open()  
Dim com As New OleDb.OleDbCommand
(st, con)'执行消息中的sql语句  
com.ExecuteNonQuery()  
con.Close()  
End Sub  

在本程序中你会发现在sub client()中我并没连接数据库和请求数据，而是通过发消息来操作数据库的，这个好处是节省了两部分时间：

1、对数据库连解请求数据的时间。

2、从数据库返回数据的时间。

在很多情况下其实我们并不需要看见具体的数据就知道该怎么修改数据库中的数据。例如要删除张三的记录，就可以将一条简单的删除语句放入消息中，发给服务器让服务器程序去处理对数据的更改。

此外VB.NET消息队列的另一个主要用途也就是当前ERP软件中必不可少的，就是在断开连接时保存信息，当连接恢复时发送消息。消息在如下两种情况中无法迅速地传递到它们的队列：当队列驻留的计算机无法工作时，或当路由消息所需的域控制器无法工作时。"消息队列"可让您应对这些情况，使得在从网络上断开连接或必要的计算机或控制器无法工作时，仍可以继续发送消息。在这些情形下，消息暂时存储在本地计算机或传递路由上的某个计算机的队列中，直到完成传递所需的资源重新联机。

例如，假设有一个记录所有在出差的销售人员发送的订单的中央队列。这些销售人员每天的大部分时间都以断开连接的方式工作，记录来自客户站点的订单信息，并且每天拨号连接一次，将所有这些信息传输到中央队列中。因为消息在发送方断开连接时仍可发送到队列，所以销售人员可以在记录客户信息时立即发送他们的消息，但系统会缓存这些消息直到晚间进行拨号连接为止。

在断开连接时要怎么保存消息呢？向断开连接的队列发送消息同向可用队列发送消息的过程几乎完全相同。当要向其发送的队列不可用时，不必进行任何特殊的配置以使组件将消息存储在临时队列中。在client代码的tM.Path = ".\Private$\jk"后面有一条注释语句，其实这条语句就是实现向断开连接的队列发送消息的功能。只要将tM.Path = ".\Private$\jk"这条语句换成tM.Path = "FORMATNAME:PUBLIC=3d3dc813-c555-4fd3-8ce0-79d5b45e0d75"其中PUBLIC后面的数字是要发送到计算机的guid数字。

这个数字可以打开那台计算机的消息队列的属性看见。使用这种方法就可以在断开连接的情况下保证对服务器的操作是有效。现在运行这个程序后，打开计算机管理，在"计算机管理"窗口中展开"服务和应用程序"-》"消息队列"-》"传出队列"，你将在右边的窗口中看见你建立的消息。（如果你使用tM.Path = ".\Private$\jk"语句，在"计算机管理"窗口中展开"服务和应用程序"-》"消息队列"-》"专用队列"可以看见你建立的队列。）

其实消息队列的编程并不复杂，但它在网络环境的程序开发中是非常有用的，可以简化大量的开发过程和节省开发时间。而且，消息队列的编程有很大的灵活性，几乎可以解决网络编程的大部分问题。比如聊天程序，远程控制程序。

本文针对VB.NET消息队列做了一个简单的介绍，并举了一个例来说明怎么在.NET下使用消息编程，达到快速高效稳定的对数据库进行操作。***补充要说的是在Internet中也一样可以使用消息队列，只需要将tM.Path = "FORMATNAME:PUBLIC=3d3dc813-c555-4fd3-8ce0-79d5b45e0d75语句后面的数字变成消息队列所在服务器的数字就可以了。但是要提醒大家的是使用消息在传输时将占有大量的带宽，所以在不是必须的时候，Internet下的编程不要使用消息。

以上是“VB.NET消息队列是什么”这篇文章的所有内容，感谢各位的阅读！希望分享的内容对大家有帮助，更多相关知识，欢迎关注创新互联行业资讯频道！