Check alle échte Black Friday-deals Ook zo moe van nepaanbiedingen? Wij laten alleen échte deals zien
Toon posts:

Printer probleem (vervolg van 2006)

Pagina: 1
Acties:

Verwijderd

Topicstarter
Hallo allemaal,

Eind 2006 was ik met een printer bezig zie topic :HELP ! ! ! VB 6.0 en RS-232 probleem ! ! !!

Het probleem was adequaat en snel verhlopen. Nu wil graag een variable (via een textbox) laten uitprinten.

Private Sub Command1_Click()
Dim tekst As String
tekst = Text1.Text
MSComm1.PortOpen = True
MSComm1.Output = "Q280,019" + Chr$(13) + Chr$(10)
MSComm1.Output = "q831" + Chr$(13) + Chr$(10)
MSComm1.Output = "rN" + Chr$(13) + Chr$(10)
MSComm1.Output = "S4" + Chr$(13) + Chr$(10)
MSComm1.Output = "D10" + Chr$(13) + Chr$(10)
MSComm1.Output = "ZT" + Chr$(13) + Chr$(10)
MSComm1.Output = "JB" + Chr$(13) + Chr$(10)
MSComm1.Output = "R175,0" + Chr$(13) + Chr$(10)
MSComm1.Output = "N" + Chr$(13) + Chr$(10)
MSComm1.Output = "B57,20,0,1,2,6,110,B," & tekst + Chr$(13) + Chr$(10)
MSComm1.Output = "P1" + Chr$(13) + Chr$(10)

MSComm1.PortOpen = False


End Sub

Nu doet de printer weer niets printen. Ook niet als ik als ik alles quote of anders dimensioneer. Het zal wel weer iets 'simpels' zijn, maar ik kom er maar niet achter. :'(

  • sam.vimes
  • Registratie: Januari 2007
  • Laatst online: 08-06 08:44
Zo te zien weer dezelfde fout als destijds: de quotes rond de tekst ontbreken.
Probeer eens de volgende regel
Visual Basic .NET:
1
MSComm1.Output = "B57,20,0,1,2,6,110,B," & tekst + Chr$(13) + Chr$(10)

te wijzigen in
Visual Basic .NET:
1
MSComm1.Output = "B57,20,0,1,2,6,110,B,"+chr$(34)+tekst+chr$(34)+Chr$(13)+Chr$(10)

chr$(34) is de code van een dubbele quote.

En ook weer dezelfde tips als vorige keer: schrijf de gegenereerde string naar een bestand in plaats van naar de com-poort en vergelijk met een hex-editor de gegenereerde tekst met een tekst die het wel doet.

Disclaimer: dit advies is gebaseerd op de oplossing van je vorige probleem. Ik heb geen kennis van de aansturing van de gebruikte printer. Het is best mogelijk dat de af te drukken tekst op een andere manier naar de printer gestuurd moet worden. Lees hiervoor in de handleiding van je printer welke aansturingscodes je moet gebruiken.

P.S. Zet volgende keer computercode even in een [ code ] blok.

[ Voor 3% gewijzigd door sam.vimes op 06-11-2009 08:48 . Reden: codeblokadvies ]


Verwijderd

Topicstarter
Beste Sam.vimes,

Je hebt gelijk. Maar ik ben een echte 'dummie' op het gebied van programmeren. Ik doe mijn best en probeer hier veel te leren door regelmatig door de topics te bladeren. Ben bijna 40 en dan gaat dit niet zo makkelijk meer.

Je oplossing is een schot in de roos en ik begrijp het principe erachter, maar was daar zelf nooit op gekomen.

Bedankt voor je hulp.