91美女视频-亚洲免费观看视频-欧美a∨-久热在线视频-日韩黄网站-成av人片在线观看www-久操综合-超碰av在线播放-性欧美欧美巨大69-婷婷二区-av男人的天堂网-中文字幕一区在线播放-玖草在线观看-国产网址在线观看-免费在线不卡av

hsyyqq
級別: *
精華主題: * 篇
發(fā)帖數(shù)量: * 個(gè)
工控威望: * 點(diǎn)
下載積分: * 分
在線時(shí)間: (小時(shí))
注冊時(shí)間: *
最后登錄: *
查看hsyyqq的 主題 / 回貼
樓主  發(fā)表于: 2011-05-03 09:53
上位機(jī) 我打算用一般的pc機(jī) 現(xiàn)在需要跟電腦通信的有 三菱plc(加一個(gè)溫度模塊),還有一款數(shù)字千分表(很精密的) 表附帶一根RS232通信線,目前我只知道表的通信格式字,其他一無所知,各位大俠 怎么實(shí)現(xiàn)pc與plc的通信 還有pc與數(shù)字千分表的? 上位機(jī)用戶軟件我打算用vb 來編寫,大家看這樣行得通不 ?
hsyyqq
級別: *
精華主題: * 篇
發(fā)帖數(shù)量: * 個(gè)
工控威望: * 點(diǎn)
下載積分: * 分
在線時(shí)間: (小時(shí))
注冊時(shí)間: *
最后登錄: *
查看hsyyqq的 主題 / 回貼
1樓  發(fā)表于: 2011-05-03 10:17
1樓真的嗎? 我馬上加qq 謝謝 三克油啊。
hsyyqq
級別: *
精華主題: * 篇
發(fā)帖數(shù)量: * 個(gè)
工控威望: * 點(diǎn)
下載積分: * 分
在線時(shí)間: (小時(shí))
注冊時(shí)間: *
最后登錄: *
查看hsyyqq的 主題 / 回貼
2樓  發(fā)表于: 2011-05-03 10:19
2樓 組態(tài)軟件我是不想用了 我用過昆侖組態(tài)用起來是方便當(dāng)時(shí)總感覺 不好有缺點(diǎn) 所以我才改成這樣的。我已經(jīng)做過一套了。
hsyyqq
級別: *
精華主題: * 篇
發(fā)帖數(shù)量: * 個(gè)
工控威望: * 點(diǎn)
下載積分: * 分
在線時(shí)間: (小時(shí))
注冊時(shí)間: *
最后登錄: *
查看hsyyqq的 主題 / 回貼
3樓  發(fā)表于: 2011-05-04 10:48
昨天開始 寫今天 初步寫了個(gè)代碼不過指令發(fā)出好像plc沒有回應(yīng) 有懂vb的嗎幫我看看
Private Sub Command1_Click()
Dim OutString As String
Dim InString As String
MSComm1.OutBufferCount = 0
MSComm1.InBufferCount = 0
OutString = Chr(2) + "0" + "10f604" + Chr(3) + "74"
MSComm1.Output = OutString
Text1.Text = OutString
Do
  DoEvents
  Loop Until MSComm1.InBufferCount = 12
  InString = MSComm1.Input
  Text2.Text = InString

End Sub

Private Sub Form_Load()

MSComm1.CommPort = 3
MSComm1.Settings = "9600,e,7,1"
MSComm1.PortOpen = True

End Sub
hsyyqq
級別: *
精華主題: * 篇
發(fā)帖數(shù)量: * 個(gè)
工控威望: * 點(diǎn)
下載積分: * 分
在線時(shí)間: (小時(shí))
注冊時(shí)間: *
最后登錄: *
查看hsyyqq的 主題 / 回貼
4樓  發(fā)表于: 2011-05-04 17:53
圖片:
圖片:
好吧在完全不懂的情況下我自己摸索出來了 哈哈今天總算是把數(shù)據(jù)讀出來了 我在網(wǎng)上下了個(gè)樣例程序就是樓上的結(jié)果plc沒有返回 我又不懂調(diào)試vb這樣的程序 后來我想到一個(gè)解密用的串口工具 把讀取d123 開始的4位數(shù)據(jù)寄存器數(shù)據(jù) 指令格式是02h30h31h30h46h36h30h34h03h37h34h 結(jié)果發(fā)出去得到\STX64000000\ETX8D 中間那個(gè)64000000就是d123 d124 d125 d126的內(nèi)容了 我實(shí)現(xiàn)在plc里往d123寫入了k100其他就沒動(dòng)。后來我發(fā)現(xiàn)vb程序里是不是寫入失敗了就換了一種方式 不照抄 網(wǎng)上的樣例程序了,修改一下


  Private Sub Command1_Click()
