vbs und textfiles (Programmierung / Office/VBasic / vb.net / vbs / wsh)


	Online-Kurs: Grundlagen des 3D-Druck-Designs für Industrieingenieure , ein Kurs Meldungen abonnieren
Autor	Thema: vbs und textfiles (657 mal gelesen)
Axel.Strasser Ehrenmitglied V.I.P. h.c. Selbstständig im Bereich PLM/CAx Beiträge: 4107 Registriert: 12.03.2001 Früher war vieles gut, und das wäre es heute immer noch, wenn man die Finger davon gelassen hätte!	erstellt am: 29. Jan. 2010 14:30 <-- editieren / zitieren --> Unities abgeben: Bei einer Installation erzeuge ich ein Textfile, dieses kann ich unter Windows ohne Probleme anschauen. Jetzt versuche ich diese Textfile mit vbs zu öffnen und auszuwerten: Code: set LogFile = fso.OpenTextFile(LogFileName, 1) strText = LogFile.ReadAll LogFile.Close msgbox strText Ich habe es auch noch anders versucht zu lesen: Code: set LogFile = fso.OpenTextFile(LogFileName, 1) Do While Logfile.AtEndOfLine <> True msgbox LogFile.ReadLine loop In beiden Fällen bekomme ich aber kein brauchbares Ergebnis: (siehe Anhang) Es ist kein Text mehr. Woran kann das liegen bzw wie kann ich das beheben? Es sieht irgendwie so aus als ob es kein Streamtext File wäre. Axel ------------------ Inoffizielle deutsche CATIA Hilfeseite Netiquette von cad.de Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP
bst Mitglied Beiträge: 192 Registriert: 31.08.2004	erstellt am: 30. Jan. 2010 11:42 <-- editieren / zitieren --> Unities abgeben: Nur für Axel.Strasser Hi Axel, Du hast da eine Unicodedatei. Öffne die mal via: set LogFile = fso.OpenTextFile(LogFileName, 1, False, -1) siehe: http://de.wikipedia.org/wiki/Byte_Order_Mark http://msdn.microsoft.com/en-us/library/314cz14s(VS.85).aspx HTH, Bernd Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP
Axel.Strasser Ehrenmitglied V.I.P. h.c. Selbstständig im Bereich PLM/CAx Beiträge: 4107 Registriert: 12.03.2001 Früher war vieles gut, und das wäre es heute immer noch, wenn man die Finger davon gelassen hätte!	erstellt am: 30. Jan. 2010 15:45 <-- editieren / zitieren --> Unities abgeben: Super, das war es Axel ------------------ Inoffizielle deutsche CATIA Hilfeseite Netiquette von cad.de Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

Anzeige.:
X

Anzeige: (Infos zum Werbeplatz >>)