1489.html
来自「以电子书的形式收集了VB一些常见问题解决方法,可以很方便的查找自己需要解决的问题」· HTML 代码 · 共 29 行
HTML
29 行
<html>
<head>
<title>Share Memory</title>
</head>
<BODY BACKGROUND="" BGCOLOR="white" TEXT="black" LINK="red" VLINK="#808080" ALINK="">
<center>
<h1>Share Memory</h1>
</center>
<HR><p>
Posted by <a href="mailto:jo0805@ms1.palmary.net.tw">jo</a> on December 12, 1997 at 05:26:15:<p>
OS--> NT4.0 + NT Service 3 + vb6.0 专业版 + VBSP3<p>开启 Share Memory 时,为何 ShareName 多执行几次,<br>就无法 MappingAddress ,有时换个 ShareName 就可以,<br>但是有时候就一直无法开启,CreateFileMapping 很正常,<br>但是就是 MappingAddress 不到,不知我的程式是否有 Bug, <br>麻烦您看一下,谢谢!!<p>程式码如下:<br>MappingHandle = OpenFileMapping(FILE_MAP_WRITE Or FILE_MAP_READ, _<br> False, ShareName)<p>If (MappingHandle = 0) Then<br> MappingHandle = CreateFileMapping(MEM_HANDLE, Security, _ <br> FILE_MAP_WRITE, 0, FaxBufLen, ShareName)<br>End If<p>If (MappingHandle != 0) Then<br> MappingAddress = MapViewOfFile(MappingHandle, FILE_MAP_READ Or _<br> FILE_MAP_WRITE, 0, 0, 0)<br>/* 程式无法 开启 MappingAddress <br> 也就是说 MappingAddress 一直等于 0 <br> 我将 不等于 符号设为 != 因为不等于符号 无法显示<br>*/<p> If (MappingAddress != 0) Then<br> <br> '抓 Memory 资料<br> CopyMemory ByVal SSDATA, ByVal MappingAddress, Len(SSDATA)<p> '将资料显示<br> Print SSDATA<p> End If<br>End If<p>
<br>
<p>
<a name="followups">Follow Ups:</a><br>
<ul><!--insert: 1489-->
<!--top: 1537--><li><a href="1537.html"><b>为什么要这么做?</b></a> 小吴 <i>17:17:08 12/18/97</i>
(<!--responses: 1537-->1)
<ul><!--insert: 1537-->
<!--top: 1561--><li><a href="1561.html"><b>Re: 为什么要这么做?</b></a> jo <i>04:32:37 12/22/97</i>
(<!--responses: 1561-->0)
<ul><!--insert: 1561-->
</ul><!--end: 1561-->
</ul><!--end: 1537-->
</ul><!--end: 1489-->
<br><HR><p>
</body></html>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?