%@ Language=VBScript %> <% Title = "Medium Spathiphyllum" ImageURL = "http://www.larose.com/TheFlorist/Holidays/Saint_Patricks_Day/Images/TF133_03_WH.jpg" Description = "The Medium Spathiphyllum is an ideal plant to"+_ " sent for many occasions. The Spathiphyllum is perfect for"+_ " apartments, it is a plant that will tolerate lower light and"+_ " thrive. The Medium Spathiphyllum does not need a lot of attention"+_ " to keep the dark green look. The Spathiphyllum shoots up white flag"+_ " like flowers. The Spathiphyllum is commonly called the peace lily."+_ " The Medium Spathiphyllum is delivered in a 8 inch pot and is about 28"+_ " inches high. The larger plant is fuller, sizes and containers vary by region." MultiPrice = 1 'Yes = 1, No = 0 MultiShip = 0 'Yes = 1, No = 0 Number1 = "TF133-3 Regular" Price1 = 55.00 PriceDesc1 = "(Shown) Medium Spathiphyllum - Regular" Shipping1 = 8.00 Number2 = "TF133-3 Fuller" Price2 = 65.00 PriceDesc2 = "Medium Spathiphyllum- Premium" Shipping2 = 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") %>
|
<%
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 %>
<%
If BC.Browser = "IE" Then
Response.Write " <% 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 |