|
ｿｽ@ｿｽｿｽｿｽVｿｽｿｽｿｽAｿｽｿｽｿｽﾅ転ｿｽｿｽｿｽｿｽｿｽ黷ｽｿｽfｿｽ[ｿｽ^ｿｽｿｽﾇみ趣ｿｽｿｽﾉは？
|
ｿｽgｿｽbｿｽvｿｽyｿｽ[ｿｽWｿｽｿｽ
ｿｽeｿｽｿｽｿｽｿｽﾌ過具ｿｽｿｽｿｽｿｽO
ｿｽEC/C++
ｿｽEDelphi
ｿｽEVisual BasicｿｽｿｽｿｽSｿｽｿｽ
ｿｽ@(VB2-VB6ｿｽｿｽ.NETｿｽｿｽｿｽp)
ｿｽEVisual Basic(VB2-VB6)
ｿｽEVisual Basic .NET
ｿｽEVisual C++
ｿｽﾖ連ｿｽTｿｽCｿｽg
ｿｽEpapy's softwarelibrary
ｿｽAｿｽJｿｽcｿｽL 2008/02/05(ｿｽｿｽ) 15:55:42
ｿｽﾍゑｿｽｿｽﾟまゑｿｽｿｽﾄ。ｿｽAｿｽJｿｽcｿｽLｿｽﾅゑｿｽｿｽB
vb6ｿｽﾅ、ｿｽVｿｽｿｽｿｽAｿｽｿｽ(RS-232C)ｿｽｿｽｿｽｿｽ`ｿｽｿｽｿｽｿｽｿｽ黷ｽｿｽfｿｽ[ｿｽ^ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽPGｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽB
ｿｽｿｽｿｽｿｽｿｽｿｽｿｽAｿｽｿｽｿｽpｿｽｿｽｿｽﾄゑｿｽｿｽｿｽpｿｽ¥ｿｽｿｽｿｽRｿｽｿｽｿｽｿｽRS-232Cｿｽﾌポｿｽ[ｿｽgｿｽｿｽｿｽﾈゑｿｽｿｽｿｽｿｽﾟ、RS-232CｿｽｿｽｿｽｿｽUSBｿｽVｿｽｿｽｿｽAｿｽｿｽｿｽﾏ奇ｿｽｿｽAｿｽ_ｿｽvｿｽ^ｿｽ[(USB-RSAQ5)ｿｽ利用ｿｽｿｽｿｽ驍ｱｿｽﾆになゑｿｽﾜゑｿｽｿｽｿｽｿｽB
ｿｽfｿｽ[ｿｽ^ｿｽｿｽｿｽｿｽ驍ｩｿｽﾇゑｿｽｿｽｿｽｿｽｿｽmｿｽFｿｽｿｽｿｽ驍ｽｿｽﾟ、ｿｽﾈ会ｿｽｿｽｿｽPGｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽB
Private Sub Form_Load()
MSComm1.CommPort = 4 'RS-232Cｿｽ|ｿｽ[ｿｽgｿｽﾔ搾ｿｽ
MSComm1.Settings = "19200,E,8,1"
MSComm1.InputLen = 0
MSComm1.InputMode = comInputModeText
MSComm1.InBufferCount = 0
End Sub
Private Sub Command2_Click()
If MSComm1.PortOpen = False Then
MSComm1.PortOpen = True
End If
If MSComm1.InBufferCount > 10 Then
Instring = MSComm1.Input
List1.AddItem Instring
End If
End Sub
ｿｽｿｽｿｽsｿｽｿｽｿｽｿｽｿｽｿｽAｿｽｿｽｿｽﾂゑｿｽ
ｿｽｿｽｿｽsｿｽｿｽｿｽGｿｽｿｽｿｽ[ｿｽF8020
ｿｽﾊ信ｿｽfｿｽoｿｽCｿｽXｿｽﾌ読み趣ｿｽ闔橸ｿｽﾉエｿｽｿｽｿｽ[ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽB
ｿｽﾌエｿｽｿｽｿｽ[ｿｽｿｽｿｽbｿｽZｿｽ[ｿｽWｿｽｿｽｿｽ¥ｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽB
debugｿｽｿｽｿｽｿｽﾆ、
Instring = MSComm1.Input
ｿｽﾌとゑｿｽｿｽAｿｽGｿｽｿｽｿｽ[ｿｽｿｽｿｽｿｽｿｽｿｽ
MSComm1.Settings = "19200,E,8,1"ｿｽﾌ値ｿｽｿｽｿｽｿｽｿｽいｿｽｿｽﾏゑｿｽｿｽｿｽｿｽ
ｿｽeｿｽXｿｽgｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽｿｽｿｽAｿｽGｿｽｿｽｿｽ[ｿｽｿｽｿｽｿｽｿｽｿｽﾅゑｿｽｿｽﾜゑｿｽｿｽｿｽﾅゑｿｽｿｽｿｽｿｽB
ｿｽﾇなゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽAｿｽCｿｽfｿｽBｿｽAｿｽｿｽｿｽｿｽｿｽｿｽﾎ、ｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽ謔､ｿｽﾉゑｿｽｿｽ閧｢ｿｽｿｽｿｽﾜゑｿｽｿｽB
ｿｽAｿｽJｿｽcｿｽL 2008/02/05(ｿｽｿｽ) 16:04:22
ｿｽﾇ記ｿｽF
RS-232Cｿｽ|ｿｽ[ｿｽgｿｽｿｽｿｽｿｽｿｽｿｽpｿｽ¥ｿｽRｿｽｿｽｿｽﾉ、ｿｽfｿｽ[ｿｽ^ｿｽｿｽｿｽｿｽｿｽﾈゑｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽｿｽｿｽA
ｿｽVｿｽｿｽｿｽｿｽｿｽpｿｽ¥ｿｽRｿｽｿｽｿｽﾉ変ゑｿｽｿｽｿｽﾄ、ｿｽfｿｽ[ｿｽ^ｿｽｿｽｿｽｿｽｿｽﾈゑｿｽｿｽﾈゑｿｽﾜゑｿｽｿｽｿｽｿｽB
USBｿｽVｿｽｿｽｿｽAｿｽｿｽｿｽﾏ奇ｿｽｿｽAｿｽ_ｿｽvｿｽ^ｿｽ[ｿｽﾌデｿｽoｿｽCｿｽXｿｽｿｽｿｽ皷橸ｿｽｿｽｿｽﾈゑｿｽｿｽCｿｽｿｽｿｽXｿｽgｿｽ[ｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽB
ｿｽAｿｽJｿｽcｿｽL 2008/02/05(ｿｽｿｽ) 16:07:37
ｿｽｿｽｿｽﾝまゑｿｽｿｽｿｽBｿｽｿｽｿｽｿｽ@ｿｽ`ｿｽFｿｽbｿｽNｿｽ{ｿｽbｿｽNｿｽXｿｽｿｽﾔ違えｿｽﾄチｿｽFｿｽbｿｽNｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽBｿｽｿｽｿｽｿｽｿｽ除ｿｽｿｽｿｽﾄゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽBｿｽﾜゑｿｽｿｽ@ｿｽｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽｿｽBｿｽｿｽｿｽ閧｢ｿｽｿｽｿｽﾜゑｿｽｿｽB
ｿｽ范ｴｿｽ@ 2008/02/05(ｿｽｿｽ) 17:18:06
>MSComm1.Settings = "19200,E,8,1"
ｿｽｿｽｿｽﾌ「Eｿｽvｿｽﾍ撰ｿｽｿｽｿｽｿｽｿｽｿｽﾅゑｿｽｿｽｿｽｿｽH
ｿｽｿｽｿｽﾊはノｿｽｿｽｿｽpｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽだゑｿｽｿｽﾇ。
ｿｽAｿｽJｿｽcｿｽL 2008/02/05(ｿｽｿｽ) 17:40:13
ｿｽ范ｴｿｽ@ｿｽｿｽｿｽｿｽAｿｽｿｽｿｽﾔ難ｿｽｿｽｿｽｿｽ閧ｪｿｽﾆゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽB
ｿｽｿｽｿｽｿｽﾍ、EｿｽﾆゑｿｽｿｽANｿｽﾆゑｿｽｿｽAOｿｽﾆゑｿｽｿｽAｿｽﾏ奇ｿｽｿｽｿｽｿｽﾄゑｿｽAｿｽｿｽ閧ｪｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽﾅゑｿｽｿｽｿｽｿｽB
ｿｽﾜゑｿｽｿｽAｿｽeｿｽXｿｽgｿｽrｿｽｿｽｿｽAｿｽVｿｽｿｽｿｽｿｽｿｽGｿｽｿｽｿｽ[ｿｽｿｽｿｽbｿｽZｿｽ[ｿｽWｿｽｿｽｿｽoｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽｿｽｿｽB
comEventFrame 1004 ｿｽtｿｽｿｽｿｽ[ｿｽｿｽ ｿｽGｿｽｿｽｿｽ[ｿｽﾅゑｿｽｿｽBｿｽnｿｽ[ｿｽhｿｽEｿｽFｿｽAｿｽﾉゑｿｽｿｽｿｽﾄフｿｽｿｽｿｽ[ｿｽｿｽ ｿｽGｿｽｿｽｿｽ[ｿｽｿｽｿｽｿｽｿｽoｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽB
ｿｽｿｽｿｽｿｽﾍ、ｿｽｿｽﾌ的ｿｽﾉ、ｿｽﾇゑｿｽﾈ意厄ｿｽｿｽﾅゑｿｽｿｽ蛯､ｿｽｿｽｿｽBｿｽｿｽしｿｽｿｽｿｽｿｽｿｽ閧｢ｿｽｿｽｿｽﾜゑｿｽｿｽB
ｿｽ范ｴｿｽ@ 2008/02/05(ｿｽｿｽ) 18:55:00
>ｿｽｿｽｿｽｿｽﾍ、EｿｽﾆゑｿｽｿｽANｿｽﾆゑｿｽｿｽAOｿｽﾆゑｿｽｿｽAｿｽﾏ奇ｿｽｿｽｿｽｿｽﾄゑｿｽAｿｽｿｽ閧ｪｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽﾅゑｿｽｿｽｿｽｿｽB
ｿｽｿｽｿｽｿｽﾈ暦ｿｽｿｽ¥ｿｽｿｽ(ｿｽｿｽ)ｿｽAｿｽpｿｽｿｽｿｽeｿｽBｿｽﾍ托ｿｽｿｽｿｽﾌ機ｿｽｿｽﾆ搾ｿｽｿｽせｿｽﾄゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽB
ｿｽPｿｽ[ｿｽuｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾈゑｿｽﾄ趣ｿｽｿｽﾍなゑｿｽｿｽｿｽﾋ。
ｿｽRｿｽlｿｽNｿｽ^ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾄゑｿｽﾆゑｿｽｿｽAｿｽtｿｽｿｽｿｽ[ｿｽｿｽ ｿｽGｿｽｿｽｿｽ[ｿｽｿｽｿｽﾄのはゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽ
ｿｽｿｽｿｽxｿｽｿｽｿｽﾌ話ｿｽﾅゑｿｽｿｽB
ｿｽｿｽｿｽｿｽｿｽﾌ機ｿｽｿｽﾌ設定がｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽﾄ、ｿｽtｿｽｿｽｿｽ[ｿｽｿｽｿｽGｿｽｿｽｿｽ[ｿｽｿｽｿｽoｿｽｿｽﾌでゑｿｽｿｽｿｽｿｽｿｽA
ｿｽnｿｽ[ｿｽhｿｽEｿｽFｿｽAｿｽ[ｿｽﾌ厄ｿｽｿｽﾅゑｿｽｿｽｿｽB
ｿｽAｿｽJｿｽcｿｽL 2008/02/06(ｿｽｿｽ) 14:31:56
ｿｽ范ｴｿｽ@ｿｽｿｽｿｽｿｽAｿｽｿｽｿｽﾔ難ｿｽｿｽｿｽｿｽ閧ｪｿｽﾆゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽB
ｿｽﾈ前ｿｽﾌマｿｽVｿｽｿｽｿｽﾅ、MSComm1.Settings = "19200,E,8,1"ｿｽ@ｿｽﾅ、ｿｽｿｽｿｽﾈゑｿｽｿｽfｿｽ[ｿｽ^ｿｽｿｽﾇみ趣ｿｽｿｽﾜゑｿｽｿｽｿｽｿｽB
ｿｽｿｽｿｽｿｽﾍパｿｽ¥ｿｽRｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾏゑｿｽｿｽｿｽｿｽｿｽﾈので、ｿｽｿｽｿｽﾌ設抵ｿｽﾅ、ｿｽｿｽｿｽﾈゑｿｽｿｽfｿｽ[ｿｽ^ｿｽｿｽｿｽｿｽｿｽﾆ思ｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽB
>ｿｽｿｽｿｽｿｽｿｽﾌ機ｿｽｿｽﾌ設定がｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽﾄ。ｿｽBｿｽB
ｿｽpｿｽ¥ｿｽRｿｽｿｽｿｽﾌ設定だｿｽｿｽｿｽｿｽｿｽｿｽAｿｽﾇゑｿｽｿｽﾅ設定しｿｽｿｽｿｽ轤｢ｿｽｿｽｿｽﾌでゑｿｽｿｽ蛯､ｿｽｿｽｿｽB
MODEｿｽ@COMxｿｽ@ｿｽﾅ設定すｿｽ驍ｱｿｽﾆでゑｿｽｿｽ蛯､ｿｽｿｽｿｽB
ｿｽｿｽxｿｽ@MODEｿｽ@COMxｿｽ@ｿｽRｿｽ}ｿｽｿｽｿｽhｿｽﾅ趣ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽAｿｽｿｽ閧ｪｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽﾅゑｿｽｿｽｿｽｿｽB
ｿｽｿｽｿｽﾔ難ｿｽｿｽｿｽﾜゑｿｽｿｽｿｽしｿｽｿｽｿｽｿｽｿｽ閧｢ｿｽｿｽｿｽﾜゑｿｽｿｽB
