8294.html

来自「以电子书的形式收集了VB一些常见问题解决方法,可以很方便的查找自己需要解决的问题」· HTML 代码 · 共 34 行

HTML
34
字号
<html>
  <head>
    <title>无法从串列埠送出CHR$(128~254)之字元码</title>
  </head>
  <body bgcolor="#FFFFFF" vlink="#808080">
    <center>
      <h1>无法从串列埠送出CHR$(128~254)之字元码</h1>
    </center>
<hr size=7 width=75%>

<hr size=7 width=75%><p>
Posted by <a href="mailto:lison@ms4.hinet.net">lison</a> on December 14, 1998 at 17:10:18:<p>
缘起: vb6.0内有一通讯元件MSCOMM32.OCX(或vb6.0_16位元版MSCOMM16.OCX),使用上有<br>      颇多之限制.<p>      例如:<br>           MSCOMM32.OCX :无法从串列埠送出CHR$(128~254)之字元码<br>           MSCOMM16.OCX :无法从串列埠送出CHR$(&H0)及CHR$(&HFF)这两个字元码   <p>      所以想利用WIN32C API函式来完成一简易通讯程式却一直不得其门而入<br>      若有先进于此方面有心得,盼能拨沉指导不胜感激.<p><br>说明: 在WINDOWS95里,串列埠与其它的通讯设备都被视为档案来处理,故以档案开/关<br>       和读/写的函式来处理串列埠.<br>     1.从呼叫CreatFile函式开始:CreatFile函式可将串列埠打开为读取或写入之用,<br>       而且传回此打开的串列埠之控制标帜(handle),由于CreatFile函式是个通用型<br>       函式,故内容颇为复杂.<br>底下为小弟所写之程式,但其传回值(hcomm)却使终传回-1,应该是参数的传输上出了问题<p><br>****从API检视员COPY下来之宣告 *******<br>Declare Function CreateFile Lib "kernel32" Alias "CreateFileA" (ByVal lpFileName As String, ByVal dwDesiredAccess As Long, ByVal dwShareMode As Long, lpSecurityAttributes As SECURITY_ATTRIBUTES, ByVal dwCreationDisposition As Long, ByVal dwFlagsAndAttributes As Long, ByVal hTemplateFile As Long) As Long<br>**************************************<p>Public Const GENERIC_WRITE = &H40000000<br>Public Const OPEN_EXISTING& = 3<br>Public Const FILE_FLAG_OVERLAPPED = &H40000000<p><br>Function RDSEC$()<br>Dim hcomm As Long<br>hcomm = CreateFile("COM2", ByVal GENERIC_WRITE, 0&,0&, ByVal OPEN_EXISTING, ByVal FILE_FLAG_OVERLAPPED, 0&)<br>hcommerror& = GetLastError()<br>End Function<br>
<br>
<br><hr size=7 width=75%><p>
<a name="followups">Follow Ups:</a><br>
<ul><!--insert: 8294-->
<!--top: 9972--><li><a href="9972.html">Re: 无法从串列埠送出CHR$(128~254)之字元码</a> <b>Andy </b> <i>11:31:02 2/09/99</i>
(<!--responses: 9972-->0)
<ul><!--insert: 9972-->
</ul><!--end: 9972-->
<!--top: 8328--><li><a href="8328.html">Re: 无法从串列埠送出CHR$(128~254)之字元码</a> <b>Roger</b> <i>14:20:12 12/15/98</i>
(<!--responses: 8328-->0)
<ul><!--insert: 8328-->
</ul><!--end: 8328-->
<!--top: 8297--><li><a href="8297.html">Re: 无法从串列埠送出CHR$(128~254)之字元码</a> <b>靓仔</b> <i>18:47:30 12/14/98</i>
(<!--responses: 8297-->0)
<ul><!--insert: 8297-->
</ul><!--end: 8297-->
</ul><!--end: 8294-->
<br><hr size=7 width=75%><p>

</body></html>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?