"
end if
' Call the relevant query with the relevant variable
sql = "SELECT tblLiveHomeItems.id, tblHomeItems.homeItem, tblHomeItems.urlLink FROM tblHomeItems INNER JOIN tblLiveHomeItems ON tblHomeItems.id = tblLiveHomeItems.id"
Set objRec = Server.CreateObject("ADODB.Recordset")
objRec.Open sql, objMain.dbConn
While not objRec.EOF
strHomeItem = objRec("homeItem")
strUrlLink = trim(objRec("urlLink"))
if (len(strUrlLink)>0) then
strHomeItemsOut = strHomeItemsOut & "