关于串口port already open问题的请教-专业自动化论坛-中国工控网论坛

关于串口port already open问题的请教点击：7714 | 回复：6

精华：0帖
求助：0帖
帖子：1帖 | 2回
年度积分：0
历史总积分：5
注册：2003年7月27日

发表于：2005-05-19 08:15:00

楼主

我是新手,最近遍了一个简单的程序,从一个电子称采集数据,数据是自动接收的, 不用发送数据.程序简单, 一般运行可以.可是我总是遇到一个问题: 我的电子称总和计算机串口连在一起,一旦我推出程序在重新运行,计算机总是告诉: Port already open.只有断开电子称和计算机串口的连接然后重起计算机.有时侯重起计算机也不行. 不知是何缘故. 如何解决这个问题. Email: ljdjjbao@yahoo.com.cn 诚请各位大侠指点. 本人不胜感激. 先谢谢了.

分享到：

邀请回答

回复楼主

一水

精华：0帖
求助：0帖
帖子：1帖 | 54回
年度积分：0
历史总积分：232
注册：2002年8月05日

发表于：2005-05-19 08:40:00

1楼

1、确定此串口有没有它用， 2、如果没有它用，在用此串口前如果检测到串口已经打开可以先从程序中关掉，然后再用此串口。

回复引用举报

djianjun

精华：0帖
求助：0帖
帖子：1帖 | 2回
年度积分：0
历史总积分：5
注册：2003年7月27日

发表于：2005-05-23 12:14:00

2楼

我已经重新启动计算机,应该没有别的程序用这个串口; 第二个方法我用了, 即在Form_load里关闭port, 在Start里面打开port. 可还是不行. 烦请抽时间帮我看看下面的代码. 谢谢您的建议. Private Sub Form_Load() Left = 0 Top = 0 Width = 20000 Height = 10000 With MSC If MSC.PortOpen = True Then MSC.PortOpen = False End If .CommPort = 2 .Settings = "9600,n,8,1" .InBufferSize = 1024 .OutBufferSize = 1024 ....................... Private Sub CmdStart_Click() If MSC.PortOpen = False Then MSC.PortOpen = True End If .....................

回复引用举报

李文思