set filesys = CreateObject("Scripting.FileSystemObject")
set readfile = filesys.OpenTextFile("c:\inetpub\wwwroot\text.txt",1, false)
while not readfile.atendofstream
response.write readfile.ReadLine & "\<br\>"
wend
readfile.close
Ej testat.
3 svar · 257 visningar · startad av strigge
Kan man välja hur många rader man vill visa med FileSystemObject om man har en text som sträcker sig över flera rader?
Sen har jag en fråga till. Jag har en annan textfil där det är mellanrum mellan raderna. När jag kör den visas bara texten fram till mellanrummet. Hur löser jag det?
set filesys = CreateObject("Scripting.FileSystemObject")
set readfile = filesys.OpenTextFile("c:\inetpub\wwwroot\text.txt",1, false)
while not readfile.atendofstream
response.write readfile.ReadLine & "\<br\>"
wend
readfile.close
Ej testat.
Välkommen till WF!
Antar att du får köra med object.ReadLine och sen loopa det antal rader du vill ha ut.
Söker du på fso AND text lär du hitta en massa här på forumet.
Du kan läsa en del på: http://www.devguru.com/Technologies/vbscript/quickref/textstream.html
Tills du hittar något bättre.
Sitter utan IIS...
while not readfile.atendofstream
e = e +1
striing = readfile.ReadLine
IF e < 4 THEN
response.write striing & "<br>" & e
END IF
wend
readfile.close