🚀 go-pugleaf

Hallo,

Weet iemand raad voor volgend probleem?

Ik heb een Unicode file en wil de inhoud ervan lijn per lijn inlezen, soms
een woord in vervangen, en deze al dan niet aangepaste lijn wegschrijven in
een andere file. Dit wordt dus een soort kopie met een aantal andere waarden
in.

Ik open deze file for input (Open Pathread For Input As #1)
Ik open een andere file for output (Open Pathwrite For Output As #2)
Ik lees een regel in uit de eerste file (Line Input #1, TextLine)
En ik schrijf deze regel weg in een tweede file (Print #2, TextLine) of
(Print #2, TextLineMod)

Voor het eventuele aanpassen van de Textline tot een TextLineMod gebruik ik
stringfuncties.

vb:    If  InStr(1, TextLine, "TEST") Then

vb:    TextlineMod = First & Waarde & Last

Alle VB werd geprogrammeerd vanuit excel omdat daar een lijstje staat met
vervangwaarden.

Dit werkt perfect, het resultaat is dat de tweede file een copie bevat van
de inhoud van de eerste, maar de bestandsgrootte is gehalveerd en deze file
is ook geen unicode file niet meer.

Weet iemand hoe ik er kan voor zorgen dat in dit geval de tweede file een
Unicode file wordt?
Alvast bedankt voor de info ;-)