重庆分公司,新征程启航
为企业提供网站建设、域名注册、服务器等服务
在实际应用中我们经常需要实现多个进程之间共享信息,以及实现互相之间的控制传递。
我们可以有很多的方法,最为常用的是共享一个本地的数据文件,或者是共享一个数据库。但问题也随之而来--不断的对硬盘进行操作会对硬盘硬件造成极大的伤害,另外由于读取硬盘需要大量的时间,也同样对软件的运行效率大打折扣!
因此,更为高级的就是我们共享内存!过去在C/C++中这个似乎比较便捷,但VB6中则需要很多API操作才能实现。对于。NET过去也只能通过委托来实现API.
而现在。NET4为我们提供了强大的功能--内存文件映射功能。通过内存映射可以完美实现多个进程之间的信息共享!
下面一个简单的例子来说明:
实现任务:进程A向内存写入信息,进程B则读取这些信息,实现进程B共享进程A的信息。
进程A代码如下:
Public Class Form1
Dim MF As System.IO.MemoryMappedFiles.MemoryMappedFile 'MemoryMappedFile 内存映射文件对象
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
MF = MF.CreateNew("SYSIO", 5000) '在主共享进程中创建一个非常驻的内存映射文件,其大小为5000字节
End Sub
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
Dim buf(4) As Byte
Dim s As Single
Dim ms As System.IO.MemoryMappedFiles.MemoryMappedViewStream '内存映射文件的视图流
ms = MF.CreateViewStream()
s = Rnd()
buf = BitConverter.GetBytes(s)
ms.Write(buf, 0, buf.Length) '向内存映射文件写入信息
End Sub
End Class
进程B代码如下:
Public Class Form1
Dim MF As System.IO.MemoryMappedFiles.MemoryMappedFile
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
MF = MF.OpenExisting("SYSIO") '打开一个内存中已经存在的映射,也就是主共享进程中创建的内存映射文件
End Sub
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
Dim buf() As Byte = {0, 0, 0, 0, 0}
Dim ms As System.IO.MemoryMappedFiles.MemoryMappedViewStream
ms = MF.CreateViewStream()
ms.Read(buf, 0, buf.Length) '读取该映射文件中的指定内容
Me.TextBox1.Text = BitConverter.ToSingle(buf, 0)
End Sub
End Class
另外有需要云服务器可以了解下创新互联scvps.cn,海内外云服务器15元起步,三天无理由+7*72小时售后在线,公司持有idc许可证,提供“云服务器、裸金属服务器、高防服务器、香港服务器、美国服务器、虚拟主机、免备案服务器”等云主机租用服务以及企业上云的综合解决方案,具有“安全稳定、简单易用、服务可用性高、性价比高”等特点与优势,专为企业上云打造定制,能够满足用户丰富、多元化的应用场景需求。