Redigere/Slette
jeg har lavet en gæstebog, men nu ved jeg ik hvordan jeg skal lave en admin sektion hvor han kan redigere/slette i gæstebogen ??har lavet lidt af det :o)
http://www.web-zone.dk/l/jwguestbok/klik.asp
sådan ser den ud:
<p align=\"center\"><b><font face=\"Verdana\">Klik På Id´en for at redigere på tilføjelsen</font></b></p>
<table border=\"1\">
<tr><td><b>ID:</b></td>
<td><b>Navn:</b></td>
<td><b>Alder:</b></td>
<td><b>Kommetare:</b></td>
<td><b>Dato:</b></td>
<td><b>Email:</b></td></tr>
<%
Set Connect = Server.CreateObject(\"ADODB.Connection\")
Connect.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & Server.MapPath(\"database.mdb\")
SQL = \"SELECT * FROM jwgbog order by id\"
SET rs = Connect.Execute( SQL )
Do Until rs.EOF
%>
<tr><td valign=\"top\"><a href=\"ret.asp?id=<%= rs(\"id\") %>\"><b><%= rs(\"id\") %></b></a></td>
<td valign=\"top\"><%=rs(\"navn\") %></td>
<td valign=\"top\"><%=rs(\"alder\") %></td>
<td valign=\"top\"><%=rs(\"kommetare\") %></td>
<td valign=\"top\"><%=rs(\"dato\") %></td>
<td valign=\"top\"><a href=\"mailto:<%=rs(\"email\") %>\"><%=rs(\"navn\") %></a></td>
</tr>
<%
rs.movenext
loop
rs.Close
Set rs = Nothing
Connect.Close
set Connect = Nothing
%>
når man trykker på iden, så skal den hoppe over til en side hvor man kan rette/slette på den indlæg man har trykket på...
