Jeg kan ikke få den til at virke når den skal "læse" info fra
formene og opdatere databasen.
Det er følg. kode der er problemer med:
<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("database/db.mdb")
Conn.Open DSN
strSQL = "Update Users set "
strSQL = strSQL & "Userid = '" & Request.Form("1") & "', "
strSQL = strSQL & "Password = '" & Request.Form("0") & "', "
strSQL = strSQL & "Rank = '" & Request.Form("2") & "', "
strSQL = strSQL & "Birthday = '" & Request.Form("3") & "', "
strSQL = strSQL & "City = '" & Request.Form("4") & "', "
strSQL = strSQL & "Comment = '" & Request.Form("5") & "', "
strSQL = strSQL & "CPU = '" & Request.Form("6") & "', "
strSQL = strSQL & "GFX = '" & Request.Form("7") & "', "
strSQL = strSQL & "Mouse = '" & Request.Form("8") & "', "
strSQL = strSQL & "Mousepad = '" & Request.Form("9") & "', "
strSQL = strSQL & "Headset = '" & Request.Form("10") & "', "
strSQL = strSQL & "Favweap = '" & Request.Form("11") & "', "
strSQL = strSQL & "Favmap = '" & Request.Form("12") & "', "
strSQL = strSQL & "Sensitivity = '" & Request.Form("13") & "', "
strSQL = strSQL & "Winsens = '" & Request.Form("14") & "', "
strSQL = strSQL & "Resolution = '" & Request.Form("15") & "', "
strSQL = strSQL & " Where ID = " & request.Querystring("user")
Conn.Execute(strSQL)
Conn.Close
Set Conn = Nothing
response.redirect ("setup.asp")
%>
Hvis nogen kan se fejlen så vær venlig at fortælle mig den.
--
Vil du lære at kode HTML, XHTML, CSS, SSI, ASP eller ASP.NET?
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! =>
http://www.html.dk/tutorials