Database hjælp..

Nu kan der være mange ting som gør den ikke virker så det ville hjælp hvis du skrev hvilken fejl du får eller beskriver fejlen.


Men en ting når kodn som gemmer ligger i samme fil som formen skal man tjekke på om der er post'ed data til siden inden man indsætter i database så:

<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("/db/database.mdb")
Conn.Open DSN

strSQL = "Insert into personer (Fornavn) values('" & Request.Form("Fornavn") & "')"

Conn.Execute(strSQL)

Conn.Close
Set Conn = Nothing
%>




Bliver til dettte med en if sætning omkring:


<%
if Request.ServerVariables("SCRIPT_NAME") = "POST" then
  Set Conn = Server.CreateObject("ADODB.Connection")
  DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
  DSN = DSN & "DBQ=" & Server.MapPath("/db/database.mdb")
  Conn.Open DSN

  strSQL = "Insert into personer (Fornavn) values('" & Request.Form("Fornavn") & "')"

  Conn.Execute(strSQL)

  Conn.Close
  Set Conn = Nothing
end if
%>

eagleeye> Request.ServerVariables("SCRIPT_NAME") = "POST" ?
Mener du ikke Request.Servervariables("REQUEST_METHOD") = "POST" ..?

"SCRIPT_NAME" giver vel kun "/rod/mappe/side.asp"..?

/theSurfer

..og det ville nok være en god ide, at replace her:

values('" & replace(Request.Form("Fornavn"), "'", "''") & "')"

/theSurfer

doh.. jo det skal være "REQUEST_METHOD"  ;)

Hvordan ser hele koden ud?

Virker:P

ok ;)