Indsæt data i databasen

Sqldato = \"insert into tabelnavn (feltnavn) values (\'\" & request.form(intastningsfeltnavn) & \"\')\"

Det virker:)

er det en eks *g*

husk det skal være på denne måde :o)

      rs.AddNew
      rs(\"bruger\") = Request.form(\"bruger\")
      rs(\"email\") = Request.form(\"email\")
      rs(\"navn\") = Request.form(\"navn\")

jamal@web-zone.dk

Email. sendt --> :)

øh...det var ik på denne måde :(

men på denne måde:

    <% mode = request(\"mode\") %>
                  <%
Const adOpenKeyset = 1
Const adLockOptimistic = 3
Set Conn = Server.CreateObject(\"ADODB.Connection\")
Conn.Open \"PROVIDER=MSDASQL;DRIVER={Microsoft Access Driver (*.mdb)};DBQ=\" & Server.MapPath(\"asi_arabisk.mdb\") & \";UID=admin;PWD=;\"

    Set rs = Server.CreateObject(\"ADODB.RecordSet\")
    strSQL = \"Select * From ringetoner\"
    rs.Open strSQL, Conn, adOpenKeyset, adLockOptimistic
%>
                  <% if mode =\"\" then %>
                <form action=\"etilfoj.asp?mode=tilfojet\" method=\"post\">
                  <center>
                    <font face=tahoma size=2>
                    <div align=\"center\">
      <p>Your Name:<br>
        <input type=\"text\" name=\"bruger\" size=\"20\" maxlength=\"255\" style=\"border: 1 solid #000000\">
      </p>
      <p>
        <input type=\"Submit\" value=\"Submit\" name=\"Submit\">
        <input type=\"Reset\" value=\"Delete\" name=\"Reset\">
        <br>
      </p>
    </div>
                    </font>
                  </center>
                  <br>
                </form>
               
<% end if %>
<% if mode =\"tilfojet\" then

      rs.AddNew
      rs(\"navn\") = Request.form(\"navn\")
      rs.Update
%>
<br>
<br>
<% end if %>

??

den måde, som du synes er smart! (og som er smart, hvis man har mange felter der skal opdateres eller fyldes ud, er meget simpel!)


strSQL = \"Insert into Navn (\"
strSQL = strSQL & \"navn1, \"
strSQL = strSQL & \"navn2, \"
strSQL = strSQL & \"navn3, \"
strSQL = strSQL & \"navn4\") \"

values

strSQL = strSQL & \"values( \"

strSQL = strSQL & \"\'\"& request.form(\"navn1\") &\"\', \"
strSQL = strSQL & \"\'\"& request.form(\"navn2\") &\"\', \"
strSQL = strSQL & \"\'\"& request.form(\"navn3\") &\"\', \"
strSQL = strSQL & \"\'\"& request.form(\"navn4\") &\"\')\"

det var så det (forhåbentligt!!)

men hvorfor virker det ik !! Den siger hele tiden \"SIDEN KUNNE IK FINDES :(\"

http://www.eksperten.dk/spm/973

madrich >> spm forstod jeg ik helt af :(

Det var bare ment som en kommentar, til at du hellere ville bruge \"addnew\",

Virker det script som jeg gav dig ikke???

nej...jeg bliver tosset...


\" Siden kan ikke vises \"

<%
response.buffer = true

if len(request.form(\"navn\")) > 0 then

\' Databaseforbindelse - husk at angive sti til din database
Set Conn = Server.CreateObject(\"ADODB.Connection\")
DSN = \"DRIVER={Microsoft Access Driver (*.mdb)}; \"
DSN = DSN & \"DBQ=\" & Server.MapPath (\"til_okay.mdb\")
Conn.Open DSN

strSQL = \"Insert into Navn (\"

strSQL = strSQL & \"navn, \"

strSQL = strSQL & \"values( \"

strSQL = strSQL & \"\'\"& request.form(\"navn\") &\"\', \"

\' SQL sætning eksekveres
Conn.Execute(SQL)

\' Luk databaseforbindelse
Conn.Close
Set Conn = Nothing
response.write \"data gemt\"

end if
%>

<html>
<title>Indsætte data i databasen</title>
<head>
</head>
<body>



<form action=\"test.asp\" method=\"post\">
<input type=\"text\" name=\"navn\">
<input type=\"submit\" value=\"Gem\">
</form>

</body>
</html>

Hvor har du lagt databasen???

hvad mener du ??

i samme map hvis det er det du mener ???

ok jeg har lavet det selv :o)