Textfil igen

2 svar · 195 visningar · startad av aleborg 13 feb. 2002

aleborgMedlem sedan jan. 20013 341 inlägg

13 feb. 2002 16:18#1

Hur gör man för att lägga till text ÖVERST i en textfil?

        Set fsObj = CreateObject("Scripting.FileSystemObject")
        Set datFile = fsObj.openTextFile("d:\stats prog\analog 5.03\"& nyttnamn(0) &".cfg", 8)
			datFile.WriteLine("LOGFILE D:\www\"& vem &"\stats\W3SVC"& NewSiteID &"\ex*.log" & vbcrlf)
		datFile.Close
		Set datFile = Nothing
		Set fsObj = Nothing

Nu hamnar den längst ner, det ultimata vore på rad 3 men överst funkar också :e

------------------
Aleborg Solutions
Data-Doktorn
Min egen musik!
Mitt coverband

[Redigerat av aleborg den 13 feb 2002]

LarsGMedlem sedan dec. 200012 464 inlägg

13 feb. 2002 16:28#2

Du får skapa en ny fil. Läs 2 rader från gamla filen och skriv till den nya.
Skriv din rad och skriv resten av den gamla filen.

Sen så döper du om den nya filen till det gamla namnet.

------------------
essentitia preter non sans multiplicandum

aleborgMedlem sedan jan. 20013 341 inlägg

13 feb. 2002 17:43#3

tack, hade hoppats på att det skulle gå enklare, men men...

------------------
Aleborg Solutions
Data-Doktorn
Min egen musik!
Mitt coverband