Er der nogen der kan finde fejlen i denne kode?
<%
'Databaseforbindelse
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("morann.mdb")
Conn.Open DSN
'Indsættelse af data
strSQL = "Insert into Hiphop ("
strSQL = strSQL & "Nr, "
strSQL = strSQL & "Kategori, "
strSQL = strSQL & "Alder, "
strSQL = strSQL & "Tid, "
strSQL = strSQL & "Dag, "
strSQL = strSQL & "1_gang) "
strSQL = strSQL & "values( "
'Hentning af Form data
strSQL = strSQL & "' & Request.Form("Nr") & ', "
strSQL = strSQL & "' & Request.Form("Kategori") & ', "
strSQL = strSQL & "' & Request.Form("Alder") & ', "
strSQL = strSQL & "' & Request.Form("Tid") & ', "
strSQL = strSQL & "' & Request.Form("Dag") & ', "
strSQL = strSQL & "' & Request.Form("1_gang") & ') "
'Lukning af database
Conn.Execute(strSQL)
Conn.Close
Set Conn = Nothing
%>
Jeg har prøvet alt, men det eneste jeg får ud af det er denne besked:
"Der opstod en Microsoft VBScript-kompileringsfejl fejl '800a0401'
Slut på sætning var ventet
/morann/resultat.asp, linje 49
strSQL = strSQL & "' & Request.Form("Nr") & ', "
-------------------------------------^"
Håber nogen kan hjælpe
På forhånd tak
Danny Krøger
|