title image


Smiley Re: Steuerung einer Kasse
Versuch mal so etwas:



Dim C As Integer

C = FreeFile()

Open "LPT1:" For Output As C

Print #C, Chr(7)

Close C




Gruß aus dem Norden

Reinhard


Bitte immer die Access-Version angeben


 



geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: