Opdater tabel fra CSV fil der er uploadet

Hvilken del mangler du hjælp til ? Upload, læsning af fil og insert i databasen eller ?

Det er Læsning af fil, formentligt til et array og derefter en opdateringsrutine.
mvh
Mark

Vi kan starte med indlæsning af filen. Dette eksempel læser en tekstfil, testread.txt linie for linie:

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

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

f.Close
Set f=Nothing
Set fs=Nothing
-----------------------------
Derefter kan vi udvide den med indlæsning af linien i et array via. split funktionen:

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

do while f.AtEndOfStream = false

MyArray = Split(f.ReadLine, \",\", 2)

loop

f.Close
Set f=Nothing
Set fs=Nothing

Ovenfor indlæses 2 felter, defineret som kommaseparerede felter i linien. Kan udskiftes med -1 for at læse alle felter i en linie
-------------------------------
Og endeligt kan vi danne en SQL streng, som kan bruges til opdatering af databasen:

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

do while f.AtEndOfStream = false

MyArray = Split(f.ReadLine, \",\", 2)

strSQL = \"INSERT INTO Tabel VALUES(\"
strSQL = strSQL & \"\'\" & MyArray(0) & \"\', \"
strSQL = strSQL & MyArray(1)
strSQL = strSQL & \")\"

loop

f.Close
Set f=Nothing
Set fs=Nothing

Hvis vi antager at du har disse 2 felter i filen

Tekst, Tal

så vil strSQL indeholde \"INSERT INTO Tabel VALUES(\'Tekst\', Tal)\"

Håber dette kan hjælpe dig videre :-)