BiasseMedlem sedan aug. 2003480 inlägg Får fel på:
rs("namn")=request.form("namn")
Det läser ur rätt men klarar inte att ändra innehållet efter redigering:
Resten....
<%
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=d:\webb\fyndet\db\annons.mdb"
Set rs = Server.CreateObject("ADODB.Recordset")
SQL = "SELECT * From annons WHERE id = " & Request.Querystring("id")
Set rs = Conn.Execute(SQL)
if request.querystring("action")="spara" then
rs("namn")=request.form("namn")
rs("pwd")=request.form("pwd")
rs("rubrik")=request.form("rubrik")
rs("epost")=request.form("epost")
rs("kategori")=request.form("kategori")
rs("text")=request.form("text")
rs("landskap")=request.form("landskap")
rs("picture_link")=request.form("picture_link")
rs("date")=request.form("date")
rs("adtype")=request.form("adtype")
rs("ip")=request.form("ip")
rs.update
end if
%>
<form name="form1" method="post" action="annonser_andra.asp?action=spara&id=<%=rs("id")%>">
<body bgcolor="#F4F5FB" style="border: 1 solid #000080">
<p>
Namn:<br>
<input name="namn" type="text" value="<%=rs("namn")%>">
<br>
Lösenord:<br>
<input name="pwd" type="text" value="<%=rs("pwd")%>">
<br>
Rubrik:<br>
<input name="rubrik" type="text" value="<%=rs("rubrik")%>">
<br>
E-post:<br>
<input name="epost" type="text" value="<%=rs("epost")%>">
<br>
Kategori:<br>
<input name="kategori" type="text" value="<%=rs("kategori")%>">
<br>
Annons:<br>
<textarea name="text" cols="60" rows="5"><%=rs("text")%></textarea>
<br>
Landskap:<br>
<input name="landskap" type="text" value="<%=rs("landskap")%>"><br>
Bild:<br>
<input name="picture_type" type="text" value="<%=rs("picture_link")%>">
<br>
Datum:<br>
<input name="date" type="text" value="<%=rs("date")%>">
<br>
Typ:<br>
<input name="adtype" type="text" value="<%=rs("adtype")%>">
<br>
ip:<br>
<input name="ip" type="text" value="<%=rs("ip")%>">
<br>
<input type="submit" name="Submit" value="Submit">
</form>
Mika3lMedlem sedan nov. 20018 492 inlägg Exakt vad får du för felmeddelande?
BiasseMedlem sedan aug. 2003480 inlägg Feltyp:
ADODB.Recordset (0x800A0CB3)
Aktuellt Recordset kan inte uppdateras. Det kan bero på en begränsning av providern eller den valda låstypen.
annonser_andra.asp, line 13
Mika3lMedlem sedan nov. 20018 492 inlägg Hmmm...
Testa med den här koden.
SQL = "UPDATE annons SET namn = '" & Request.Form("namn") & "', pwd = '" & Request.Form("pwd") & "', rubrik = '" & Request.Form("rubrik") & "', epost = '" & Request.Form("epost") & "', kategori = '" & Request.Form("kategori") & "', text = '" & Request.Form("text") & "', landskap = '" & Request.Form("landskap") & "', picture_link = '" & Request.Form("picture_link") & "', date = '" & Request.Form("date") & "', adtype = '" & Request.Form("adtype") & "', ip = '" & Request.Form("ip") & "'"
Conn.Execute(SQL)
Tror väl att date och ev även text är reserverade ord i Access då det kan hända att det krånglar, men testa.
BiasseMedlem sedan aug. 2003480 inlägg Feltyp:
Microsoft JET Database Engine (0x80040E14)
Syntaxfel i UPDATE-uttryck.
annonser_andra.asp, line 11
BiasseMedlem sedan aug. 2003480 inlägg Ändrade till detta nu:
<%
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=d:\webb\fyndet\db\annons.mdb"
Set rs = Server.CreateObject("ADODB.Recordset")
SQL = "SELECT * From annons WHERE id = " & Request.Querystring("id")
Set rs = Conn.Execute(SQL)
if request.querystring("action")="spara" then
rs("namn")=request.form("namn")
rs("pwd")=request.form("pwd")
rs("rubrik")=request.form("rubrik")
rs("epost")=request.form("epost")
rs("kategori")=request.form("kategori")
rs("inlagg")=request.form("inlagg")
rs("landskap")=request.form("landskap")
rs("picture_link")=request.form("picture_link")
rs("datum")=request.form("datum")
rs("adtype")=request.form("adtype")
rs("ip")=request.form("ip")
rs.update
end if
%>
<form name="form1" method="post" action="annonser_andra.asp?action=spara&id=<%=rs("id")%>
<body bgcolor="#F4F5FB" style="border: 1 solid #000080">
<p>
Namn:<br>
<input name="namn" type="text" value="<%=rs("namn")%>">
<br>
Lösenord:<br>
<input name="pwd" type="text" value="<%=rs("pwd")%>">
<br>
Rubrik:<br>
<input name="rubrik" type="text" value="<%=rs("rubrik")%>">
<br>
E-post:<br>
<input name="epost" type="text" value="<%=rs("epost")%>">
<br>
Kategori:<br>
<input name="kategori" type="text" value="<%=rs("kategori")%>">
<br>
Annons:<br>
<textarea name="text" cols="60" rows="5"><%=rs("inlagg")%></textarea>
<br>
Landskap:<br>
<input name="landskap" type="text" value="<%=rs("landskap")%>"><br>
Bild:<br>
<input name="picture_type" type="text" value="<%=rs("picture_type")%>">
<br>
Datum:<br>
<input name="date" type="text" value="<%=rs("datum")%>">
<br>
Typ:<br>
<input name="adtype" type="text" value="<%=rs("adtype")%>">
<br>
ip:<br>
<input name="ip" type="text" value="<%=rs("ip")%>">
<br>
<input type="submit" name="Submit" value="Submit">
</form>
Och fick detta fel :
Feltyp:
Microsoft JET Database Engine (0x80040E14)
Syntaxfel (operator saknas) i frågeuttrycket 'id = 425<body bgcolor='.
annonser_andra.asp, line 11
@ndersMedlem sedan juni 200032 969 inlägg Du har inte avslutat din <form>-tagg.
BiasseMedlem sedan aug. 2003480 inlägg <input type="submit" name="Submit" value="Submit">
</form>
J.N.Medlem sedan apr. 20031 660 inlägg HEJ!
Felsökning steg ett:
Skriv ut din sql-sträng med response.write sql, då ser man enklare vad som är fel.
I ditt fall bör det stå
SELECT * From annons WHERE id = 425<body bgcolor=
dvs på sidan du postar från, i detta fall på denna sida, har du ett html-fel någonstans.
Närmre granskning ger att raden "<form name" inte avslutas med en ". Då ingår all text tom fnutten före # i bgcolor i värde för id.
Fel alltså!
(Slarvfel, för i koden överst har du med det.)
