求助:串口的写问题(可以读,但不能写?!)

efstudent 2004-08-14 09:32:00
求助:为什么我的程序对串口的写操作总是timeout.
我用CreateFile(m_sPort, GENERIC_READ | GENERIC_WRITE, 0, NULL, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, NULL); 打开串口。

程序能够用ReadFile函数读取到数据,但是用WriteFile函数写串口时,则总是因为timeout退出。

用串口精灵测试,则可以对串口正常进行读写!

紧急求救!望那位大虾不吝赐教!!


另:我的系统是XP。
...全文
184 4 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
ppcust 2004-08-14
  • 打赏
  • 举报
回复
看看你的命令有没有错啊

下位机是怎么控制的啊
cjyun 2004-08-14
  • 打赏
  • 举报
回复
不清楚,帮忙顶一下
efstudent 2004-08-14
  • 打赏
  • 举报
回复
我目前没有使用下位机,使用的9600波特,在一台机子上用串行线将COM1和COM2连起来,
用“串口精灵”测试可以读和写,我的程序也可以读,但我的程序就是不能写。
大熊猫侯佩 2004-08-14
  • 打赏
  • 举报
回复
楼主请参考:

一个简单的VB串口发送程序(源码)





'-----发送按钮Click事件子程序-----------
Private Sub Fasong_Click()
Dim JIHAO(0) As Byte ’机号
Dim head_data(4) As Byte ’5 Byte控制字
Dim end_data(0) As Byte '1 Byte 结束字
JIHAO(0) = Val(Text3.Text)
head_data(0) = Val(Text4.Text)
head_data(2) = &HEE 'TIMH
head_data(3) = &HEE 'TIML
head_data(4) = Val(Combo1.Text) 'INMOD
end_data(0) = &HFF
If Combo2.Text = "增加" Then head_data(1) = &H99
If Combo2.Text = "清空" Then head_data(1) = &H33
If Combo2.Text = "删除" Then head_data(1) = &H32
Ready = 0: ErrCount = 0
On Error GoTo ERRORCOM ’打开错误处理
'----------------------------------------------------------
If com1.value Then MSComm1.CommPort = 1 'Use com1
If com2.value Then MSComm1.CommPort = 2 'Use com2

MSComm1.Settings = FORM1.Combo3.Text + ",M,8,2" '设定波特率和置校验和位为1
MSComm1.InputLen = 0 '
MSComm1.PortOpen = -1 'Open the port
MSComm1.OutBufferCount = 0
MSComm1.Output = JIHAO ‘发送机号
MSComm1.PortOpen = False ’关闭串口
MSComm1.Settings = FORM1.Combo3.Text + ",S,8,2" '设定波特率和置校验和位为空
MSComm1.OutBufferCount = 0
MSComm1.PortOpen = True
MSComm1.Output = head_data
MSComm1.Output = Text2.Text
MSComm1.Output = end_data
MSComm1.PortOpen = False
Text1.Text = "发送成功!" + Chr(13) & Chr(10) + "发送至" + Text3.Text + "屏体," + "信息编号:" + Text4.Text + Chr(13) & Chr(10) + Chr(13) & Chr(10) + Text1.Text
GoTo comend
ERRORCOM:
Text1.Text = "ERROR!请重新选择COM口!" + Chr(13) & Chr(10) + Chr(13) & Chr(10) + Text1.Text
comend:
On Error GoTo 0
End Sub




27,511

社区成员

发帖
与我相关
我的任务
社区描述
硬件/嵌入开发 单片机/工控
社区管理员
  • 单片机/工控社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