Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

Codepage beim Drucken auf den Druckerport

Frage Entwicklung VB for Applications

Mitglied: 70324

70324 (Level 1)

26.03.2009, aktualisiert 15:13 Uhr, 6009 Aufrufe, 3 Kommentare

Hallo zusammen,

bin ein Neuling was Postings in einem Forum betrifft, deshalb Bitte um etwas Nachsicht.

Ausgangssituation:
Ich habe einen IBM-4610-TF6 Kassabondrucker und möchte per VB6 dirket uber die COM-Schnittstelle einen Kassabon drucken.

Mein Problem ist nun aber das die Umlaute und Sonderzeichen nicht korrekt ausgedruckt werden.
Ich habe schon in den entsprechenden IBM-Handbuch des Druckers gesucht leider ohne Erfolg.

Kann mir jemand einen Tipp geben?

Anbei ein Codechnipsel zur Veranschaulichung:
__________________________________________________________
Private Function test_druck_Ibm_Bon()

Dim CR, CODE_PAGE, FA, PC As String

With frmMain.MSComm
.CommPort = Val(Right(Port, 1))
.Settings = "9600,N,8,1"
.PortOpen = True
.PortOpen = False
End With

CR = Chr$(1)
CODE_PAGE = Chr$(27) & Chr$(116) & Chr(1)
FA = Chr$(27) + Chr$(207) + Chr$(0)
PC = Chr$(12)

Open Port For Output As #1
Print #1, CODE_PAGE
Print #1, FA
Print #1, " Wir Danken für Ihren Einkauf"; CR
Print #1, " Umtausch nur gegen Vorlage des"; CR
Print #1, " K a s s a b o n innerhalb"; CR
Print #1, " eines Monates möglich!"; CR
Close #1

End Function
__________________________________________________________
Mitglied: AndreasHoster
27.03.2009 um 09:13 Uhr
Bist Du Dir auch sicher, daß die Strings in Deinem Programm in Codepage 858 vorliegen?
Ich würde mal versuchen die Umlaute direkt im richtigen Hexcode zu übermitteln, also statt ö Chr$(148) etc. verwenden. Dann sieht man, ob der Drucker es falsch versteht, oder ob die Byte Representation der Characters in Deinem Programm nicht passt.
Bitte warten ..
Mitglied: 70324
27.03.2009 um 10:32 Uhr
Hallo,

habe deinen Tip getestet und hat auch sofort geklappt. Gibt es eine Möglichkeit die Codepage auf 858 im VB-Programm zu ändern, damit ich nicht alle Strings mit Replace austauschen muß?
Danke
Bitte warten ..
Mitglied: AndreasHoster
27.03.2009 um 14:03 Uhr
Ich habe keine Ahnung, wie man in VB dafür sorgt, daß der Quelltext in einer bestimmten Codepage ist. Wenn das überhaupt geht.
Sorry.
Bitte warten ..
Neuester Wissensbeitrag
Windows 10

Sticky Notes - Autostart unterbinden

Tipp von Pedant zum Thema Windows 10 ...

Ähnliche Inhalte
Windows Netzwerk
Remote Drucken an einem 3. Standort (4)

Frage von joeyschweiz zum Thema Windows Netzwerk ...

Windows Netzwerk
Drucken über VPN Tunnel langsam (3)

Frage von oellad zum Thema Windows Netzwerk ...

Netzwerkmanagement
Drucken über WLAN bei unterschiedlichen IP Bereichen (3)

Frage von AranankA zum Thema Netzwerkmanagement ...

Heiß diskutierte Inhalte
Batch & Shell
gelöst Base64 Decode (Batch,VBS) (26)

Frage von clragon zum Thema Batch & Shell ...

Flatrates
DeutschlandLAN der Telekom - welche internen IPs? (19)

Frage von qualidat zum Thema Flatrates ...