Hjælp til at dele en streng

Hej alle eksperter

Jeg indlæser en fil. Nu skal jeg bare finde ud af hvordan jeg får den delt op på den rigtige måde :-)


Det ser således ud:

"Jens","Hansen","48263595","JH"
"Bendt","Andersen","46253654","BA"


<%
Set fs=Server.CreateObject("Scripting.FileSystemObject")
Set f=fs.OpenTextFile(Server.MapPath("filer/aaa.txt"), 1)

a=1
b= "true"

do while f.AtEndOfStream = false and b="true"

temp  = f.ReadLine

temp1 = Mid(temp,1,2)

Response.Write(temp)
' Response.Write(temp1)
Response.Write("<br>")

    a=a+1
    if a=5 then
        b="false"
    end if

loop

f.Close
Set f=Nothing
Set fs=Nothing

%>

Det er hvad jeg har fået lavet indtil videre. Jeg skulle bare lige sikre mig at jeg kunne skrive de første X antal inier ud :-)