Problemer med nyt felt i Access DB - ASP

HER ER KODEN

<%
If Request.Form("new") <> "" Then

Const adOpenKeyset = 1
Const adLockOptimistic = 3

set conn = server.createobject("ADODB.Connection")
conn.open "DBQ=denkomplettesti.mdb;Driver={Microsoft Access Driver (*.mdb)};"

    strurl = Request.Form("url")
    strtext = Request.Form("text")
    strpicurl = Request.Form("picurl")
    strart1 = Request.Form("art1")
    strart2 = Request.Form("art2")
    strart3 = Request.Form("art3")
    strart4 = Request.Form("art4")
    strart5 = Request.Form("art5")
    strart6 = Request.Form("art6")
    strart7 = Request.Form("art7")
    strart8 = Request.Form("art8")
    strart9 = Request.Form("art9")
    strart10 = Request.Form("art10")
   
        Set rs = Server.CreateObject("ADODB.RecordSet")
        strSQL = "SELECT * FROM search;"
        rs.Open strSQL, Conn, adOpenKeyset, adLockOptimistic
        If (rs.BOF or rs.EOF) Then
                rs.addnew
            rs("url") = strurl
            rs("text") = strtext
            rs("picurl") = strpicurl
            rs("art1") = strart1
            rs("art2") = strart2
            rs("art3") = strart3
            rs("art4") = strart4
            rs("art5") = strart5
            rs("art6") = strart6
            rs("art7") = strart7
            rs("art8") = strart8
            rs("art9") = strart9
            rs("art10") = strart10
            rs("dato") = Now()
            rs.Update
    End If
        rs.Close
        Set rs = Nothing
      conn.Close
      Response.redirect ("select.asp")
    End If
%>

PS den giver ingen fejlmelding. Den viser bare siden select.asp, som om alting er ok, men der er altså ikke kommet noget nyt felt.

Ved ikke om jeg tager fejl, men for mig ser det ud som at du har lavet en betingelse om at den kun skal oprette en ny hvis tabellen er tom... IF(rs.BOF or rs.EOF)

Kan du ikke også bare bruge insert syntaxen. Så skal du slet ikke bruge et RecordSet:

conn.execute("insert into(tal1, tal2, text1) values(10, 12.2, 'text')")

Du skal så selv lave noget tjek på data. F.eks komma tal skal bruge . og i text skal ' udskiftes med 2.

Henbur

Du har muligfis vat i noget af det rigtige. Jeg skulle jeg da ændre sætningen til

Jeg ved ikke hvordan du skal rette i din sætning, da jeg aldrig selv har arbejdet på den måde der. Men jeg vil foreslå at du gør som fennect foreslår.
Brug Insert Into i stedet for. Og så brug Replace(Request.Form("text"), "'", "''") f.eks.

Hvis du vil bruge det som det er, mener jeg du bare skal fjerne if sætningen.

ja det skulle jeg , tak

Den måde jeg arbejder på er selvlært ved ikke hvorfor jeg arbejder på den måde, men hvordan arbejder i?

Læg et svar

Jeg bruger altid insert syntax. Den fylder mindre i koden, men man skal være meget opmærksom på data, som skal indsættes. Det skal næsten altid formateres/tjekkes, og glemmer man det, kan databasen hackes. Tilgængæld synes jeg at jeg har mere kontrol, og en forstålig kode.

Der er skam ikke noget forkert i at bruge recordset metoden. Det er udelukkende smag og behag.

.o) <-- One Eyed Jack