<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% imagepathLO = "Renderings_LO/" 'imagepathMD = "Renderings_MD/" imagepathHI = "Renderings_HI/" imagepathTH = "Renderings_TH/" 'imagepathZIP = "Renderings_ZIP/" Dim rsDesigns__MMSize rsDesigns__MMSize = "%" If (Request.Form("Size") <> "") Then rsDesigns__MMSize = Request.Form("Size") End If %> <% Dim rsDesigns__MMBudget rsDesigns__MMBudget = "%" If (Request.Form("Web_Budget") <> "") Then rsDesigns__MMBudget = Request.Form("Web_Budget") End If %> <% Dim rsDesigns__MMConfig rsDesigns__MMConfig = "%" If (Request.Form("Web_Configuration") <> "") Then rsDesigns__MMConfig = Request.Form("Web_Configuration") End If %> <% Dim rsDesigns__MMOptions rsDesigns__MMOptions = "%" If (Request.Form("Web_Options") <> "") Then rsDesigns__MMOptions = Request.Form("Web_Options") End If %> <% 'Dim rsDesigns__MMAccessories 'rsDesigns__MMAccessories = "%" 'If (Request.Form("Options") <> "") Then 'rsDesigns__MMAccessories = Request.Form("Options") 'End If %> <% Dim rsDesigns__MMProduct rsDesigns__MMProduct = "%" If (Request.Form("Web_Product") <> "") Then rsDesigns__MMProduct = Request.Form("Web_Product") End If %> <% Dim rsDesigns__MMClient rsDesigns__MMClient = "%" If (Request.Form("Client") <> "") Then rsDesigns__MMClient = Request.Form("Client") End If %> <% Dim rsDesigns__MMProject rsDesigns__MMProject = "%" If (Request.Form("Project") <> "") Then rsDesigns__MMProject = Request.Form("Project") End If %> <% Dim rsDesigns__MMIndustry rsDesigns__MMIndustry = "%" If (Request.Form("Industry") <> "") Then rsDesigns__MMIndustry = Request.Form("Industry") End If %> <% Dim rsDesigns Dim rsDesigns_numRows Set rsDesigns = Server.CreateObject("ADODB.Recordset") rsDesigns.ActiveConnection = MM_AbexDesignsNew_STRING rsDesigns.Source = "SELECT * FROM Table_Renderings WHERE web_Size LIKE '%" + Replace(rsDesigns__MMSize, "'", "''") + "%' AND Web_Budget LIKE '%" + Replace(rsDesigns__MMBudget, "'", "''") + "%' AND Web_Configuration LIKE '%" + Replace(rsDesigns__MMConfig, "'", "''") + "%' AND Web_Options LIKE '%" + Replace(rsDesigns__MMOptions, "'", "''") + "%' AND Web_Product LIKE '%" + Replace(rsDesigns__MMProduct, "'", "''") + "%' AND Client LIKE '%" + Replace(rsDesigns__MMClient, "'", "''") + "%' AND Project LIKE '%" + Replace(rsDesigns__MMProject, "'", "''") + "%' AND Industry LIKE '%" + Replace(rsDesigns__MMIndustry, "'", "''") + "%' ORDER BY Project_Sort DESC" rsDesigns.CursorType = 0 rsDesigns.CursorLocation = 2 rsDesigns.LockType = 1 rsDesigns.Open() rsDesigns_numRows = 0 %> <% Dim Repeat1__numRows Dim Repeat1__index Repeat1__numRows = 25 Repeat1__index = 0 rsDesigns_numRows = rsDesigns_numRows + Repeat1__numRows %> Abex - Results (by budget)

productfamilies


    Exhibiting Tips

    Upcoming Shows

 
   Search results using  <%= Request.Form("Size") %>  <%= Request.Form("Web_Configuration") %>  <%= Request.Form("Web_Options") %>  <%= Request.Form("Options") %>  <%= Request.Form("Web_Product") %>  <%= Request.Form("Client") %>  <%= Request.Form("Web_Budget") %>  <%= Request.Form("Industry") %>

<% If rsDesigns.EOF And rsDesigns.BOF Then %>

Sorry, nothing found.

<% End If ' end rsDesigns.EOF And rsDesigns.BOF %>

<% While ((Repeat1__numRows <> 0) AND (NOT rsDesigns.EOF)) %>
">
PROJECT:
 <%=(rsDesigns.Fields.Item("Project").Value)%>
SIZE:
 <%=(rsDesigns.Fields.Item("Size").Value)%>
CLIENT:
 <%=(rsDesigns.Fields.Item("Client").Value)%>
LINE:
 <%=(rsDesigns.Fields.Item("Web_Product").Value)%>
Download
 
CONFIG:
 <%=(rsDesigns.Fields.Item("Web_Configuration").Value)%>
RequestInfo
*MSRP presented here are made available by the manufacturer and may NOT include all components as shown. The new exhibit model actual invoice prices may include additional dealer's cost for regional or local advertising or for selling, preparing, or financing the exhibit. All prices subject to change. For inquiries, call Abex Customer Service PLEASE NOTE: All renderings are the sole property of Abex Display Systems. ©2005 All Rights Reserved.

<% Repeat1__index=Repeat1__index+1 Repeat1__numRows=Repeat1__numRows-1 rsDesigns.MoveNext() Wend %>

 

©2005 Abex Display Systems • All Rights Reserved • webmaster@abex.com
 
<% rsDesigns.Close() Set rsDesigns = Nothing %>