% Session("location") = "Package_first.asp" If (Session("ProductList") = "") Then pic = "images/tcellar.gif" Else pic = "images/tcellar1.gif" End If set conn=Server.CreateObject("ADODB.Connection") conn.Open "wine8" sql = "SELECT Products.ProductName, Products.Package, Products.ProductCode, Products.LastModifyDate, Products.StockAvailable " sql = sql & "FROM Products " sql = sql & "WHERE Products.Package = 1 AND Products.StockAvailable <>1 " sql = sql & "ORDER BY Products.InsertDate DESC" set rs = conn.Execute( sql ) %>
|
|
|||
|
1.
Estimate quantity required |
|
||
|
2.
Choose taste preferred |
|
||
|
3.
Set a Budget |
|
||