Skriv i gæstebogen, ingen fejlmelding og intet gemt i db ?
Hejsa igen igenSå er jeg tilbage med en ting, som nok bare er en lille dum fejl...
Jeg har en gæstebog, hvor oprettelsen ser således ud :
<!--#include file="conn.asp" -->
<%
Set rs = Server.CreateObject("ADODB.RecordSet")
strSQL = "SELECT * FROM gb"
rs.Open strSQL, Conn, 1, 3
if request("navn") = "" then
Response.Write("<font face='Verdana' size='1'>Dit navn mangler ?</font>")
end if
if request("email") = "" then
Response.Write("<font face='Verdana' size='1'>Din email mangler ?</font>")
end if
if request("besked") = "" then
Response.Write("<font face='Verdana' size='1'>Ingen besked ?????</font>")
end if
if navn <> "" AND email <> "" AND besked <> "" then
rs.AddNew
rs("navn") = Request.form("navn")
rs("email") = Request.form("email")
rs("hjemmeside") = Request.form("hjemmeside")
rs("hvordan") = Request.form("hvordan")
rs("besked") = Request.form("besked")
rs("dato") = FormatDateTime(Now, vbShortDate)
rs("ip") = Request.ServerVariables("REMOTE_ADDR")
rs.update
End if
Response.Write("<font face='Verdana' size='2'>MANGE TAK FOR DIN BESKED, DENNE ER OPRETTET I GÆSTEBOGEN !</font>")
Rs.Close
Conn.Close
%>
og Conn.asp sådan :
<%
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "PROVIDER=MSDASQL; UID=; PWD=;
DRIVER={Microsoft Access Driver (*.mdb)};DBQ=d:\web\localuser\pivskid.dk\database\pivskid.mdb"
%>
Men den kommer ikke med nogen fejlmelding, men lægger heller ikke noget ind i dben ?
