<%@LANGUAGE="VBSCRIPT"%> <% Dim flowers__MMColParam flowers__MMColParam = "1" if (Request.QueryString("ProductID") <> "") then flowers__MMColParam = Request.QueryString("ProductID") %> <% set flowers = Server.CreateObject("ADODB.Recordset") flowers.ActiveConnection = MM_expressit_STRING flowers.Source = "SELECT * FROM products WHERE ProductID = '" + Replace(flowers__MMColParam, "'", "''") + "'" flowers.CursorType = 0 flowers.CursorLocation = 2 flowers.LockType = 3 flowers.Open() flowers_numRows = 0 %> Expressit Flowers by Sara
.jpg" alt="<%=(flowers.Fields.Item("ProductID").Value)%>">
<%=(flowers.Fields.Item("ProductID").Value)%> - <%=(flowers.Fields.Item("Description").Value)%>
<% flowers.Close() %>