<% Dim strDatabaseType strDatabaseType = "Access" strConnect = "Provider=Microsoft.Jet.OLEDB.4.0;" & _ "Data Source=C:\webdatabase\alpdb.mdb;" & _ "Mode=16;" & _ "Persist Security Info=False" strConnect1 = "Provider=Microsoft.Jet.OLEDB.4.0;" & _ "Data Source=C:\webdatabase\locs.mdb;" & _ "Mode=16;" & _ "Persist Security Info=False" %> Online Pricing Products - Advanced Litho Printing <% headalt = "More to come pricing pages" %>
<% = headalt %>E-Mail Sales - Advanced Litho PrintingE-Mail Sales - Advanced Litho Printing

Pricing Pages

Under Construction
Below is a list of pricing pages that we are currently working on. If you need prices on one of the products below, please use our quote request form. You will be amazed at the quality of our color printing services and high quality binding. No matter how simple or complex your printing job is, we can satisfy your needs. From art prints to note pads, we are your one stop shop.
<% Set objRS = Server.CreateObject ("ADODB.Recordset") objRS.Open "SELECT * FROM olproducts_alpha_noshow", strConnect, adOpenForwardOnly, adLockReadOnly, adCmdText While Not objRS.EOF %> <% objRS.MoveNext Wend objRS.Close %>
<% = objRS("product") %>