Teleflora Misty Morning Bouquet

<%@ Language=VBScript %> <% Title = "Teleflora Misty Morning Bouquet" ImageURL = "http://www.larose.com/TheFlorist/Holidays/Saint_Patricks_Day/Images/VL_89746.jpg" Description = "For A St. Patrick's Day Wish send The Teleflora Misty"+_ " Morning Bouquet. The Teleflora Misty Morning Bouquet has layers of green"+_ " arranged in a 4 inch by 4 inch green glass cube. The Teleflora Misty"+_ " Morning Bouquet captures the peace of an Irish Misty Morning. The Teleflora"+_ " Misty Morning Bouquet is available throughout most of the USA and Canada, if"+_ " the Exact Cube and flowers are not available in the region of your delivery"+_ " a similar arrangement will be designed by the local professional florist." MultiPrice = 1 'Yes = 1, No = 0 MultiShip = 0 'Yes = 1, No = 0 Number1 = "TF_05N200" Price1 = 37.00 PriceDesc1 = "Teleflora Misty Morning Bouquet" Shipping1 = 8.00 Quantity = 1 Vendor = 0 VendorLoc = "New Jersey" VendorZip = "07305" Tax = 1 ItemType = 0 '0 = Florist Items, 1 = Other Set BC = Server.CreateObject ("MSWC.BrowserType") %> Teleflora Misty Morning Bouquet

<% dim prev, prevtxt, nxt, nxttxt, toptxt, scr, america_array, lastel, fcount, ffound scr = Request.ServerVariables("SCRIPT_NAME") if instr(scr,"/")>0 then scr = right(scr, len(scr) - instrRev(scr,"/")) end if page_array = get_patricks() lastel = ubound(page_array)-1 fcount = 0 For Each item In page_array if item = trim(scr) then 'response.Write(item & " : " & scr & "
") ffound = fcount else 'response.Write(item & "
") end if fcount = fcount + 1 Next 'response.Write(ffound) toptxt = get_top() prevtxt = "<< PREV" nxttxt = "NEXT >>" if(ffound > 0) then prev = ffound-1 prevtxt = ""&prevtxt&"" end if if(ffound < lastel) then nxt = ffound+1 nxttxt = ""&nxttxt&"" end if %>

<%= prevtxt%>

<%= toptxt%>

<%= nxttxt%>

<% If BC.Browser = "IE" Then Response.Write " " & Title & " " Else Response.Write "" End If %>

<% Response.Write Description %>

This is a branded Teleflora Product and Design. The Local Delivering Affiliate florist will design this arrangement as close as possible to the pictured arrangement while using the freshest available flowers on the day of your delivery.

Teleflora is a registered trademark of the Teleflora Corporation