Får du inget felmeddelande på det där? Det borde du få.
RecSet(namn") = Request.Form("namn")
RecSet("namn") = Request.Form("namn")
3 svar · 298 visningar · startad av Johanneshov
Hii, it's me again... :q
Har suttit för länge framför dumburken... hittar inte felet... för mycket kod i vägen!
<form method="post" action="admin.asp?do=andragast&id=<% =RecSet("id")%>" name="add">
<tr>
<td><b>Namn:</b><br><input type="text" name="datum" value="<%=RecSet("namn")%>" size="45"></td>
</tr>
<tr>
<td><b>Email:</b><br><input type="text" name="datum" value="<%=RecSet("epost")%>" size="45"></td>
</tr>
<tr>
<td><b>Stad:</b><br><input type="text" name="datum" value="<%=RecSet("stad")%>" size="45"></td>
</tr>
<tr>
<td><b>Hemsida:</b><br><input type="text" name="datum" value="<%=RecSet("hemsida")%>" size="45"></td>
</tr>
<tr>
<td><b>Inlägg:</b><br><textarea cols="70" rows="5" name="text" ><%=RecSet("inlagg")%></textarea></td>
</tr>
<tr>
<td><b>Adminkommentar:</b><br><textarea cols="70" rows="5" name="text" ><%=RecSet("kommentar")%></textarea></td>
</tr>
<tr>
<td colspan="2" valign="top" align="right"><a href="admin.asp?do=raderagast&id=<%=RecSet("id")%>">TaBort Inlägg</a></td>
</tr>
<tr>
<td><input type="Submit" name="andra" value="Uppdatera"></td>
</tr>
</form>
Ovanstående formvärden verkar inte komma in i RecSetet nedan... Vad kan vara felet???
If Request.Querystring("do")= "andragast" Then
Set Conn = Server.CreateObject("ADODB.Connection")
Set RecSet = Server.CreateObject("ADODB.Recordset")
Conn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("db/nyheter.mdb")
Uppdatera = "SELECT * FROM gastbok WHERE id= "& Request.Querystring("id") &" "
RecSet.Open Uppdatera, Conn, adOpenStatic, adLockOptimistic
RecSet(namn") = Request.Form("namn")
RecSet("epost") = Request.Form("epost")
RecSet("stad") = Request.Form("stad")
RecSet("hemsida") = Request.Form("hemsida")
RecSet("inlagg") = Request.Form("inlagg")
RecSet("kommentar") = Request.Form("kommentar")
%><b>Inlägget uppdaterat!</b><p><%
RecSet.Update
RecSet.Close
Conn.Close
End If %>
Får du inget felmeddelande på det där? Det borde du få.
RecSet(namn") = Request.Form("namn")
RecSet("namn") = Request.Form("namn")
Jag har upplevt liknande problem själv att RecSetet inte tar emot de värden mat skickar med Request.Form. Själv löste det sig genom att istället använda Request.QueryString
Till min förvåning så jag att det fungerade med tex.
RecSet("Namn") = Request.QueryString("namn")
trots att Request.QueryString("namn") är ett värde som hämtas från formuläret vilket man tror hämtas genom Request.Form. Alltså prova med följande kod istället:
If Request.Querystring("do")= "andragast" Then
Set Conn = Server.CreateObject("ADODB.Connection")
Set RecSet = Server.CreateObject("ADODB.Recordset")
Conn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("db/nyheter.mdb")
Uppdatera = "SELECT * FROM gastbok WHERE id= "& Request.Querystring("id") &" "
RecSet.Open Uppdatera, Conn, adOpenStatic, adLockOptimistic
RecSet(namn") = Request.QueryString("namn")
RecSet("epost") = Request.QueryString("epost")
RecSet("stad") = Request.QueryString("stad")
RecSet("hemsida") = Request.QueryString("hemsida")
RecSet("inlagg") = Request.QueryString("inlagg")
RecSet("kommentar") = Request.QueryString("kommentar")
%><b>Inlägget uppdaterat!</b><p><%
RecSet.Update
RecSet.Close
Conn.Close
End If %>
Varför det är så vet jag inte men jag ska posta en tråd för att få lite svar angående den frågan.
Hopla... kom på en lösning... ovan loppar jag ut formet... Illa!?
Skapade ett unikt form för den post/id jag vill redigera och då funkar det helt plötsligt.
Oförklarligt?
Hur som helst TACK!