FSO læs txt fil og lav variabel af hver linje

Kan det lade sig gøre at åbne en txt fil og lave en variabel med hver linje?
Jeg har fundet dette, som læser en txt fil og nummerer hver linje inden det vises på skærmen

Set fs=Server.CreateObject("Scripting.FileSystemObject")
Set f=fs.OpenTextFile(Server.MapPath("fil.txt"), 1)

do while f.AtEndOfStream = false
Response.Write("Line:" & f.Line & " ")
Response.Write(f.ReadLine)
Response.Write("<br>")
loop

f.Close
Set f=Nothing
Set fs=Nothing


Det jeg gerne vil, fremfor at det står på skærmen, er at der laves en variabel med hver linje, så jeg altid kan få fat i data fra f.eks linje 3, f.eks for at bruge det i en split:
Split((linje3), ";")
Kan det lade sig gøre?
Jeg kan løse det ved at åbne txt filen og hente en bestemt linje, men det var for at ungå at åbne den samme fil 7 gange for at få fat i 7 linjer