indsætte

<%
Set Conn = Server.CreateObject(\"ADODB.Connection\")
Conn.Open \"DRIVER={Microsoft Access Driver (*.mdb)};DBQ=\"&Server.mappath(\"db.mdb\")
set rs = Server.CreateObject(\"ADODB.Recordset\")
Sql = \"select * from tabel\"
rs.open sql, conn, 1, 3

rs.addnew
rs(\"felt\") = \"indhold\"
rs.update

rs.close
set rs = nothing
conn.close
set conn = nothing
%>

den har jeg prøvet, men hvis man ik skrive i et felt så skriver den fejl efter man har trykke på INDSÆT

Der er to måder (som jeg kender), med ADO, og med SQL.

Jeg bruger altid SQL, så den kan jeg i hovedet:

Set Con = Server.CreateObject(\"ADODB.Connection\")
Con.Open(ConnectionString)

Connectionstring skal indeholde de parametre som din opsætning kræver, og jeg antager at du allerede har det i orden

Con.Execute \"INSERT INTO Tabelnavn (Felt1, Felt2) VALUES (\'tester\', \'Tester igen\')\"

ADO skal jeg lige opfriske, vender tilbage

Con.Execute \"INSERT INTO Tabelnavn (Felt1, Felt2) VALUES (\'tester\', \'Tester igen\')\"

den her måde synes jeg lige er dårlige :(

men tak for hjælpen.....

Eh, der er ikke andre måder så vidt jeg ved..............?

Ok, det er fordi den ikke forstår eller accepterer, at du sætter ingenting ind i et felt. Dette gælder kun hvis værdien du vil indsætte er NULL.

Prøv dette:

Vaerdien = \"\"&Request.Form(\"feltnavn\")
rs.(\"felt\") = Vaerdien

Så sikrer du at det ikke er null, men \"\", det vil sige en tekststreng der består af ingen tegn der sættes ind, og det er ikke det samme.

Er det tekststrenge vi snakker om?

Hvad er en dårlig måde? Hvad bygger du det på, for 22 minutter kendte du INGEN måder. Og vi er ikke kvart færdige med at forklare det!

prøv lige at lave en lille eks.

bare man kan skrive et navn...

og læg scripten her...du behøver ik at lave en database osv...bare en lille eks tak :)

Con.Execute \"INSERT INTO Tabelnavn (Felt1, Felt2) VALUES (\'tester\', \'Tester igen\')\"


denne måde at indsætte i database...det er noget rode :)

okay -> Så brug min.

bjarke-b --> jeg bruger normalt din, men som sagt den viser fejl, hvis jeg ik skriver i nogen felter ?

okay -> Så sæt dine felter til at tillade null værdi i access -> design visning

også viser den ik ??

ok har lavet en lille eks. er det sådan ??

                  <% 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(\"xxxx.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\">Your Name:<br>
                      <input type=\"text\" name=\"navn\" size=\"20\" maxlength=\"255\" style=\"border: 1 solid #000000\">
      <br>
    </div>
    </font>
  </center>
</form>
                <% end if %>
                <% if mode =\"tilfojet\" then

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

Hvorfor det? Det er den eneste måde jeg bruger, for tiden, og det virker perfekt.

Du kan da ikke bare sige det \"lige er dårlige\" og \"noget rode\".

Forskellen på denne måde, via SQL, og den anden, via ADO, er at førstnævnte lægger noget mere af arbejdet over på databasen/ODBC-driveren. Det er en vældig god metode hvis databasen er en SQL-Server, jeg kan ikke udtale mig om hvor godt det er i forbindelse med Access (men det kan du sikkert).

Ulempen er, at du i nogle tilfælde vil være nødt til at lave et større antal kald til databasen.

En anden ulempe er at du er nødt til at lære et sprog mere, nemlig SQL, men det er du jo allerede i gang med, og da kernen i SQL består af kun 5-10 ord, er det faktisk ikke så slemt. Og udbyttet er stort.

den er ik sådan dårligt at bruge...

men den er rodet...når jeg bruger ADO metode så er der lidt orden :)

Min programmering er sat\'me ikke rodet(!), men det er ok at du hellere vil bruge den måde du er begyndt at lære.

Jeg forstår bare ikke hvorfor du spørger efter hvilken metode der er god at bruge, når det du vil vide er hvorfor du får en bestemt fejlmelding. Det kan man da hurtigt svare på, og det gør bjarke-b sikkert bedre end jeg.

det virker ik hvorfor ???

<% mode = request(\"mode\") %>
<%
Set Conn = Server.CreateObject(\"ADODB.Connection\")
Conn.Open \"DRIVER={Microsoft Access Driver (*.mdb)};DBQ=\"&Server.mappath(\"xx.mdb\")
set rs = Server.CreateObject(\"ADODB.Recordset\")
Sql = \"select * from ringetoner\"
rs.open sql, conn, 1, 3
%>
                  <% if mode =\"\" then %>
                <form action=\"tilfoj.asp?mode=tilfojet\" method=\"post\">
                  <center>
                    <font face=tahoma size=2>
                    <div align=\"center\">Your Name:<br>
                      <input type=\"text\" name=\"bruger\" size=\"20\" maxlength=\"255\" style=\"border: 1 solid #000000\">
      <br>
                      <br>
                      <input type=\"Submit\" value=\"Submit\" name=\"Submit\">
                      <input type=\"Reset\" value=\"Delete\" name=\"Reset\">
                      <br>
                    </div>
                    </font>
                  </center>
                  <br>
                </form>
               
<% end if %>
<% if mode =\"tilfojet\" then

      rs.AddNew
      rs(\"navn\") = Request.form(\"navn\")
      rs.Update
%>
Ringetonen er tilføjet, den mangler bare at blive godkendt af webmasteren. <a href=\"tilfoj.asp\">Tilbage
til forsiden</a>
<% end if %>

-Åben din database

-Se din tabel i design visning

-Find nede i felt egenskaber det sted der hedder \"TilladNullLængde\" og sæt det til ja

jeg har også lavet alle

STANDARDVÆRDI om til Null

gøre det noget ??

den skriver ik noget i min database, selvom der står at den er tilføjet ??

ups det virker..

tak for hjælpen