<%
Do while Not RS.eof
<a href=\'dinfil.asp?id=\" & RS(\"id\") & \"&mode=delete\'><img src=\'slette-billede.jpg\' border=\'0\'></a> <a href=\"
http://<%=RS(\"link\")%>\"><%=RS(\"titel\")%><br></a>
RS.MoveNext
Loop
Så skal du i din fil lave det således :
If Request.QueryString(\"mode\") AND Request.QueryString(\"id\") <> \"\" Then
strSQL = \"DELETE * FROM Tabel WHERE ID = \" & Request.QueryString(\"id\")
Conn.Execute(SQL)
End If
Når du skal redigere, så skal du :
Do while Not RS.eof
<a href=\'dinfil.asp?id=\" & RS(\"id\") & \"&mode=delete\'><img src=\'slette-billede.jpg\' border=\'0\'></a> <a href=\'dinfil.asp?id=\" & RS(\"id\") & \"&mode=edit\'><img src=\'rettefil-billede.jpg\' border=\'0\'></a> <a href=\"
http://<%=RS(\"link\")%>\"><%=RS(\"titel\")%><br></a>
RS.MoveNext
Loop
I selve filen skal du så lave således, at:
If Request.QueryString(\"mode\") = \"edit\" Then
\' Har lavet du så en input formular, hvor den sætter felternes values lig med databasens felter ....
End if
Så skal du opdatere felterne ....
strSQL = \"UPDATE Tabel SET (Felt1, Felt2) VALUES (\'\" & Felt1 & \"\',\'\" & Felt2 & \"\')\"
Jeg er lidt sparsom med mine oplysninger, idet du skal prøve selv ... og at det kun er 100 point :)