Oprettede links:
<%
dim RS, SQL
set RS = server.createobject("ADODB.recordset")
SQL = "SELECT * FROM links ORDER By linkid"
RS.Open SQL,conn
if not RS.eof then
do until RS.EOF
%>
|
&pageid=7">rediger
|
<%response.write RS("linktitel")%> |
<%
RS.MoveNext
loop
end if
RS.close
set RS=Nothing
%>
|