Teleflora Spirit of Spring Bouquet

<%@ Language=VBScript %> <% Title = "Teleflora Spirit of Spring Bouquet" ImageURL = "http://www.larose.com/TheFlorist/Holidays/Saint_Patricks_Day/Images/VL_94294.jpg" Description = "For A St. Patrick's Day Wish send The Teleflora Spirit"+_ " of Spring Bouquet. The Teleflora Spirit of Spring Bouquet has yellow roses"+_ " arranged in a 4 inch by 4 inch green glass cube. The Teleflora Spirit"+_ " of Spring Bouquet captures Spirit of Spring. The Teleflora"+_ " Spirit of Spring 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_36-3GC" Price1 = 57.00 PriceDesc1 = "Teleflora Spirit of Spring 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 Spirit of Spring 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