%
arrData = GetArray("SELECT `PageTitle`, `BodyText` FROM `tbReseller_Product_Text` WHERE `SiteID`=" & SiteID)
if IsArray(arrData) then
PageTitle=arrData(0,0)
BodyText=replace(arrData(1,0),vbCrLf," ")
End If
'If no data found use default ImageHolders Info
If BodyText="" Then
arrData = GetArray("SELECT `BodyText` FROM `tbAbout` WHERE `ID`=1")
if IsArray(arrData) then
PageTitle="imageHOLDERS | Graphic Display, Shelving, POS, Signage, Light Boxes, Rigid Panel Systems & Multimedia Stands"
BodyText=replace(arrData(0,0),vbCrLf," ")
End If
End If
%>
<%=PageTitle%>
<%
dim arrGroupName
level = request( "level" )
nid_type_1 = request( "nid_type_1" )
nid_type_2 = request( "nid_type_2" )
nid_type_3 = request( "nid_type_3" )
nid_type_4 = request( "nid_type_4" )
nid_type = request( "nid_type" )
'IF level = 2 THEN
'SQL = "SELECT name FROM navigation_type WHERE nid_type = " & nid_type_1
'Set GETNAME = Con.Execute( SQL )
'nav_string = GETNAME( "name" )
'END IF
'IF level = 3 THEN
'SQL = "SELECT name FROM navigation_type WHERE nid_type = " & nid_type_2
'set GETNAME = Con.Execute( SQL )
'nav_string = GETNAME( "name" )
'END IF
'IF level = 4 THEN
'SQL = "SELECT name FROM navigation_type WHERE nid_type = " & nid_type_3
'set GETNAME = Con.Execute( SQL )
'nav_string = GETNAME( "name" )
'END IF
'IF level = 5 THEN
'SQL = "SELECT name FROM navigation_type WHERE nid_type = " & nid_type_4
'Set GETNAME = Con.Execute( SQL )
'nav_string = GETNAME( "name" )
'END IF
TextGroup = trim(request.querystring("textgroup"))
TextSubGroup = trim(request.querystring("textsubgroup"))
GroupCode = trim(request.querystring("group"))
RawGroup = trim(request.querystring("rawgroup"))
select case len(GroupCode)
case 2
menuURL = "combi_products_navi_h.asp"
case 3
menuURL = "combi_products_navi_sub_h.asp"
rawGroupString = server.urlencode(RawGroup)
case else
menuURL = "combi_products_navi_h.asp"
rawGroupString = GroupCode
end select
if (len(GroupCode) > 2) then
MainGroupCode = left(GroupCode,2)
else
MainGroupCode = NULL
end if
siteURL = "siteid=" & request.querystring("siteid") & "&sitename=" & request.querystring("sitename")
%>
<%
private function GetImage()
if isnumeric(left(request.querystring("group"),4)) then
GetImage = "group_" & left(request.querystring("group"),4) & ".jpg"
else
select case ucase(left(request.querystring("group"),4))
case "EVAL"
GetImage = "combinations/main_default_1.gif"
case else
GetImage = "combinations/main_default_1.gif"
end select
end if
end function
%>