Dum sak kanske men läs av hela filen först och lägg in den data som redan finns i filen och sedan lägg till de andra 2 raderna.
Frågan#1
Hej ,
Jag undrar hur man får fso att skriva en ny rad i text filen istället för att skriva över det man lagt in innan.
Någont som vet ?
Dim log_start
log_start = now
Dim logfile, log
Const ForWriting = 2
Set logfile = CreateObject("Scripting.FileSystemObject")
Set log = logfile.OpenTextFile("log.txt", ForWriting, True)
Dim log_end
log_end = DateDiff("s", log_start, now)
log.WriteLine("Sucessfully imported 999 records in "&log_end&" secs")
log.WriteLine("-------------------------------------------")
log.Close
