欢迎您访问程序员文章站本站旨在为大家提供分享程序员计算机编程知识!
您现在的位置是: 首页

这就是个静态页面通过js控制mscomm对某com设备进行访问的例子.

程序员文章站 2022-06-09 10:11:47
...
<html> 
<head> 
<title>JavaScript串口(通过 vb 的 MSCOMM32.OCX 控件)</title>

<SCRIPT ID=clientEventHandlersJS LANGUAGE=javascript> 
<!-- 
//重写 mscomm 控件的唯一事件处理代码 
function MSComm1_OnComm() 
{ 
var len=0;
//window.alert("happy"); 
if(MSComm1.CommEvent==1)//如果是发送事件 
{ 
window.alert("ok");//这句正常,说明发送成功了 
} 
else if(MSComm1.CommEvent==2)//如果是接收事件 
{ 
//window.alert(MSComm1.CommEvent);//! ‘
//window.alert(MSComm1.Input);//
document.form1.txtReceive.value=document.form1.txtReceive.value + MSComm1.Input;
} 

return false; 
} 
//--> 
</SCRIPT> 

<SCRIPT LANGUAGE=javascript FOR=MSComm1 EVENT=OnComm> 
<!-- 
// MSComm1控件每遇到 OnComm 事件就调用 MSComm1_OnComm()函数
MSComm1_OnComm()
//--> 
</SCRIPT> 


<script language="JavaScript" type="text/JavaScript"> 
<!--
//打开端口并发送命令程序 
function OpenPort() 
{ 
if(MSComm1.PortOpen==false) 
{ 
MSComm1.PortOpen=true; 
MSComm1.Output="R";//发送命令
} 
else 
{ 
window.alert ("已经开始接收数据!"); 
} 
} 
--> 
</script> 

</head>

<OBJECT CLASSID="clsid:648A5600-2C6E-101B-82B6-000000000014" id=MSComm1 codebase="MSCOMM32.OCX" type="application/x-oleobject" 
style="LEFT: 54px; TOP: 14px" >
<PARAM NAME="CommPort" VALUE="1"> 
<PARAM NAME="DTREnable" VALUE="1"> 
<PARAM NAME="Handshaking" VALUE="0"> 
<PARAM NAME="InBufferSize" VALUE="1024"> 
<PARAM NAME="InputLen" VALUE="0"> 
<PARAM NAME="NullDiscard" VALUE="0"> 
<PARAM NAME="OutBufferSize" VALUE="512"> 
<PARAM NAME="ParityReplace" VALUE="?"> 
<PARAM NAME="RThreshold" VALUE="1"> 
<PARAM NAME="RTSEnable" VALUE="1"> 
<PARAM NAME="SThreshold" VALUE="2"> 
<PARAM NAME="EOFEnable" VALUE="0"> 
<PARAM NAME="InputMode" VALUE="0"> 

<PARAM NAME="DataBits" VALUE="8"> 
<PARAM NAME="StopBits" VALUE="1"> 
<PARAM NAME="BaudRate" VALUE="9600"> 
<PARAM NAME="Settings" VALUE="9600,N,8,1">
</OBJECT> 
<body>

<form name="form1"> 
<input type="submit" name="Submit" value="提交" onClick="OpenPort()">
<input type="text" name="txtReceive" value=""> 
</form> 
</body> 
</html> 

这就是个静态页面通过js控制mscomm对某com设备进行访问的例子.