PRB: Die CopyFile-Methode für Drucker Gerätename mit Leerzeichen auf NT funktioniert nicht

Zum Anfang

Vorgehensweise: Beispiel

1. Auf einem Microsoft NT 4.0-System Hinzufügen eines Druckers mit einem Namen, der ein Leerzeichen enthält.
2. Erstellen Sie eine Textdatei im Ordner C:\, z. B. test.txt .
3. Starten Sie ein neues Standard EXE-Projekt in Visual Basic. Form1 wird standardmäßig erstellt.
4. Im Menü Projekt Wählen Sie Verweise , überprüfen Sie die Microsoft Scripting Runtime und klicken Sie auf OK .
5. Fügen Sie eine Befehlsschaltfläche zum Formular hinzu.
6. Fügen Sie folgenden Code in das Codefenster von Form1:

   Private Sub Command1_Click()
   Dim FSO as FileSystemObject
   set FSO = new FileSystemObject
   
   ' To print on WinNT
   FSO.CopyFile "C:\test.txt", Printer.DeviceName
   
   ' If the devicename is like this: \\servername\HPLaser400, the file prints
   ' If the devicename is \\servername\HP Laser 400, the above mentioned 
   ' run-time error occurs
   
   ' To print on Win9x
   ' FSO.CopyFile "C:\test.txt",Printer.Port
   End Sub
   					

7. Drücken Sie F5, um das Projekt auszuführen, und klicken Sie auf die Befehlsschaltfläche .
8. Die Datei test.txt wird gedruckt, ist der Gerätename ein Wort ohne Leerzeichen.
9. Alternativ können Sie APIs umgeht den Druckertreiber und Daten an den Drucker senden. Dies ist in Artikel dokumentiert Q154078 unten im Abschnitt "Informationsquellen" aufgeführt.

Zum Anfang