Indsæt data i access database
Hej,Jeg er stød på nogle problemer med at indsætte nogle data fre et array i min database! Jeg har i min database angivet alle felterne af type tekst på nær LevDato som er af type Dato. Og Notat er af type notat!
Jeg har valgt at benytte Spilt funktionen:
KODE KODE KODE KODE KODE KODE KODE KODE KODE
<%
Set Conn = Server.CreateObject(\"ADODB.Connection\")
Conn.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & Server.MapPath(\"db1.mdb\")
sVarer = Session(\"Varernavn\")
sAntal = Session(\"Antal\")
sFarve = Session(\"Farve\")
sVarenr = Session(\"Varenr\")
sLev = Session(\"LevDato\")
sKundeID = Session(\"KundeID\")
sOrdnr = Session(\"fnr\")
snotat = Session(\"Notat\")
arrVarerIKurven = Split(sVarer,\"<br>\")
arrAntalAfVaren = Split(sAntal,\"<br>\")
arrFarveAfVaren = Split(sFarve,\"<br>\")
arrVarenrAfVaren = Split(sVarenr,\"<br>\")
arrLevAfVaren = Split(sLevDato,\"<br>\")
arridenafkunden = Split(sKundeID,\"<br>\")
arrordrenummer = Split(sOrdnr,\"<br>\")
arrnotat = Split(snotat,\"<br>\")
for i = 1 to Ubound(arrVarerIKurven)
sSql = \"INSERT INTO Ordlin(Varenavn,Antal,Farve,Varenummer,KundeID,følgenr,LevDato,Notat) VALUES(\'\"& arrVarerIkurven(i) &\"\',\'\"& arrAntalAfVaren(i) &\"\',\'\"& arrFarveAfVaren(i) &\"\',\'\"& arrVarenrAfVaren(i) &\"\',\'\"& arridenafkunden(i) &\"\',\'\"& arrordrenummer(i) &\"\',\'\"& arrLevAfVaren(i) &\"\',\'\"& arrnotat(i) &\"\');\"
Conn.Execute sSql
next...
KODE KODE KODE KODE KODE KODE KODE KODE KODE
Der opstår ikke nogen fejl, men der kommer bare ikke noget data ind i databasen!