auf RS 232 schreiben
Hallo,
möchte ein externes Gerät über COM1 ansprechen.
Über den Schnittstellenmotitor funktioniert es aber...
Ich möche das Ganze über VBS machen.
Zwar sendet mein Programm manchmal was aber nicht so wie ich das will.
Mit Sub SFD_WriteChannel( ChannelNumberP, ParamP, DataP, DoneP, ErrorP ) kann ich auf die vorher mit
Call SFDU_COMInit(oUDIM,"COM1,9600,N,8,1") geöffnete Schnittstelle schreiben.
Jetzt kann ich ja mit SFD_WriteChannel nicht den Input-Kanal lesen wie mit
Sub SFD_ProcessChannel( ChannelNumberP, InputListV, ParamP, DataP, ErrorP )
Ich muss jeweils auf Aktion der Schnittstelle einen String übergeben.
Dieser String kann fest im VBS deklariert werden text1 = "0GR500:XX"
Genauer gesagt sind es zwei Aktionen mit jeweils einen String.
Jetzt habe ich Versucht die internen Variablen text1 und text2 im MSR so zu setzen das ich im VBS die Aktionen auslöse - aber das funktioniert nicht so wie ich das meine.
Sub SFD_WriteChannel( ChannelNumberP, ParamP, DataP, DoneP, ErrorP )
if channelnumberP = 0 then
if L1 = 1 then
call oUDIM.Write(text1)
end if
if L2 = 1 then
call oUDIM.Write(text2)
end if
end if
end sub
|