Postada em 15/04/2009 10:30 hs
MsSerial.CommPort = COM1
MsSerial.Settings = "9600, N, 8, 1"
MsSerial.Handshaking = comRTSXOnXOff
MsSerial.PortOpen = True
MsSerial.Output = "1" & "2" & "1" & "1" & "000" & "0100" & "0100" & "texto" & Chr$(13)
MsSerial.Output = "E" & Chr$(13)
MsSerial.PortOpen = False
verifique no manual da impressora os demais comandos
|
