ColdFusion Macro Exported to HTML

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Tranditional//EN">
<!-- this query will sort videos by date, beginning with the newest -->
<cfquery name="allvideos" datasource="odemo" maxrows=10 dbtype="Oracle80">
SELECT      TITLE, PICTURE, DESCRIPTION, RELDATE
FROM         ODEMO.VIDEODATA
ORDER BY  RELDATE DESC
</cfquery>
<!-- this query will sort the videos by the number of times they were rented -->
<cfquery name="toprent" datasource="odemo" maxrows=10 dbtype="Oracle80">
SELECT      TITLE, RENTNUM
FROM         ODEMO.VIDEODATA 
ORDER BY  RENTNUM DESC
</cfquery>
<!-- this query will sort the videos by the number of times they were purchased -->
<cfquery name="topbuy" datasource="odemo" maxrows=10 dbtype="Oracle80">
SELECT      TITLE, BUYNUM
FROM         ODEMO.VIDEODATA 
ORDER BY  BUYNUM DESC
</cfquery>
<html>
<head>
<title>Video</title>

</HEAD>
<BODY bgcolor="FFFFFF" LEFTMARGIN=0 TOPMARGIN=0 MARGINWIDTH=0 MARGINHEIGHT=0>
<!-- header table -->
<table width=100% cellspacing=0 cellpadding=0 Border=0 bgcolor=FFFFFF><tr><td width=100% height=30>
<IMG src="/images/home_vlogo.gif" width=175 height=44 border=0><IMG src="/images/home_video.gif" width=100 height=44 border=0>
</td></TABLE>

<!-- navbar table -->
<table width=100% cellspacing=0 cellpadding=5 Border=0>
<tr><td bgcolor=000000 background=/images/bluefade1.gif height=15 width=100% align="right">
<IMG SRC="/images/buttons/navbar.gif" border=0 height=10 width=550 align="right" usemap="#sitenav" ismap>
</td></TR>
</TABLE>

<!-- full page table -->
<table cellspacing=0 cellpadding=5 border=0 align=center width=100% bgcolor="ffffff">
<tr><td width=170 align="left" valign="top">

<!-- left pane table -->
<table width=170 cellspacing=0 cellpadding=0 border=0 align="center">
<!-- top rent header -->
<tr height=1 bgcolor="ffffff" valign="bottom" BACKGROUND="/images/BG_TOP.gif">
<td width=100% align="center" valign="bottom" BACKGROUND="/images/BG_TOP.gif">
<img src="/images/top10rent.gif" width=170 height=15 alt="" align="center" border=0>
</td></tr>

<TR><TD width=170 valign="top" bgcolor="005CB4">
<!-- top rent shaded table -->
<TABLE width=170 CELLSPACING=O CELLPADDING=1 BORDER=0 bgcolor="005CB4">
<tr bgcolor="005CB4">
<TD width="100%" valign=top bgcolor="005CB4">
<!-- top rent content table -->
<TABLE width="100%" CELLSPACING="O" CELLPADDING="5" BORDER="0" bgcolor="F1F6FF" height=100>
<TR><TD class=fine style="width:100%; background-color:F1F6FF">

<!-- this loop displays the 10 top rentals -->
<CFSET "row"=1>
<CFLOOP query="toprent" startrow="1" endrow="10">
<cfoutput >
<font face="Arial" size="1"><b>#row#</b> - #title#</font><br>
<CFSET "row"=row + 1>
</cfoutput>
</cfloop>

</td></tr>
</TABLE>
<!-- close top rent content table -->
</td>
</tr>
<!-- close top rent shaded table -->
</TABLE>
</TD></TR>

<!-- spacer -->
<TR><Td width=170 bgcolor="ffffff" height=15>
&nbsp;
</TD></TR>
<!-- end spacer -->
<!-- top buy header -->
<tr height=1 bgcolor="ffffff" valign="bottom" BACKGROUND="/images/BG_TOP.gif">
<td width=100% align="center" valign="bottom" BACKGROUND="/images/BG_TOP.gif">
<img src="/images/top10sales.gif" width=170 height=15 alt="" align="center" border=0>
</td></tr>

<TR><TD width=170 valign="top" bgcolor="005CB4">
<!-- top buy shaded table -->
<TABLE width=170 CELLSPACING=O CELLPADDING=1 BORDER=0 bgcolor="005CB4">
<tr bgcolor=005CB4>
<TD width="100%" valign=top bgcolor="005CB4">
<!-- top buy content table -->
<TABLE width="100%" CELLSPACING=O CELLPADDING=5 BORDER=0 bgcolor="F1F6FF" height=100>
<TR><TD class="fine" style="width:100%; background-color:F1F6FF">

<!-- this loop displays the 10 top buys -->
<CFSET "row"=1>
<CFLOOP query="topbuy" startrow="1" endrow="10">
<cfoutput >
<font face="Arial" size="1"><b>#row#</b> - #title#</font><br>
<CFSET "row"=row + 1>
</cfoutput>
</cfloop>
</td></tr>
</TABLE>
<!-- close top buy content table -->
</td>
</tr>
<!-- close top buy shaded table -->
</TABLE>

</TD></TR>
<!-- close left pane table -->
</TABLE>


</td><td width=100% valign="top">

<!--Begin Main Content Table Here-->
<table align="center" border=0 width="100%" cellspacing=0 cellpadding=0 bgcolor="ffffff">
<tr><td valign="top" width="100%" align=center bgcolor="ffffff">
<img src="/images/VHSreleases.gif" border=0 height=50 width=350 align="left">
</td></tr></TABLE>


<TABLE WIDTH="100%" CELLSPACING=0 CELLPADDING=0 BORDER=0>
<CFSET row=1>
<CFSET vidrow=1>

<!-- this loop controls the number of rows displayed -->
<CFLOOP CONDITION="vidrow LESS THAN OR EQUAL TO 3">
<CFSET vidrow=vidrow + 1>
<TR>
<CFSET column=1>

<!-- this loop controls the number of columns displayed -->
<CFLOOP CONDITION="column LESS THAN OR EQUAL TO 2">
<TD bgcolor="FFFFFF" VALIGN="top" width="50%">

<TABLE bgcolor="FFFFFF" border=0 cellpadding=5 cellspacing=0 width="100%">

<!-- this loop runs the query and displays the output -->
<CFLOOP query="allvideos" startrow="#row#" endrow="#row#">
<cfoutput >
<TR><TD valign="top" width="85" bgcolor="FFFFFF">
<IMG src="#picture#" border="0" align="left">
</TD><TD valign="top" align="left" bgcolor="FFFFFF">
<font face="Arial" size="2"><b>#title#</b></font>
<font face="Arial" size="1"><br><br>#description#<br></font>
</cfoutput>
</cfloop>
</TD></TR>
</TABLE>
</TD>
<CFSET row=row + 1>
<CFSET column=column + 1>
</cfloop>
</TR>
</cfloop>
</TABLE>

</td></tr></table>
<!-- footer table -->
<table width="100%" cellspacing=0 cellpadding=3 Border=0>
<tr><td width=100% align=right background=/images/bluefade1.gif>
<FONT face="verdana,arial" size="-1" COLOR=ffffff>VerioVideo</FONT></td></tr>
</table>

</body>
</html>