欢迎来到一句话经典语录网
我要投稿 投诉建议
当前位置:一句话经典语录 > 口号 > js更改串口号

js更改串口号

时间:2017-11-09 23:25

js怎样获取串口信息

MSCOMM控件在VB6的企业版中有,需通过部件添加方式加载。

Private Sub MSComm_OnComm()Dim bytInput() As ByteDim intInputLen As IntegerSelect Case frmMain.ctrMSComm.CommEventCase comEvReceiveIf blnReceiveFlag ThenIf Not frmMain.ctrMSComm.PortOpen ThenfrmMain.ctrMSComm.CommPort = intPortfrmMain.ctrMSComm.Settings = strSetfrmMain.ctrMSComm.PortOpen = TrueEnd If'此处添加处理接收的代码frmMain.ctrMSComm.InputMode = comInputModeText '按ASCII接收intInputLen = frmMain.ctrMSComm.InBufferCountReDim bytInput(intInputLen)bytInput = frmMain.ctrMSComm.InputText1 = bytInputText2 = Text1jscd = Len(Text1)If Left(Text1, 1) <> Chr(27) Or jscd > 25 Then 'frmMain.Label3.BackColor = vbRedfrmMain.Label3.ForeColor = vbWhitefrmMain.Label3.Caption = 接收信号出错!ElseIf Left(Text2, 1) = Chr(27) And Mid(Text2, 25, 1) = Chr(13) ThenfrmMain.Label3.BackColor = vbGreenfrmMain.Label3.ForeColor = vbBlackfrmMain.Label3.Caption = 接收信号正常!If Left(Text2, 6) = Chr(27) & R0032 And jscd = 25 ThenIf Val(fa2) >= 0 And Len(fa2) = 4 Thenfa2 = 0 & Mid(fa2, 2, 3)End IffrmMain.txtSend = Chr(27) & fa0 & fa1 & 9999 & zhenkong & fa2 & fa3 & fa4 & Chr(13)lenTxtSend = Len(txtSend)frmJishi.Label8.Caption = txtSendfrmJishi.Label11.Caption = lenTxtSendIf lenTxtSend = 24 ThenCall commFasongElsefrmMain.Label3.BackColor = vbRedfrmMain.Label3.ForeColor = vbWhitefrmMain.Label3.Caption = 发送信号出错!End IfblL1 = Mid$(Text2, 19, 2)If blL1 = 01 Thenrecord_jmm(0) = Val(Mid$(Text2, 21, 4)) \\\/ 10 '制品1温度ElseIf blL1 = 02 Thenrecord_jmm(1) = Val(Mid$(Text2, 21, 4)) \\\/ 10 '制品2温度ElseIf blL1 = 03 Thenrecord_jmm(2) = Val(Mid$(Text2, 21, 4)) \\\/ 10 '制品3温度ElseIf blL1 = 04 Thenrecord_jmm(3) = Val(Mid$(Text2, 21, 4)) \\\/ 10 '制品4温度ElseIf blL1 = 05 Thenrecord_jmm(4) = Val(Mid$(Text2, 21, 4)) \\\/ 10 '制品5温度ElseIf blL1 = 06 Thenrecord_jmm(5) = Val(Mid$(Text2, 21, 4)) \\\/ 10 '制品6温度End Ifrecord_jm(0) = Val(record_jmm(0))record_jm(1) = Val(record_jmm(1))record_jm(2) = Val(record_jmm(2))record_jm(3) = Val(record_jmm(3))record_jm(4) = Val(record_jmm(4))record_jm(5) = Val(record_jmm(5))blL = Mid$(Text2, 7, 6)Call Hex_bin '输出口状态鉴别blLg = Mid$(Text2, 13, 6)Call hex_bin1 '输出口故障状态鉴别txtSend = ElsetxtSend = End IfEnd IfIf Not blnAutoSendFlag And Not blnReceiveFlag ThenfrmMain.ctrMSComm.PortOpen = FalseEnd IfEnd IfEnd SelectEnd Sub以上是一段MSCOMM的ONCOMM事件代码,接收的数据按上下位机约定取出赋值于全局变量,在其它窗体进行数据记录(写入数据库).至于数据分析确如一楼说的可以海阔天空,通过数据控件及SQL语句来完成任务.以下提供MSDN参考:OnComm 常数常数 值 描述comEvSend 1 发送事件。

comEvReceive 2 接收事件。

comEvCTS 3 clear-to-send 线变化。

comEvDSR 4 data-set ready 线变化。

comEvCD 5 carrier detect 线变化。

comEvRing 6 振铃检测。

comEvEOF 7 文件结束。

MSComm 控件提供下列两种处理通讯的方式:事件驱动通讯是处理串行端口交互作用的一种非常有效的方法。

在许多情况下,在事件发生时需要得到通知,例如,在 Carrier Detect (CD) 或 Request To Send (RTS) 线上一个字符到达或一个变化发生时。

