×

VB VB.NET

.NET多进程间进行互相通讯

Kalet Kalet 发表于2019-07-16 23:21:19 浏览266 评论0

抢沙发发表评论

 

在实际应用中我们经常需要实现多个进程之间共享信息,以及实现互相之间的控制传递。

我们可以有很多的方法,最为常用的是共享一个本地的数据文件,或者是共享一个数据库。但问题也随之而来——不断的对硬盘进行操作会对硬盘硬件造成极大的伤害,另外由于读取硬盘需要大量的时间,也同样对软件的运行效率大打折扣!

因此,更为高级的就是我们共享内存!过去在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



作者:QidongFeifanComput
原文:https://blog.csdn.net/santook/article/details/7483595


群贤毕至

访客