<% getHeader %>

Browse through our Product Catalog.






















TABLE OF CONTENTS
PAGE NO.
Ribbons 1 - 2 - 3 - 4
Birds, Butterflies 5
Basic Accessories 7
Ceramic & Galvanized containers 8
Latex Balloons 9
Balloon Accessories, Curling Ribbons, Ribbon Racks 10
Mylar Balloons 11 - 12
Silk Flowers 15
Dried Materials 23 - 24 - 25 - 26 - 27 - 28
Packaging Materials 29 - 30 - 31 - 32
Floral Boxes, Delivery Trays 33 - 34
Bridal Accessories, Easels 35 - 36 - 37 - 38
Funeral Accessories 39 - 40
Candles, Candle Holders & Accessories 41 - 42
Cards, Care Tags, Envelopes, Order Forms, Design Books 43 - 44
Cardettes, Wire, Pin Frogs 45 - 46
Design Tools, Aqua Pick, Stem Cutter 47 - 48
Glue Guns, Tapes, Adhesive Spray 49 - 50
Oasis Foams & Accessories 51 - 52
Flower Food & Conditioner 53 - 54
Styrofoams 55 - 56
Containers - Baskets 57 - 58
Containers - Glass 59 - 60 - 61 - 62 - 63 - 64
Containers - Plastic 65 - 66 - 67 - 68 - 69 - 70
Containers - Paper Mache 71 - 72
Containers - Stock Vases 73 - 74
Holidays 75
   

 