在这些情况下,可以利用 MSComm 控件的 OnComm 事件捕获并处理这些通讯事件。

OnComm 事件还可以检查和处理通讯错误。

所有通讯事件和通讯错误的列表,参阅 CommEvent 属性。

在程序的每个关键功能之后,可以通过检查 CommEvent 属性的值来查询事件和错误。

如果应用程序较小,并且是自保持的,这种方法可能是更可取的。

例如,如果写一个简单的电话拨号程序,则没有必要对每接收一个字符都产生事件,因为唯一等待接收的字符是调制解调器的“确定”响应。

SThreshold 属性在 MSComm 控件设置 CommEvent 属性为 comEvSend 并产生 OnComm 事件之前,设置并返回传输缓冲区中允许的最小字符数。

说明若设置 Sthreshold 属性为 0(缺省值),数据传输事件不会产生 OnComm 事件。

若设置 Sthreshold 属性为 1,当传输缓冲区完全空时,MSComm 控件产生 OnComm 事件。

如果在传输缓冲区中的字符数小于 value,CommEvent 属性设置为 comEvSend,并产生 OnComm 事件。

comEvSend 事件仅当字符数与 Sthreshold 交叉时被激活一次。

例如,如果 Sthreshold 等于 5,仅当在输出队列中字符数从 5 降到 4 时,comEvSend 才发生。

如果在输出队列中从没有比 Sthreshold 多的字符,comEvSend 事件将绝不会发生。

CommEvent 属性包含实际错误或产生 OnComm 事件的数码。

注意,设置 Rthreshold 或 Sthreshold 属性为 0,分别使捕获 comEvReceive 和 comEvSend 事件无效。

通过JS获取串口数据的源代码,RS232的串口

串口数据通信使用JS没办法去做的。

你这个需要用C或者C++等底层语言去获取。

电脑串口号无缘无故自己改变

电脑重启的原因决方法: 1可能是BIOS的设置问题,进入BIOS里恢认设置或把主板的电池拿出来,反电,等5分钟在反装进去即可。

目的:是BIOS的设置恢复默认值,排除BIOS的散热预设自动重启或关机现象。

2、如果发生重启前下载了应用程序软件或运行程序软件时发生重启,则可能是程序软件引起的重启,一般将程序软件卸载再重新安装,如果故障依旧,则说明程序软件本身有错误,不能使用。

3、在安全模式中用杀毒软件查杀病毒,如果重启故障排除,则是病毒造成的重启故障。

4、开机按F8进入安全模式后在退出,在进入正常模式。

也可用系统自带的系统还原功能进行还原,如果重启故障排除,则是系统文件受损造成的重启。

5、如果故障依旧,接着检查电源,电源品质差,老化或功率过小,无法满足电脑各配件的供电需求,可更换大功率高质量的电源,如果故障排除,则是电源引起的重启故障。

6、如果电脑在进行热插拔某设备时出现重启,可按第3项解决。

7、接着使用排除法,检查内存、显卡、CPU、CPU风扇、主板等。

8、检查内存,内存质量不过关、散热不良、超频、不同品牌的内存混插及CAS值设置过低等都可引起电脑重启,可用替换法测试内存,并将BIOS中对内存参数进行相应调整。

9、检查主板,主板老化、电容失效或爆浆、主板与机箱背板发生短路等均可引发重启,可将主板从机箱取出检查或测试,接着检查CPU风扇散热片的底部硅胶是否变干,如果变干,将CPU风扇上的硅胶清理干净,然后重新涂上好的硅胶即可。

接着检查CPU的风扇转动,及CPU的温度是否正常。

10、清洁法:是通过对电脑主机中部件的灰尘进行清洁来排除故障的方法。

灰尘是也可造成电脑自动重启故障的因素之一,灰尘可以造成部件老化、引脚氧化、接触不良及短路等故障。

对于灰尘造成的这些故障,一般使用清洁法比较有效。

11、改变系统默认自动重启:右击我的电脑\\\/属性\\\/高级\\\/启动和故障恢复中的设置\\\/将系统失败中的“自动重新启动”前的勾去掉,然后按确定和应用重新启动电脑即可。

12、供电系统不稳定,也可造成重启故障的发生,可以考虑配置一台带稳压功能的UPS后备电源。

如果是软件或系统引起的,修复系统试试:

js接管串口无法接管串口数据,什么原因

这个应该只能用ajax来实现了,因为JS是前端语言,只能调用API来执行程序,所以要想实现口通讯,还得靠后端来实现,所以建议使用 AJAX来实现

声明 :本网站尊重并保护知识产权,根据《信息网络传播权保护条例》,如果我们转载的作品侵犯了您的权利,请在一个月内通知我们,我们会及时删除。联系xxxxxxxx.com

Copyright©2020 一句话经典语录 www.yiyyy.com 版权所有

友情链接

心理测试 图片大全 壁纸图片