usb

23/04/2008 - 17:03 von Jörg Meier | Report spam
Hallo NG,

meine kleine Ansteuerung der USB Relaiskarte funzt irgendwie nicht. Mit dem
mitgelieferten VB Software kein Problem, aber wenn ich über vba aus dem
Modul raus schalten will, geht das nicht!!!

Sub relais30()
Dim c As Byte
Open "COM30:9600,8,n,1" For Output As #1
c = 128 + 5
Print #1, c
Sleep 200
Close #1
End Sub

Kann da jemand einen kleinen Denkanstoss geben?

Vielen Dank

Jörg
 

Lesen sie die antworten

#1 Henry Habermacher
23/04/2008 - 17:32 | Warnen spam
Hallo Jörg

VErsuch mal:

Open Com3 For Output AS #1

Die Einstellungen des Com Portes kannst Du über die Systemsteuerung
vornehmen. Das geht IIRC nicht über VBA.

Gruss
Henry

"Jörg Meier" wrote in message
news:%
Hallo NG,

meine kleine Ansteuerung der USB Relaiskarte funzt irgendwie nicht. Mit
dem mitgelieferten VB Software kein Problem, aber wenn ich über vba aus
dem Modul raus schalten will, geht das nicht!!!

Sub relais30()
Dim c As Byte
Open "COM30:9600,8,n,1" For Output As #1
c = 128 + 5
Print #1, c
Sleep 200
Close #1
End Sub

Kann da jemand einen kleinen Denkanstoss geben?

Vielen Dank

Jörg




Microsoft MVP Office Access
Keine E-Mails auf Postings in NGs. Danke.
Access FAQ www.donkarl.com

Ähnliche fragen