<%
'Alter these codes to change BanMan ads
ZoneCodeTopBanner1 = 11 'zone id no.
ZoneCodeTopBanner2 = 468 'width in pixels
ZoneCodeTopBanner3 = 60 'height in pixels
ZoneCodeTopBanner4 = 33333 'page id
ZoneCodeRightSkyscraper1 = 15
ZoneCodeRightSkyscraper2 = 120
ZoneCodeRightSkyscraper3 = 600
ZoneCodeRightSkyscraper4 = 22222
ZoneCodeBottomBanner1 = 1
ZoneCodeBottomBanner2 = 468
ZoneCodeBottomBanner3 = 60
ZoneCodeBottomBanner4 = 33333
' To update this page for 2007 etc., change "Product.Nom2007" in the SQL query to the appropriate field.
strSQL = "SELECT Cat.CatName AS CatName, Cat.CatID AS CatID, Subcat.CatID AS SubcatID, " &_
"Subcat.CatName AS SubcatName " &_
"FROM ((Category AS Cat LEFT JOIN " &_
"Category AS Subcat ON Cat.CatID = Subcat.ParentID) " &_
"INNER JOIN " &_
"Product ON Product.CatID = Subcat.CatID) " &_
"WHERE (Cat.ParentID = 2 AND Product.Nom2007 = 1 AND Cat.CatID not in(46, 47, 48) AND Subcat.CatID <> 224 ) " &_
"ORDER BY CatName, SubcatName"
'Response.write strSQL
Call ExecuteSQL(strSQL,cursortype,rs_main)
%>
Nominees and Finalist: Best Software Awards 2007
2007 Nominees and Finalist Pocket PC Software - with descriptions Browse or search list. Smartphone
Nominees and Finalist with description
<%
strCat=""
strSubCat=""
Do While Not rs_main.EOF
If strCat <> rs_main("CatName") And strSubCat <> rs_main("SubCatName") Then
%> <%
End If
If strCat <> rs_main("CatName") Then
%>
"><%=rs_main("CatName")%> 