Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
Set objTS = objFSO.OpenTextFile(strang)
strText = objTS.ReadAll
objTS.Close : Set objTS = Nothing

I det här fallet läses alla rader inte från filen. Hur går jag till väga om jag endast vill läsa in exempelvis de 3 översta raderna? Någon som har en kodsnutt?

Se [Läs en textfil tecken för tecken] och ersätt Read(1) med bara Read så borde det bli rad för rad.