update

Jeg får følgende fejl...

Microsoft JET Database Engine error '80040e14'

Syntax error (missing operator) in query expression 'id ='.

/kenneth/oplysningen/rediger_person_oplysningen.asp, line 11


lægger lige koden:

<%
Response.Buffer = True

DIM Conn, Filsti, navn, efternavn, alder, mobil, adresse, by, postnummer, beskrivelse, id

Set Conn = Server.CreateObject("ADODB.Connection")
Filsti = Server.MapPath("person.mdb")
Conn.Open ("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & filsti)

SQL = "SELECT id, navn, efternavn,  alder, mobil, adresse, by, postnummer, beskrivelse FROM oplysningen WHERE id = " & Request.QueryString("id")
Set RS = Conn.Execute(SQL)

id = RS("id")
navn = RS("navn")
efternavn = RS("efternavn")
alder = RS("alder")
mobil = RS("mobil")
adresse = RS("adresse")
by = RS("by")
postnummer = RS("postnummer")
beskrivelse = RS("beskrivelse")

update = Request("update")

If update = "True" Then
    id = Request.QueryString("id")
    navn = Request.Form("navn")
    efternavn = Requets.Form("efternavn")
    alder = Request.Form("alder")
    mobil = Request.Form("mobil")
    adresse = Request.Form("adresse")
    by = Request.Form("by")
    postnummer = Request.Form("postnummer")
    beskrivelse = Request.Form("beskrivelse")
        SQL = "UPDATE oplysningen SET id = '" & id & "', navn = '" & navn & "', efternavn = '" & efternavn & "', alder = '" & alder & "', mobil = '" & mobil & "', adresse = '" & adresse & "', by = '" & by & "', postnummer = '" & postnummer & "', beskrivelse = '" & beskrivelse & "' WHERE id = " & Request.QueryString("id")
        Conn.Execute(SQL)
        Response.Redirect("oplysningen.asp")
End If

start = "<tr><td valign='top' width='200'>"
mellem = "</td><td valign='top' width='200'>"
slut = "</td></tr>"
%>

<html>
<head>
<title>Oplysningen</title>
</head>
<body>
<table border="1">

<%
Response.Write start & "Navn:" & mellem & "<input type='text' name='navn' value='" & navn & "'>" & slut
Response.Write start & "Efternavn:" & mellem & "<input type='text' name='efternavn' value='" & efternavn & "'>" & slut
Response.Write start & "Alder:" & mellem & "<input type='text' name='alder' value='" & alder & "'>" & slut
Response.Write start & "Mobil:" & mellem & "<input type='text' name='mobil' value='" & mobil & "'>" & slut
Response.Write start & "Adresse:" & mellem & "<input type='text' name='adresse' value='" & adresse & "'>" & slut
Response.Write start & "By:" & mellem & "<input type='text' name='by' value='" & by & "'>" & slut
Response.Write start & "Postnummer:" & mellem & "<input type='text' name='postnummer' value='" & postnummer & "'>" & slut
Response.Write start & "Beskrivelse:" & mellem & "<textarea rows='5' cols='32' name='beskrivelse'>" & beskrivelse & "</textarea>" & slut
%>

<tr>
<td width="200" colspan="2" valign="top"><a href="rediger_person_oplysningen.asp?update=true&id= & id">Update</a>&nbsp;&nbsp;&nbsp;<a href="oplysningen.asp">Oversigt</a></td>
</tr>
</table>
</body>
</html>