<% dim sdquery
sdquery="SELECT idCategory, categoryDesc FROM categories WHERE idParentCategory=1 and idCategory>1 and iBTOhide=0 ORDER BY priority"
set rsSideCatObj=conlayout.execute(sdquery)
if err.number <> 0 then
response.write " "
else
if rsSideCatObj.eof then
else
Do until rsSideCatObj.eof
sdIdCategory = rsSideCatObj("idCategory")
sdCategoryDesc = rsSideCatObj("categoryDesc") %>