Contact Us | Where to buy | Map & Directions | Policies | About Us | Specials | Home
© 2002 Mt. Eden Floral Company, All rights reserved.
<% end sub %> <% sub preserveForm(frmName) index = request.form().count 'dim frmName() redim tmpArray(index) i = 0 for each item in request.form tmp = request.form(item) 'response.write(item & " = " & tmp & "
") tmpArray(i) = item &"="&tmp i = i + 1 next 'for i = lbound(tmpArray) to ubound(tmpArray)-1 ' response.write("tmpArray[" & i & "] = " & tmpArray(i) & "
") 'next session(frmName) = tmpArray end sub sub getFormContents(frmName) formName = frmName flush = request("flush") if (flush) then unloadForm frmName else ' response.write (frmName) tmpArray = session(frmName) %> <% end if end sub sub unloadForm(frmName) session(frmName) = "" end sub ' ============================================================================== ' Subroutine : requireLevel(userlevels) ' verifies that the level is correct ' parameters : userlevels (ARRAY) ' ============================================================================== statusArray = Array("Not Sent", "Sent", "Assigned", "Confirmed", "Complete") function getrandom() Randomize getrandom = Rnd end function sub requireLevel(userlevels) for i = 0 to ubound(userlevels) if userlevels(i) = cint(Session("usertype")) then successFlag = TRUE end if next if (successFlag = TRUE) then 'you are of the correct level else openHTML "User Access Restriction" var1 = 0 var2 = 0 openTable var1,var2,0 %> <% end sub %> <% sub preserveForm(frmName) index = request.form().count 'dim frmName() redim tmpArray(index) i = 0 for each item in request.form tmp = request.form(item) 'response.write(item & " = " & tmp & "
") tmpArray(i) = item &"="&tmp i = i + 1 next 'for i = lbound(tmpArray) to ubound(tmpArray)-1 ' response.write("tmpArray[" & i & "] = " & tmpArray(i) & "
") 'next session(frmName) = tmpArray end sub sub getFormContents(frmName) formName = frmName flush = request("flush") if (flush) then unloadForm frmName else ' response.write (frmName) tmpArray = session(frmName) %> <% end if end sub sub unloadForm(frmName) session(frmName) = "" end sub ' ============================================================================== ' Subroutine : requireLevel(userlevels) ' verifies that the level is correct ' parameters : userlevels (ARRAY) ' ============================================================================== statusArray = Array("Not Sent", "Sent", "Assigned", "Confirmed", "Complete") function getrandom() Randomize getrandom = Rnd end function sub requireLevel(userlevels) for i = 0 to ubound(userlevels) if userlevels(i) = cint(Session("usertype")) then successFlag = TRUE end if next if (successFlag = TRUE) then 'you are of the correct level else openHTML "User Access Restriction" var1 = 0 var2 = 0 openTable var1,var2,0 %> <% end sub %> <% sub preserveForm(frmName) index = request.form().count 'dim frmName() redim tmpArray(index) i = 0 for each item in request.form tmp = request.form(item) 'response.write(item & " = " & tmp & "
") tmpArray(i) = item &"="&tmp i = i + 1 next 'for i = lbound(tmpArray) to ubound(tmpArray)-1 ' response.write("tmpArray[" & i & "] = " & tmpArray(i) & "
") 'next session(frmName) = tmpArray end sub sub getFormContents(frmName) formName = frmName flush = request("flush") if (flush) then unloadForm frmName else ' response.write (frmName) tmpArray = session(frmName) %> <% end if end sub sub unloadForm(frmName) session(frmName) = "" end sub ' ============================================================================== ' Subroutine : requireLevel(userlevels) ' verifies that the level is correct ' parameters : userlevels (ARRAY) ' ============================================================================== statusArray = Array("Not Sent", "Sent", "Assigned", "Confirmed", "Complete") function getrandom() Randomize getrandom = Rnd end function sub requireLevel(userlevels) for i = 0 to ubound(userlevels) if userlevels(i) = cint(Session("usertype")) then successFlag = TRUE end if next if (successFlag = TRUE) then 'you are of the correct level else openHTML "User Access Restriction" var1 = 0 var2 = 0 openTable var1,var2,0 %> <% end sub %> <% sub preserveForm(frmName) index = request.form().count 'dim frmName() redim tmpArray(index) i = 0 for each item in request.form tmp = request.form(item) 'response.write(item & " = " & tmp & "
") tmpArray(i) = item &"="&tmp i = i + 1 next 'for i = lbound(tmpArray) to ubound(tmpArray)-1 ' response.write("tmpArray[" & i & "] = " & tmpArray(i) & "
") 'next session(frmName) = tmpArray end sub sub getFormContents(frmName) formName = frmName flush = request("flush") if (flush) then unloadForm frmName else ' response.write (frmName) tmpArray = session(frmName) %> <% end if end sub sub unloadForm(frmName) session(frmName) = "" end sub ' ============================================================================== ' Subroutine : requireLevel(userlevels) ' verifies that the level is correct ' parameters : userlevels (ARRAY) ' ============================================================================== statusArray = Array("Not Sent", "Sent", "Assigned", "Confirmed", "Complete") function getrandom() Randomize getrandom = Rnd end function sub requireLevel(userlevels) for i = 0 to ubound(userlevels) if userlevels(i) = cint(Session("usertype")) then successFlag = TRUE end if next if (successFlag = TRUE) then 'you are of the correct level else openHTML "User Access Restriction" var1 = 0 var2 = 0 openTable var1,var2,0 %> <% end sub %> <% sub preserveForm(frmName) index = request.form().count 'dim frmName() redim tmpArray(index) i = 0 for each item in request.form tmp = request.form(item) 'response.write(item & " = " & tmp & "
") tmpArray(i) = item &"="&tmp i = i + 1 next 'for i = lbound(tmpArray) to ubound(tmpArray)-1 ' response.write("tmpArray[" & i & "] = " & tmpArray(i) & "
") 'next session(frmName) = tmpArray end sub sub getFormContents(frmName) formName = frmName flush = request("flush") if (flush) then unloadForm frmName else ' response.write (frmName) tmpArray = session(frmName) %> <% end if end sub sub unloadForm(frmName) session(frmName) = "" end sub ' ============================================================================== ' Subroutine : requireLevel(userlevels) ' verifies that the level is correct ' parameters : userlevels (ARRAY) ' ============================================================================== statusArray = Array("Not Sent", "Sent", "Assigned", "Confirmed", "Complete") function getrandom() Randomize getrandom = Rnd end function sub requireLevel(userlevels) for i = 0 to ubound(userlevels) if userlevels(i) = cint(Session("usertype")) then successFlag = TRUE end if next if (successFlag = TRUE) then 'you are of the correct level else openHTML "User Access Restriction" var1 = 0 var2 = 0 openTable var1,var2,0 %> <% end sub %> <% sub preserveForm(frmName) index = request.form().count 'dim frmName() redim tmpArray(index) i = 0 for each item in request.form tmp = request.form(item) 'response.write(item & " = " & tmp & "
") tmpArray(i) = item &"="&tmp i = i + 1 next 'for i = lbound(tmpArray) to ubound(tmpArray)-1 ' response.write("tmpArray[" & i & "] = " & tmpArray(i) & "
") 'next session(frmName) = tmpArray end sub sub getFormContents(frmName) formName = frmName flush = request("flush") if (flush) then unloadForm frmName else ' response.write (frmName) tmpArray = session(frmName) %> <% end if end sub sub unloadForm(frmName) session(frmName) = "" end sub ' ============================================================================== ' Subroutine : requireLevel(userlevels) ' verifies that the level is correct ' parameters : userlevels (ARRAY) ' ============================================================================== statusArray = Array("Not Sent", "Sent", "Assigned", "Confirmed", "Complete") function getrandom() Randomize getrandom = Rnd end function sub requireLevel(userlevels) for i = 0 to ubound(userlevels) if userlevels(i) = cint(Session("usertype")) then successFlag = TRUE end if next if (successFlag = TRUE) then 'you are of the correct level else openHTML "User Access Restriction" var1 = 0 var2 = 0 openTable var1,var2,0 %> <% end sub %> <% sub preserveForm(frmName) index = request.form().count 'dim frmName() redim tmpArray(index) i = 0 for each item in request.form tmp = request.form(item) 'response.write(item & " = " & tmp & "
") tmpArray(i) = item &"="&tmp i = i + 1 next 'for i = lbound(tmpArray) to ubound(tmpArray)-1 ' response.write("tmpArray[" & i & "] = " & tmpArray(i) & "
") 'next session(frmName) = tmpArray end sub sub getFormContents(frmName) formName = frmName flush = request("flush") if (flush) then unloadForm frmName else ' response.write (frmName) tmpArray = session(frmName) %> <% end if end sub sub unloadForm(frmName) session(frmName) = "" end sub ' ============================================================================== ' Subroutine : requireLevel(userlevels) ' verifies that the level is correct ' parameters : userlevels (ARRAY) ' ============================================================================== statusArray = Array("Not Sent", "Sent", "Assigned", "Confirmed", "Complete") function getrandom() Randomize getrandom = Rnd end function sub requireLevel(userlevels) for i = 0 to ubound(userlevels) if userlevels(i) = cint(Session("usertype")) then successFlag = TRUE end if next if (successFlag = TRUE) then 'you are of the correct level else openHTML "User Access Restriction" var1 = 0 var2 = 0 openTable var1,var2,0 %> <% end sub %> <% sub preserveForm(frmName) index = request.form().count 'dim frmName() redim tmpArray(index) i = 0 for each item in request.form tmp = request.form(item) 'response.write(item & " = " & tmp & "
") tmpArray(i) = item &"="&tmp i = i + 1 next 'for i = lbound(tmpArray) to ubound(tmpArray)-1 ' response.write("tmpArray[" & i & "] = " & tmpArray(i) & "
") 'next session(frmName) = tmpArray end sub sub getFormContents(frmName) formName = frmName flush = request("flush") if (flush) then unloadForm frmName else ' response.write (frmName) tmpArray = session(frmName) %> <% end if end sub sub unloadForm(frmName) session(frmName) = "" end sub ' ============================================================================== ' Subroutine : requireLevel(userlevels) ' verifies that the level is correct ' parameters : userlevels (ARRAY) ' ============================================================================== statusArray = Array("Not Sent", "Sent", "Assigned", "Confirmed", "Complete") function getrandom() Randomize getrandom = Rnd end function sub requireLevel(userlevels) for i = 0 to ubound(userlevels) if userlevels(i) = cint(Session("usertype")) then successFlag = TRUE end if next if (successFlag = TRUE) then 'you are of the correct level else openHTML "User Access Restriction" var1 = 0 var2 = 0 openTable var1,var2,0 %> <% end sub %> <% sub preserveForm(frmName) index = request.form().count 'dim frmName() redim tmpArray(index) i = 0 for each item in request.form tmp = request.form(item) 'response.write(item & " = " & tmp & "
") tmpArray(i) = item &"="&tmp i = i + 1 next 'for i = lbound(tmpArray) to ubound(tmpArray)-1 ' response.write("tmpArray[" & i & "] = " & tmpArray(i) & "
") 'next session(frmName) = tmpArray end sub sub getFormContents(frmName) formName = frmName flush = request("flush") if (flush) then unloadForm frmName else ' response.write (frmName) tmpArray = session(frmName) %> <% end if end sub sub unloadForm(frmName) session(frmName) = "" end sub ' ============================================================================== ' Subroutine : requireLevel(userlevels) ' verifies that the level is correct ' parameters : userlevels (ARRAY) ' ============================================================================== statusArray = Array("Not Sent", "Sent", "Assigned", "Confirmed", "Complete") function getrandom() Randomize getrandom = Rnd end function sub requireLevel(userlevels) for i = 0 to ubound(userlevels) if userlevels(i) = cint(Session("usertype")) then successFlag = TRUE end if next if (successFlag = TRUE) then 'you are of the correct level else openHTML "User Access Restriction" var1 = 0 var2 = 0 openTable var1,var2,0 %> <% end sub %> <% sub preserveForm(frmName) index = request.form().count 'dim frmName() redim tmpArray(index) i = 0 for each item in request.form tmp = request.form(item) 'response.write(item & " = " & tmp & "
") tmpArray(i) = item &"="&tmp i = i + 1 next 'for i = lbound(tmpArray) to ubound(tmpArray)-1 ' response.write("tmpArray[" & i & "] = " & tmpArray(i) & "
") 'next session(frmName) = tmpArray end sub sub getFormContents(frmName) formName = frmName flush = request("flush") if (flush) then unloadForm frmName else ' response.write (frmName) tmpArray = session(frmName) %> <% end if end sub sub unloadForm(frmName) session(frmName) = "" end sub ' ============================================================================== ' Subroutine : requireLevel(userlevels) ' verifies that the level is correct ' parameters : userlevels (ARRAY) ' ============================================================================== statusArray = Array("Not Sent", "Sent", "Assigned", "Confirmed", "Complete") function getrandom() Randomize getrandom = Rnd end function sub requireLevel(userlevels) for i = 0 to ubound(userlevels) if userlevels(i) = cint(Session("usertype")) then successFlag = TRUE end if next if (successFlag = TRUE) then 'you are of the correct level else openHTML "User Access Restriction" var1 = 0 var2 = 0 openTable var1,var2,0 %> <% end sub %> <% sub preserveForm(frmName) index = request.form().count 'dim frmName() redim tmpArray(index) i = 0 for each item in request.form tmp = request.form(item) 'response.write(item & " = " & tmp & "
") tmpArray(i) = item &"="&tmp i = i + 1 next 'for i = lbound(tmpArray) to ubound(tmpArray)-1 ' response.write("tmpArray[" & i & "] = " & tmpArray(i) & "
") 'next session(frmName) = tmpArray end sub sub getFormContents(frmName) formName = frmName flush = request("flush") if (flush) then unloadForm frmName else ' response.write (frmName) tmpArray = session(frmName) %> <% end if end sub sub unloadForm(frmName) session(frmName) = "" end sub ' ============================================================================== ' Subroutine : requireLevel(userlevels) ' verifies that the level is correct ' parameters : userlevels (ARRAY) ' ============================================================================== statusArray = Array("Not Sent", "Sent", "Assigned", "Confirmed", "Complete") function getrandom() Randomize getrandom = Rnd end function sub requireLevel(userlevels) for i = 0 to ubound(userlevels) if userlevels(i) = cint(Session("usertype")) then successFlag = TRUE end if next if (successFlag = TRUE) then 'you are of the correct level else openHTML "User Access Restriction" var1 = 0 var2 = 0 openTable var1,var2,0 %> <% end sub %> <% sub preserveForm(frmName) index = request.form().count 'dim frmName() redim tmpArray(index) i = 0 for each item in request.form tmp = request.form(item) 'response.write(item & " = " & tmp & "
") tmpArray(i) = item &"="&tmp i = i + 1 next 'for i = lbound(tmpArray) to ubound(tmpArray)-1 ' response.write("tmpArray[" & i & "] = " & tmpArray(i) & "
") 'next session(frmName) = tmpArray end sub sub getFormContents(frmName) formName = frmName flush = request("flush") if (flush) then unloadForm frmName else ' response.write (frmName) tmpArray = session(frmName) %> <% end if end sub sub unloadForm(frmName) session(frmName) = "" end sub ' ============================================================================== ' Subroutine : requireLevel(userlevels) ' verifies that the level is correct ' parameters : userlevels (ARRAY) ' ============================================================================== statusArray = Array("Not Sent", "Sent", "Assigned", "Confirmed", "Complete") function getrandom() Randomize getrandom = Rnd end function sub requireLevel(userlevels) for i = 0 to ubound(userlevels) if userlevels(i) = cint(Session("usertype")) then successFlag = TRUE end if next if (successFlag = TRUE) then 'you are of the correct level else openHTML "User Access Restriction" var1 = 0 var2 = 0 openTable var1,var2,0 %> <% end sub %> <% sub preserveForm(frmName) index = request.form().count 'dim frmName() redim tmpArray(index) i = 0 for each item in request.form tmp = request.form(item) 'response.write(item & " = " & tmp & "
") tmpArray(i) = item &"="&tmp i = i + 1 next 'for i = lbound(tmpArray) to ubound(tmpArray)-1 ' response.write("tmpArray[" & i & "] = " & tmpArray(i) & "
") 'next session(frmName) = tmpArray end sub sub getFormContents(frmName) formName = frmName flush = request("flush") if (flush) then unloadForm frmName else ' response.write (frmName) tmpArray = session(frmName) %> <% end if end sub sub unloadForm(frmName) session(frmName) = "" end sub ' ============================================================================== ' Subroutine : requireLevel(userlevels) ' verifies that the level is correct ' parameters : userlevels (ARRAY) ' ============================================================================== statusArray = Array("Not Sent", "Sent", "Assigned", "Confirmed", "Complete") function getrandom() Randomize getrandom = Rnd end function sub requireLevel(userlevels) for i = 0 to ubound(userlevels) if userlevels(i) = cint(Session("usertype")) then successFlag = TRUE end if next if (successFlag = TRUE) then 'you are of the correct level else openHTML "User Access Restriction" var1 = 0 var2 = 0 openTable var1,var2,0 %> <% end sub %> <% sub preserveForm(frmName) index = request.form().count 'dim frmName() redim tmpArray(index) i = 0 for each item in request.form tmp = request.form(item) 'response.write(item & " = " & tmp & "
") tmpArray(i) = item &"="&tmp i = i + 1 next 'for i = lbound(tmpArray) to ubound(tmpArray)-1 ' response.write("tmpArray[" & i & "] = " & tmpArray(i) & "
") 'next session(frmName) = tmpArray end sub sub getFormContents(frmName) formName = frmName flush = request("flush") if (flush) then unloadForm frmName else ' response.write (frmName) tmpArray = session(frmName) %> <% end if end sub sub unloadForm(frmName) session(frmName) = "" end sub ' ============================================================================== ' Subroutine : requireLevel(userlevels) ' verifies that the level is correct ' parameters : userlevels (ARRAY) ' ============================================================================== statusArray = Array("Not Sent", "Sent", "Assigned", "Confirmed", "Complete") function getrandom() Randomize getrandom = Rnd end function sub requireLevel(userlevels) for i = 0 to ubound(userlevels) if userlevels(i) = cint(Session("usertype")) then successFlag = TRUE end if next if (successFlag = TRUE) then 'you are of the correct level else openHTML "User Access Restriction" var1 = 0 var2 = 0 openTable var1,var2,0 %> <% end sub %> <% sub preserveForm(frmName) index = request.form().count 'dim frmName() redim tmpArray(index) i = 0 for each item in request.form tmp = request.form(item) 'response.write(item & " = " & tmp & "
") tmpArray(i) = item &"="&tmp i = i + 1 next 'for i = lbound(tmpArray) to ubound(tmpArray)-1 ' response.write("tmpArray[" & i & "] = " & tmpArray(i) & "
") 'next session(frmName) = tmpArray end sub sub getFormContents(frmName) formName = frmName flush = request("flush") if (flush) then unloadForm frmName else ' response.write (frmName) tmpArray = session(frmName) %> <% end if end sub sub unloadForm(frmName) session(frmName) = "" end sub ' ============================================================================== ' Subroutine : requireLevel(userlevels) ' verifies that the level is correct ' parameters : userlevels (ARRAY) ' ============================================================================== statusArray = Array("Not Sent", "Sent", "Assigned", "Confirmed", "Complete") function getrandom() Randomize getrandom = Rnd end function sub requireLevel(userlevels) for i = 0 to ubound(userlevels) if userlevels(i) = cint(Session("usertype")) then successFlag = TRUE end if next if (successFlag = TRUE) then 'you are of the correct level else openHTML "User Access Restriction" var1 = 0 var2 = 0 openTable var1,var2,0 %> <% end sub %> <% sub preserveForm(frmName) index = request.form().count 'dim frmName() redim tmpArray(index) i = 0 for each item in request.form tmp = request.form(item) 'response.write(item & " = " & tmp & "
") tmpArray(i) = item &"="&tmp i = i + 1 next 'for i = lbound(tmpArray) to ubound(tmpArray)-1 ' response.write("tmpArray[" & i & "] = " & tmpArray(i) & "
") 'next session(frmName) = tmpArray end sub sub getFormContents(frmName) formName = frmName flush = request("flush") if (flush) then unloadForm frmName else ' response.write (frmName) tmpArray = session(frmName) %> <% end if end sub sub unloadForm(frmName) session(frmName) = "" end sub ' ============================================================================== ' Subroutine : requireLevel(userlevels) ' verifies that the level is correct ' parameters : userlevels (ARRAY) ' ============================================================================== statusArray = Array("Not Sent", "Sent", "Assigned", "Confirmed", "Complete") function getrandom() Randomize getrandom = Rnd end function sub requireLevel(userlevels) for i = 0 to ubound(userlevels) if userlevels(i) = cint(Session("usertype")) then successFlag = TRUE end if next if (successFlag = TRUE) then 'you are of the correct level else openHTML "User Access Restriction" var1 = 0 var2 = 0 openTable var1,var2,0 %> <% end sub %> <% sub preserveForm(frmName) index = request.form().count 'dim frmName() redim tmpArray(index) i = 0 for each item in request.form tmp = request.form(item) 'response.write(item & " = " & tmp & "
") tmpArray(i) = item &"="&tmp i = i + 1 next 'for i = lbound(tmpArray) to ubound(tmpArray)-1 ' response.write("tmpArray[" & i & "] = " & tmpArray(i) & "
") 'next session(frmName) = tmpArray end sub sub getFormContents(frmName) formName = frmName flush = request("flush") if (flush) then unloadForm frmName else ' response.write (frmName) tmpArray = session(frmName) %> <% end if end sub sub unloadForm(frmName) session(frmName) = "" end sub ' ============================================================================== ' Subroutine : requireLevel(userlevels) ' verifies that the level is correct ' parameters : userlevels (ARRAY) ' ============================================================================== statusArray = Array("Not Sent", "Sent", "Assigned", "Confirmed", "Complete") function getrandom() Randomize getrandom = Rnd end function sub requireLevel(userlevels) for i = 0 to ubound(userlevels) if userlevels(i) = cint(Session("usertype")) then successFlag = TRUE end if next if (successFlag = TRUE) then 'you are of the correct level else openHTML "User Access Restriction" var1 = 0 var2 = 0 openTable var1,var2,0 %> <% end sub %> <% sub preserveForm(frmName) index = request.form().count 'dim frmName() redim tmpArray(index) i = 0 for each item in request.form tmp = request.form(item) 'response.write(item & " = " & tmp & "
") tmpArray(i) = item &"="&tmp i = i + 1 next 'for i = lbound(tmpArray) to ubound(tmpArray)-1 ' response.write("tmpArray[" & i & "] = " & tmpArray(i) & "
") 'next session(frmName) = tmpArray end sub sub getFormContents(frmName) formName = frmName flush = request("flush") if (flush) then unloadForm frmName else ' response.write (frmName) tmpArray = session(frmName) %> <% end if end sub sub unloadForm(frmName) session(frmName) = "" end sub ' ============================================================================== ' Subroutine : requireLevel(userlevels) ' verifies that the level is correct ' parameters : userlevels (ARRAY) ' ============================================================================== statusArray = Array("Not Sent", "Sent", "Assigned", "Confirmed", "Complete") function getrandom() Randomize getrandom = Rnd end function sub requireLevel(userlevels) for i = 0 to ubound(userlevels) if userlevels(i) = cint(Session("usertype")) then successFlag = TRUE end if next if (successFlag = TRUE) then 'you are of the correct level else openHTML "User Access Restriction" var1 = 0 var2 = 0 openTable var1,var2,0 %> <% end sub %> <% sub preserveForm(frmName) index = request.form().count 'dim frmName() redim tmpArray(index) i = 0 for each item in request.form tmp = request.form(item) 'response.write(item & " = " & tmp & "
") tmpArray(i) = item &"="&tmp i = i + 1 next 'for i = lbound(tmpArray) to ubound(tmpArray)-1 ' response.write("tmpArray[" & i & "] = " & tmpArray(i) & "
") 'next session(frmName) = tmpArray end sub sub getFormContents(frmName) formName = frmName flush = request("flush") if (flush) then unloadForm frmName else ' response.write (frmName) tmpArray = session(frmName) %> <% end if end sub sub unloadForm(frmName) session(frmName) = "" end sub ' ============================================================================== ' Subroutine : requireLevel(userlevels) ' verifies that the level is correct ' parameters : userlevels (ARRAY) ' ============================================================================== statusArray = Array("Not Sent", "Sent", "Assigned", "Confirmed", "Complete") function getrandom() Randomize getrandom = Rnd end function sub requireLevel(userlevels) for i = 0 to ubound(userlevels) if userlevels(i) = cint(Session("usertype")) then successFlag = TRUE end if next if (successFlag = TRUE) then 'you are of the correct level else openHTML "User Access Restriction" var1 = 0 var2 = 0 openTable var1,var2,0 %> <% end sub %> <% sub preserveForm(frmName) index = request.form().count 'dim frmName() redim tmpArray(index) i = 0 for each item in request.form tmp = request.form(item) 'response.write(item & " = " & tmp & "
") tmpArray(i) = item &"="&tmp i = i + 1 next 'for i = lbound(tmpArray) to ubound(tmpArray)-1 ' response.write("tmpArray[" & i & "] = " & tmpArray(i) & "
") 'next session(frmName) = tmpArray end sub sub getFormContents(frmName) formName = frmName flush = request("flush") if (flush) then unloadForm frmName else ' response.write (frmName) tmpArray = session(frmName) %> <% end if end sub sub unloadForm(frmName) session(frmName) = "" end sub ' ============================================================================== ' Subroutine : requireLevel(userlevels) ' verifies that the level is correct ' parameters : userlevels (ARRAY) ' ============================================================================== statusArray = Array("Not Sent", "Sent", "Assigned", "Confirmed", "Complete") function getrandom() Randomize getrandom = Rnd end function sub requireLevel(userlevels) for i = 0 to ubound(userlevels) if userlevels(i) = cint(Session("usertype")) then successFlag = TRUE end if next if (successFlag = TRUE) then 'you are of the correct level else openHTML "User Access Restriction" var1 = 0 var2 = 0 openTable var1,var2,0 %> <% end sub %> <% sub preserveForm(frmName) index = request.form().count 'dim frmName() redim tmpArray(index) i = 0 for each item in request.form tmp = request.form(item) 'response.write(item & " = " & tmp & "
") tmpArray(i) = item &"="&tmp i = i + 1 next 'for i = lbound(tmpArray) to ubound(tmpArray)-1 ' response.write("tmpArray[" & i & "] = " & tmpArray(i) & "
") 'next session(frmName) = tmpArray end sub sub getFormContents(frmName) formName = frmName flush = request("flush") if (flush) then unloadForm frmName else ' response.write (frmName) tmpArray = session(frmName) %> <% end if end sub sub unloadForm(frmName) session(frmName) = "" end sub ' ============================================================================== ' Subroutine : requireLevel(userlevels) ' verifies that the level is correct ' parameters : userlevels (ARRAY) ' ============================================================================== statusArray = Array("Not Sent", "Sent", "Assigned", "Confirmed", "Complete") function getrandom() Randomize getrandom = Rnd end function sub requireLevel(userlevels) for i = 0 to ubound(userlevels) if userlevels(i) = cint(Session("usertype")) then successFlag = TRUE end if next if (successFlag = TRUE) then 'you are of the correct level else openHTML "User Access Restriction" var1 = 0 var2 = 0 openTable var1,var2,0 %> <% end sub %> <% sub preserveForm(frmName) index = request.form().count 'dim frmName() redim tmpArray(index) i = 0 for each item in request.form tmp = request.form(item) 'response.write(item & " = " & tmp & "
") tmpArray(i) = item &"="&tmp i = i + 1 next 'for i = lbound(tmpArray) to ubound(tmpArray)-1 ' response.write("tmpArray[" & i & "] = " & tmpArray(i) & "
") 'next session(frmName) = tmpArray end sub sub getFormContents(frmName) formName = frmName flush = request("flush") if (flush) then unloadForm frmName else ' response.write (frmName) tmpArray = session(frmName) %> <% end if end sub sub unloadForm(frmName) session(frmName) = "" end sub ' ============================================================================== ' Subroutine : requireLevel(userlevels) ' verifies that the level is correct ' parameters : userlevels (ARRAY) ' ============================================================================== statusArray = Array("Not Sent", "Sent", "Assigned", "Confirmed", "Complete") function getrandom() Randomize getrandom = Rnd end function sub requireLevel(userlevels) for i = 0 to ubound(userlevels) if userlevels(i) = cint(Session("usertype")) then successFlag = TRUE end if next if (successFlag = TRUE) then 'you are of the correct level else openHTML "User Access Restriction" var1 = 0 var2 = 0 openTable var1,var2,0 %> <% end sub %> <% sub preserveForm(frmName) index = request.form().count 'dim frmName() redim tmpArray(index) i = 0 for each item in request.form tmp = request.form(item) 'response.write(item & " = " & tmp & "
") tmpArray(i) = item &"="&tmp i = i + 1 next 'for i = lbound(tmpArray) to ubound(tmpArray)-1 ' response.write("tmpArray[" & i & "] = " & tmpArray(i) & "
") 'next session(frmName) = tmpArray end sub sub getFormContents(frmName) formName = frmName flush = request("flush") if (flush) then unloadForm frmName else ' response.write (frmName) tmpArray = session(frmName) %> <% end if end sub sub unloadForm(frmName) session(frmName) = "" end sub ' ============================================================================== ' Subroutine : requireLevel(userlevels) ' verifies that the level is correct ' parameters : userlevels (ARRAY) ' ============================================================================== statusArray = Array("Not Sent", "Sent", "Assigned", "Confirmed", "Complete") function getrandom() Randomize getrandom = Rnd end function sub requireLevel(userlevels) for i = 0 to ubound(userlevels) if userlevels(i) = cint(Session("usertype")) then successFlag = TRUE end if next if (successFlag = TRUE) then 'you are of the correct level else openHTML "User Access Restriction" var1 = 0 var2 = 0 openTable var1,var2,0 %> <% end sub %> <% sub preserveForm(frmName) index = request.form().count 'dim frmName() redim tmpArray(index) i = 0 for each item in request.form tmp = request.form(item) 'response.write(item & " = " & tmp & "
") tmpArray(i) = item &"="&tmp i = i + 1 next 'for i = lbound(tmpArray) to ubound(tmpArray)-1 ' response.write("tmpArray[" & i & "] = " & tmpArray(i) & "
") 'next session(frmName) = tmpArray end sub sub getFormContents(frmName) formName = frmName flush = request("flush") if (flush) then unloadForm frmName else ' response.write (frmName) tmpArray = session(frmName) %> <% end if end sub sub unloadForm(frmName) session(frmName) = "" end sub ' ============================================================================== ' Subroutine : requireLevel(userlevels) ' verifies that the level is correct ' parameters : userlevels (ARRAY) ' ============================================================================== statusArray = Array("Not Sent", "Sent", "Assigned", "Confirmed", "Complete") function getrandom() Randomize getrandom = Rnd end function sub requireLevel(userlevels) for i = 0 to ubound(userlevels) if userlevels(i) = cint(Session("usertype")) then successFlag = TRUE end if next if (successFlag = TRUE) then 'you are of the correct level else openHTML "User Access Restriction" var1 = 0 var2 = 0 openTable var1,var2,0 %> <% end sub %> <% sub preserveForm(frmName) index = request.form().count 'dim frmName() redim tmpArray(index) i = 0 for each item in request.form tmp = request.form(item) 'response.write(item & " = " & tmp & "
") tmpArray(i) = item &"="&tmp i = i + 1 next 'for i = lbound(tmpArray) to ubound(tmpArray)-1 ' response.write("tmpArray[" & i & "] = " & tmpArray(i) & "
") 'next session(frmName) = tmpArray end sub sub getFormContents(frmName) formName = frmName flush = request("flush") if (flush) then unloadForm frmName else ' response.write (frmName) tmpArray = session(frmName) %> <% end if end sub sub unloadForm(frmName) session(frmName) = "" end sub ' ============================================================================== ' Subroutine : requireLevel(userlevels) ' verifies that the level is correct ' parameters : userlevels (ARRAY) ' ============================================================================== statusArray = Array("Not Sent", "Sent", "Assigned", "Confirmed", "Complete") function getrandom() Randomize getrandom = Rnd end function sub requireLevel(userlevels) for i = 0 to ubound(userlevels) if userlevels(i) = cint(Session("usertype")) then successFlag = TRUE end if next if (successFlag = TRUE) then 'you are of the correct level else openHTML "User Access Restriction" var1 = 0 var2 = 0 openTable var1,var2,0 %> <% end sub %> <% sub preserveForm(frmName) index = request.form().count 'dim frmName() redim tmpArray(index) i = 0 for each item in request.form tmp = request.form(item) 'response.write(item & " = " & tmp & "
") tmpArray(i) = item &"="&tmp i = i + 1 next 'for i = lbound(tmpArray) to ubound(tmpArray)-1 ' response.write("tmpArray[" & i & "] = " & tmpArray(i) & "
") 'next session(frmName) = tmpArray end sub sub getFormContents(frmName) formName = frmName flush = request("flush") if (flush) then unloadForm frmName else ' response.write (frmName) tmpArray = session(frmName) %> <% end if end sub sub unloadForm(frmName) session(frmName) = "" end sub ' ============================================================================== ' Subroutine : requireLevel(userlevels) ' verifies that the level is correct ' parameters : userlevels (ARRAY) ' ============================================================================== statusArray = Array("Not Sent", "Sent", "Assigned", "Confirmed", "Complete") function getrandom() Randomize getrandom = Rnd end function sub requireLevel(userlevels) for i = 0 to ubound(userlevels) if userlevels(i) = cint(Session("usertype")) then successFlag = TRUE end if next if (successFlag = TRUE) then 'you are of the correct level else openHTML "User Access Restriction" var1 = 0 var2 = 0 openTable var1,var2,0 %> <% end sub %> <% sub preserveForm(frmName) index = request.form().count 'dim frmName() redim tmpArray(index) i = 0 for each item in request.form tmp = request.form(item) 'response.write(item & " = " & tmp & "
") tmpArray(i) = item &"="&tmp i = i + 1 next 'for i = lbound(tmpArray) to ubound(tmpArray)-1 ' response.write("tmpArray[" & i & "] = " & tmpArray(i) & "
") 'next session(frmName) = tmpArray end sub sub getFormContents(frmName) formName = frmName flush = request("flush") if (flush) then unloadForm frmName else ' response.write (frmName) tmpArray = session(frmName) %> <% end if end sub sub unloadForm(frmName) session(frmName) = "" end sub ' ============================================================================== ' Subroutine : requireLevel(userlevels) ' verifies that the level is correct ' parameters : userlevels (ARRAY) ' ============================================================================== statusArray = Array("Not Sent", "Sent", "Assigned", "Confirmed", "Complete") function getrandom() Randomize getrandom = Rnd end function sub requireLevel(userlevels) for i = 0 to ubound(userlevels) if userlevels(i) = cint(Session("usertype")) then successFlag = TRUE end if next if (successFlag = TRUE) then 'you are of the correct level else openHTML "User Access Restriction" var1 = 0 var2 = 0 openTable var1,var2,0 %> <% end sub %> <% sub preserveForm(frmName) index = request.form().count 'dim frmName() redim tmpArray(index) i = 0 for each item in request.form tmp = request.form(item) 'response.write(item & " = " & tmp & "
") tmpArray(i) = item &"="&tmp i = i + 1 next 'for i = lbound(tmpArray) to ubound(tmpArray)-1 ' response.write("tmpArray[" & i & "] = " & tmpArray(i) & "
") 'next session(frmName) = tmpArray end sub sub getFormContents(frmName) formName = frmName flush = request("flush") if (flush) then unloadForm frmName else ' response.write (frmName) tmpArray = session(frmName) %> <% end if end sub sub unloadForm(frmName) session(frmName) = "" end sub ' ============================================================================== ' Subroutine : requireLevel(userlevels) ' verifies that the level is correct ' parameters : userlevels (ARRAY) ' ============================================================================== statusArray = Array("Not Sent", "Sent", "Assigned", "Confirmed", "Complete") function getrandom() Randomize getrandom = Rnd end function sub requireLevel(userlevels) for i = 0 to ubound(userlevels) if userlevels(i) = cint(Session("usertype")) then successFlag = TRUE end if next if (successFlag = TRUE) then 'you are of the correct level else openHTML "User Access Restriction" var1 = 0 var2 = 0 openTable var1,var2,0 %> <% end sub %> <% sub preserveForm(frmName) index = request.form().count 'dim frmName() redim tmpArray(index) i = 0 for each item in request.form tmp = request.form(item) 'response.write(item & " = " & tmp & "
") tmpArray(i) = item &"="&tmp i = i + 1 next 'for i = lbound(tmpArray) to ubound(tmpArray)-1 ' response.write("tmpArray[" & i & "] = " & tmpArray(i) & "
") 'next session(frmName) = tmpArray end sub sub getFormContents(frmName) formName = frmName flush = request("flush") if (flush) then unloadForm frmName else ' response.write (frmName) tmpArray = session(frmName) %> <% end if end sub sub unloadForm(frmName) session(frmName) = "" end sub ' ============================================================================== ' Subroutine : requireLevel(userlevels) ' verifies that the level is correct ' parameters : userlevels (ARRAY) ' ============================================================================== statusArray = Array("Not Sent", "Sent", "Assigned", "Confirmed", "Complete") function getrandom() Randomize getrandom = Rnd end function sub requireLevel(userlevels) for i = 0 to ubound(userlevels) if userlevels(i) = cint(Session("usertype")) then successFlag = TRUE end if next if (successFlag = TRUE) then 'you are of the correct level else openHTML "User Access Restriction" var1 = 0 var2 = 0 openTable var1,var2,0 %> <% end sub %> <% sub preserveForm(frmName) index = request.form().count 'dim frmName() redim tmpArray(index) i = 0 for each item in request.form tmp = request.form(item) 'response.write(item & " = " & tmp & "
") tmpArray(i) = item &"="&tmp i = i + 1 next 'for i = lbound(tmpArray) to ubound(tmpArray)-1 ' response.write("tmpArray[" & i & "] = " & tmpArray(i) & "
") 'next session(frmName) = tmpArray end sub sub getFormContents(frmName) formName = frmName flush = request("flush") if (flush) then unloadForm frmName else ' response.write (frmName) tmpArray = session(frmName) %> <% end if end sub sub unloadForm(frmName) session(frmName) = "" end sub ' ============================================================================== ' Subroutine : requireLevel(userlevels) ' verifies that the level is correct ' parameters : userlevels (ARRAY) ' ============================================================================== statusArray = Array("Not Sent", "Sent", "Assigned", "Confirmed", "Complete") function getrandom() Randomize getrandom = Rnd end function sub requireLevel(userlevels) for i = 0 to ubound(userlevels) if userlevels(i) = cint(Session("usertype")) then successFlag = TRUE end if next if (successFlag = TRUE) then 'you are of the correct level else openHTML "User Access Restriction" var1 = 0 var2 = 0 openTable var1,var2,0 %>