%@ EnableSessionState=False Language=VBScript %> <% Option Explicit %> <% Response.Buffer=TRUE 'Sachin Patel 'AMBest Company 11/20/2002 '*******DW 11/19/01 Get Template Data*********************** function GetMenuTemplate() dim rsMenuTemplate if sTemplate = "" then set rsMenuTemplate = Server.CreateObject("ADODB.Recordset") sSQL = "Select template from Menu_Manager Where site = '" & sSite & "'" rsMenuTemplate.Open sSQL,oConn,adOpenStatic,adLockReadOnly if not rsMenuTemplate.EOF then sTemplate = rsMenuTemplate("Template") end if end if GetMenuTemplate = sTemplate end function sSite="sales" sTemplate = GetMenuTemplate %>
![]() |
Products & Services | ||||||
| United States Asia Pacific CanadaEurope | About Contact Sitemap | ||||||
![]() ![]()
|
Article ReprintsInquiry FormThis is not an order form. Please complete the following fields and a Customer Service representative will contact you to answer questions and help fulfill your order. If you require additional information, please
call (908) 439-2200, ext. 5557 or e-mail article_reprints@ambest.com. |
||||||