20. oktober 2001 - 16:54
Der er
8 kommentarer og 1 løsning
kun 1 af 2
<% Response.Buffer = True %> <% if request.querystring(\"action\") = \"save\" then Set Conn = Server.CreateObject(\"ADODB.Connection\") Conn.Open \"DRIVER={Microsoft Access Driver (*.mdb)};DBQ=\"&Server.Mappath(\"database.mdb\") conn.execute(\"insert into drop (dropout,vaerdi) values(\'\" & request.form(\"drop\") & \"\',\'\" & request.form(\"vaerdi\") & \"\')\") response.write(\"hej\") else %> <form action=\"indsat.asp?action=save\" method=\"post\"> Ip :<input type=\"text\" name=\"drop\"> <p> <input type=\"submit\" name=\"Indsæt\" Value=\"Indsæt\"> </form> <%end if%> </p> dette skal kun insætte en ting, den sætter 2 ind nu.
Annonceindlæg fra Deloitte
20. oktober 2001 - 16:59
#1
Lav det lidt om: <% Response.Buffer = True If Request.ServerVariables(\"REQUEST_METHOD\") = \"POST\" Then Set Conn = Server.CreateObject(\"ADODB.Connection\") Conn.Open \"DRIVER={Microsoft Access Driver (*.mdb)};DBQ=\"&Server.Mappath(\"database.mdb\") Conn.execute(\"insert into drop (dropout,vaerdi) values(\'\" & Request.form(\"drop\") & \"\',\'\" & Request.Form(\"vaerdi\") & \"\')\") Response.Write(\"hej\") Else %> <form action=\"indsat.asp\" method=\"post\"> Ip :<input type=\"text\" name=\"drop\"> <p> <input type=\"submit\" name=\"Indsæt\" Value=\"Indsæt\"> </form> <% End If %> </p>
20. oktober 2001 - 17:05
#5
<% Response.Buffer = True If Request.ServerVariables(\"REQUEST_METHOD\") = \"POST\" Then Set Conn = Server.CreateObject(\"ADODB.Connection\") Conn.Open \"DRIVER={Microsoft Access Driver (*.mdb)};DBQ=\"&Server.Mappath(\"database.mdb\") Conn.execute(\"insert into drop (dropout) values(\'\" & Request.form(\"drop\") & \"\')\") Else %> <form action=\"indsat.asp\" method=\"post\"> Ip :<input type=\"text\" name=\"drop\"> <p> <input type=\"submit\" name=\"Indsæt\" Value=\"Indsæt\"> </form> <% End If %> </p>