Hov..her er koden :
<!--#include file="db.inc"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<link rel="stylesheet" type="text/css" href="style.css">
<meta http-equiv="Cache-Control" content="no-store">
<meta http-equiv="Pragma" content="no-cache">
</head>
<body bgcolor="#F9F9F9">
<div align="center">
<center>
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="530" id="AutoNumber2">
<tr>
<td width="100%">
<p align="center">
<strong><font face="Verdana" size="2">DVD</font></strong></p>
</td>
</tr>
</table>
</center>
</div>
<br>
<div align="center">
<table border="0" cellpadding="0" cellspacing="0" width="100%" style="border-left-width: 0px; border-right-width: 0px; border-top-width: 0px" >
<tr>
<td class="head" width=10% bgcolor="#d7dadf" style="border-left-style: none; border-left-width: medium; border-right-style: none; border-right-width: medium; border-top-style: none; border-top-width: medium; border-bottom-style: solid; border-bottom-width: 1px" bordercolor="#000000" >
Titel
<a href="dvd_view.asp?sort=titel asc"><img border="0" src="images/down1.gif" width="12" height="12" align="middle"></a><a href="dvd_view.asp?sort=titel desc"><img border="0" src="images/up1.GIF" width="12" height="12" align="middle"></a>
</td>
<td class="head" width=10% bgcolor="#d7dadf" style="border-left-style: none; border-left-width: medium; border-right-style: none; border-right-width: medium; border-top-style: none; border-top-width: medium; border-bottom-style: solid; border-bottom-width: 1px" bordercolor="#000000" >
Genre
<a href="dvd_view.asp?sort=genre asc"><img border="0" src="images/down1.gif" width="12" height="12" align="middle"></a><a href="dvd_view.asp?sort=genre desc"><img border="0" src="images/up1.GIF" width="12" height="12" align="middle"></a>
</td>
<td class="head" width=10% bgcolor="#d7dadf" style="border-left-style: none; border-left-width: medium; border-right-style: none; border-right-width: medium; border-top-style: none; border-top-width: medium; border-bottom-style: solid; border-bottom-width: 1px" bordercolor="#000000" >
Hjemme
</td>
<td class="head" width=10% bgcolor="#d7dadf" style="border-left-style: none; border-left-width: medium; border-right-style: none; border-right-width: medium; border-top-style: none; border-top-width: medium; border-bottom-style: solid; border-bottom-width: 1px" bordercolor="#000000" >
Lån
</td>
</tr>
</table>
</div>
<br>
<%
'Initialise the strSQL variable with an SQL statement to query the database
SQL = "SELECT * FROM dvd order by " & request.querystring("sort")
set rs = dbc.Execute(sql)
Rad = 1
if rs.eof then
response.write "<FONT size=1 face=verdana><p align='center'><b>ingen DVD'er</b></p></font>"
else
'Loop through the recordset
Do While not rs.EOF
%>
<div align="center">
<table border="0" cellpadding="0" cellspacing="1" width="100%">
<%
If (Rad mod 2) = 1 Then
BGFarge = "#eeeeee"
Else
BGFarge = "#d7dadf"
End If
Rad = Rad + 1
%>
<tr>
<td class=text1 bgcolor=<%=BGFarge%> align=left width=10%>
<%
Response.Write ("<a href=""dvd_view_selected.asp?ID=" & rs("id") & """>")
Response.write ("<FONT size=1 face=verdana> " & rs("titel") & "</FONT>")
Response.Write ("</a>")
%>
</td>
<td class=text1 bgcolor=<%=BGFarge%> align=left width=10%>
<%
Response.Write ("<a href=""dvd_view_selected.asp?ID=" & rs("id") & """>")
Response.write ("<FONT size=1 face=verdana> " & rs("genre") & "</FONT>")
Response.Write ("</a>")
%>
</td>
<td class=text1 bgcolor=<%=BGFarge%> align=left width=10%>
<%
If rs("hjemme") = "True" then
Response.write ("<img src='images/prikg.gif'>")
Else
Response.write ("<img src='images/prikr.gif'>")
End if
%>
</td>
<td class=text1 bgcolor=<%=BGFarge%> align=left width=10%>
<%
if rs("hjemme") = "True" then
Response.write ("<input type='checkbox' name='laan' >")
else
Response.write ("<input type='checkbox' name='laan' checked disabled>")
end if
%>
</td>
</tr>
</table>
</div>
<%
'Move to the next record in the recordset
rs.MoveNext
Loop
'Reset server objects
rs.Close
Set rs = Nothing
End if
%>
</body>
</html>
