charmeur
Goto Top

Schleife in txt schreiben

hallo ihr ich hab da noch mal ein kleine frage
und zwar habe ich den folgenden code
Set fso = CreateObject("Scripting.FileSystemObject")   
Set oFile = fso.OpenTextFile((arrLines(89)),8,true) 

oFile.WriteLine arrLines(93)
oFile.WriteLine arrLines(94)
oFile.WriteLine arrLines(95)
oFile.WriteLine arrLines(96)

oFile.close

ist es möglich die zeilen "oFile.WriteLine arrLines(93)" in eine art schleife zu bekommen?
also das ich

oFile.WriteLine arrLines(93) - oFile.WriteLine arrLines(96)

angebe

Content-Key: 171466

Url: https://administrator.de/contentid/171466

Printed on: April 18, 2024 at 16:04 o'clock

Member: rubberman
rubberman Aug 14, 2011 at 14:46:19 (UTC)
Goto Top
Hallo charmeur.

For i = 93 To 96
  oFile.WriteLine arrLines(i)
Next

Grüße
rubberman
Member: charmeur
charmeur Aug 14, 2011 at 14:55:39 (UTC)
Goto Top
super vielen lieben dank das hat ja wie immer funktioniert