2016-10-11 2 views
-1

Ich brauche eine Textdatei und kopieren Sie in anderer Datei zu lesen, aber einige Zeilen enthalten ASCII nicht druckbare Codes als NUL, ETX, SOH usw.liest Zeichenfolge mit ASCII

I ReadLine in diesem Code verwenden, kopieren Datei und alle Zeilen werden kopiert, aber keine ASCII-Zeile. Es gibt eine Möglichkeit, auch diese Zeile zu kopieren?

Set file = fso.GetFile(FileNameIn) 

Set OutFile = fso.CreateTextFile(FileNameOut, True) 
Set ts = file.OpenAsTextStream(1, -2) 

Do Until ts.AtEndOfStream 
    strLine = ts.ReadLine 
    OutFile.WriteLine(strLine) 
Loop 
+0

Klingt für mich wie Sie eine Binärdatei haben, keine ASCII-Datei. Wenn das der Fall ist, lesen Sie [diese Frage] (http://StackOverflow.com/q/6060529/1630171) zum Umgang mit Binärdateien in VBScript. –

+0

BTW, dumme Frage: Warum kopierst du nicht einfach (https://msdn.microsoft.com/en-us/library/e1wf9e7w%28v=vs.84%29.aspx) die Datei, da du anscheinend Willst du das nicht ändern? –

+0

Weil ich es ändern möchte. Ich muss einige Saiten mit anderen ersetzen, und das Ersetzen funktioniert perfekt. Aber wenn ich die BITMAP-Zeichenfolge bekomme, bekomme ich Fehler 5 – Vardar

Antwort

0

Klingt so, als müssten Sie beim Öffnen der Datei den ASCII-Format-Parameter angeben (ohne Systemstandards -2).

Set ts = file.OpenAsTextStream(1,0) 

Check für vollständige Referenz aus:

MSDN: OpenTextFile Method

MSDN: CreateTextFile Method

Weglassen Unicode-Parameter in der Ausgabedatei sollte in Ordnung sein - seine ASCII angenommen.

+0

Nicht funktionieren .... meine ASCII-Zeichenfolge ist ein Bitmap-Code. Wenn ich versuche, diese Zeile zu lesen und zu schreiben Vbscript Fehler 5. – Vardar

+0

sieht aus wie @Lankymart Post ist korrekt - Öffnen der Datei mit allen Parametern angegeben - OpenTextFile (FileNameIn, 1, False, 0) –

+0

Nein ... ich versuche OpenTextFile (FileNameIn, 1, False, 0) zum Lesen und OpenTextFile (FileNameOut, 2, False, 0) zum Schreiben, aber immer hatte ich einen Fehler 5 - Ungültiger Prozeduraufruf oder Argument beim Schreiben dieser Zeile: BITMAP 187,62, 10.544,1,} ÷ ß} ÷ ß} ÷ ß} ÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿ ÷ ß} ÷ ß} ÷ ß} ÿÿÿÿÿÿÿÿ÷? ?ÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿ} ÷ ß} ÿÿÿÿÿÿÿÿ ß} ÿÿÿÿÿÿÿÿ ß} ÷ ß} ÷ ß} ÷ ß} ÿÿÿÿÿÿÿ ÿÿÿÿÿÿÿ ÿÿÿÿÿÿÿ ÿÿÿÿÿÿÿ ÿÿÿÿÿÿÿ ÿÿÿÿÿÿÿ ÿÿÿÿÿÿÿ}???????????????????? ÿÿ | – Vardar

Verwandte Themen