Dim OutString(10) As Byte
Dim InString() As Byte
MSComm1.OutBufferCount = 0
MSComm1.InBufferCount = 0
OutString(0) = &H2
OutString(1) = &H30
OutString(2) = &H31
OutString(3) = &H30
OutString(4) = &H46
OutString(5) = &H36
OutString(6) = &H30
OutString(7) = &H34
OutString(8) = &H3
OutString(9) = &H37
OutString(10) = &H34
MSComm1.Output = OutString
Text1.Text = OutString
Do
  DoEvents
  Loop Until MSComm1.InBufferCount = 12
  InString = MSComm1.Input
  Text2.Text = InString
End Sub

Private Sub Form_Load()
MSComm1.CommPort = 3
MSComm1.Settings = "9600,e,7,1"
MSComm1.PortOpen = True
End Sub
寫進(jìn)去之后發(fā)現(xiàn)返回出來的數(shù)據(jù)跟我用串口工具調(diào)試的一樣 那么說成功了
本來很簡單的東西 不過我發(fā)現(xiàn)vb里數(shù)制什么的好多東西我都忘記了  搞不清楚現(xiàn)在 不過今天是老牛啃草 居然試出來了難道我跟美女聊一下天就有靈感了
另外求師傅一名 幫幫我

主站蜘蛛池模板: 成人在线网 | 超碰97在线资源 | 国产一区二区免费 | 激情无遮挡| 成人在线a | 丰满岳乱妇国产精品一区 | 午夜在线播放 | 日韩精品人妻中文字幕有码 | 日韩欧美123| 小草av| 草久在线 | 无码国产伦一区二区三区视频 | 精品黄网 | 国产性猛交普通话对白 | 91麻豆精品一二三区在线 | 久草成人网 | 一区二区免费 | 正在播放木下凛凛xv99 | 午夜影视大全 | 午夜影视av | 亚洲综合久久久 | 91一区在线 | 国产精品999在线观看 | 在线永久看片免费的视频 | 四虎tv| 日本视频久久 | 精品人伦一区二区三区蜜桃免费 | 午夜影视在线观看 | 国产a级片视频 | 国产黄色在线 | 欧美精品亚洲精品日韩精品 | 亚洲一区二区三区国产 | 天天射日日操 | 欧美激精品 | 国内av网站 | www.成人免费视频 | 四虎永久免费在线观看 | 午夜爽爽爽 | 黄色一级大片免费看 | 国产麻豆影视 | 毛片无码免费无码播放 | 免费看黄禁片 | 欧美精品一区二 | 欧亚成人av | 波多野结衣伦理 | 免费看黄av | 免费a网址 | 国产精品一区在线看 | 秋霞成人av | 国产情侣自拍av | 欧美三级a做爰在线观看 | 91av官网| 久久久社区 | 好吊一区二区三区 | 欧美一区二区不卡视频 | 欧美入口 | 粗大黑人巨茎大战欧美成人免费看 | 久久精工是国产品牌吗 | 日韩影视一区二区三区 | 免费看国产黄色片 | 国产精品三级电影 | 福利视频免费看 | 我不卡一区二区 | 91偷拍网 | 免费看黄色一级片 | 精品96久久久久久中文字幕无 | 亚洲色成人www永久网站 | 国产有码 | 亚洲精品久久久 | 国产99视频在线 | 日剧大尺度床戏做爰 | 日韩精品高清视频 | 久久久www成人免费无遮挡大片 | 一级片在线免费观看 | 国产又大又黄视频 | 丰满岳妇伦在线播放 | 尤物视频最新网址 | 一级片少妇 | 亚洲柠檬福利资源导航 | 久久久综合 | 欧美xxxxx性 免费看日产一区二区三区 黄色三级网络 | 丁香婷婷色| 欧美另类视频在线 | 国产h在线观看 | 国产亚洲精品成人av久久ww | 韩日精品视频 | 中国少妇乱子伦视频播放 | 日韩视频一区在线观看 | 免费av网站在线观看 | 欧美一级黄色大片 | 91精品国产91久久久久久黑人 | 丝袜熟女一区二区三区 | 欧美激情视频一区二区三区不卡 | 在线观看免费黄色 | 精品少妇爆乳无码av无码专区 | 无码人妻丰满熟妇精品区 | 白浆影院| 久久久久一级片 | 欧美一级一区 |