Rettelse af felt i database

strSQL = "UPDATE tabelnavn SET kolonnenavn = '" & Request.Form("formnavn_fra_formfelt") & "'"
objConn.Execute(strSQL)

//>Rune

http://www.html.dk/tutorials/asp/lektion22.asp

//>Rune

Jeg har følgende men det virker ikke rigtigt:
<form action="default.asp?target=ret&id=1" method="post">
    <p><input type="text" name="navn" size="20"></p>
    <p><input type="submit" value="Send" name="Send rettelse"></p>
</form>

<%
target = Request.QueryString("target")
id = Request.QueryString("id")
if target = "ret" then

dbsti = "Data Source=p:\website\test\db1.mdb;Provider=Microsoft.Jet.OLEDB.4.0;"
sql = "SELECT * FROM [Navn] WHERE id=" & id
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open dbsti
           
Set rs = Server.CreateObject("ADODB.RecordSet")
rs.Open sql, conn, 3,3   


navn = Request.Form("navn")
repsonse.write navn
rs.Fields("Navn") = navn

rs.update
       
rs.Close
set rs = nothing
conn.Close
set conn = nothing       
end if
%>

<%
target = Request.QueryString("target")
id = Request.QueryString("id")
if target = "ret" then

dbsti = "Data Source=p:\website\test\db1.mdb;Provider=Microsoft.Jet.OLEDB.4.0;"
sql = "SELECT * FROM [Navn] WHERE id=" & id
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open dbsti
           
Set rs = Server.CreateObject("ADODB.RecordSet")

strSQL = "UPDATE [navn] SET navn = '" & Request.Form("navn") & "' WHERE id=" & id
conn.execute(strsql)

conn.Close
set conn = nothing       
end if
%>

Prøv sådan...

:)

//>Rune

Jeg har selv fundet en løsning udfra det første svar. Så tusind tak forhjælpen.