textfil

Jag har en textfil där varje rad har två ord separerade med komma tecken.

För varje rad vil jag ta och lägga in första ordet i en kolumn i en databas och andra ordet i en annan kolumn.

Jag har inte fått riktigt koll på hur man hanterar textfiler än. Nån som vill hjälpa till?

------------------
Data-Doktorn
Min egen musik!
Mitt coverband

<%Fil = Server.MapPath("\mappen på servern") & "\filen"%>
<%Set TxtObj = Server.CreateObject("Scripting.FileSystemObject")%>
<%Set fFil = TxtObj.OpenTextFile(Fil,1,true)%>
<%variabel = fFil.ReadLine%>
-----------------------------------------------------------------
<%Fil = Server.MapPath("\mappen på servern") & "\filen"%>
<%Set TxtObj = Server.CreateObject("Scripting.FileSystemObject")%>
<%Set fFil = TxtObj.OpenTextFile(Fil,2,true)%>
<%fFil.WriteLine variabel %>
-----------------------------------------------------------------

true betyder att du skapar filen om den inte finns
fil är sökväg til filen på servern

(Fil,1,true) öppna fil för läsning
(Fil,2,true) öppna fil för skriva över
(Fil,8,true) öppna fil för skriv vidare

ReadAll = läser in hela filen i en variabel
ReadLine = läser in raden
Read = läser ett tecken åt gången

sedan kan du väl konkatinera med len

Tack,
Jag vet hur man öppnar men inte hur man går igenom rad för rad och plockar ut värden som är komma separerade

------------------
Data-Doktorn
Min egen musik!
Mitt coverband

<%
Fil = Server.MapPath("\mapp") & "\fil"
Set TxtObj = Server.CreateObject("Scripting.FileSystemObject")

Set fFil = TxtObj.OpenTextFile(Fil,1,true)
while not fFil.atEndOfStream
arrVar = split(fFil.ReadLine,",")
sql = "insert into t(c1,c2) values " & _
"('" & arrVar(0)& "','" & arrVar(1) & "')"
connect.execute sql
wend

T.ex. om du har text-kolumner i tabellen.

------------------
essentitia preter non sans multiplicandum

Ahhh, då hänger jag med, tack LarsG, du e en klippa :)

------------------
Data-Doktorn
Min egen musik!
Mitt coverband