<%@ LANGUAGE="VBScript.Encode" %> <% order = Session("orderid") 'READ STUFF From Database Dim objSimpleAdo, rstRS, SQLStmt SQLStmt = "SELECT * From item " SQLStmt = SQLStmt & "WHERE [Orderid] =" & Order & "; " Set SimpleAdo = New CSimpleAdo SimpleAdo.setConnectionString = Session("ConnectionString") Set RS = SimpleAdo.getRecordSet(SQLStmt) 'Do stuff with the record set 'Initialize variables for this application thedate = Cstr(Date) 'get the date thetime = Cstr(Time) 'get the time subtotal = 0 'the subtotal for a row of items subweight = 0 'the subweight for a row of items subsize = 0 'the subsize for a row of items subquantity = 0 'the subquantity for a row of items CurrentRecord = 0 Do While CheckRS(RS) 'Calculate the individual totals for a row subweight = subweight + (RS("Quantity") * RS("Weight")) subsize = subsize + (RS("Quantity") * RS("Size")) subtotal = (RS("Quantity") * RS("Price")) subquantity = subquantity + RS("Quantity") total = FormatCurrency (CCur(subtotal)) grandtotal = grandtotal + subtotal RS.MoveNext Loop Set SimpleAdo = Nothing Set RS = Nothing %> Water Purifiers - AquariumSuperstore - The UK's Leading Online Aquatic Retailer

 

■  Help  ■  Site Map  ■  A-Z of Products  ■  Contact Us

  
   
   
   
 

 

  

Home  |   Filtration  |   Heating  |   Lighting  |   Water Quality  |   Food  |   Tanks  |   Decoration  |   Outdoor  |   Accessories
 
                               
                               

Medications

Adjusters

Additives

Purifiers

Test Kits

Dechlorinators

 Marine Salt  
 
   
   
   
 

Reverse Osmosis

  
 

   Home

   Filtration

   Heating

   Lighting

   Water Quality

   Food

   Tanks

   Decoration

   Outdoor

   Accessories

  

Page 2 of 3 - Total Number Available 29

1  |  2  |  3

  

    Number Items: <%= subquantity%>
    SubTotal: <%= FormatCurrency(grandtotal)%>

 
       
       
       
           
      Description   Our Price Stock        
    Float Valve Kit for Single Membranes £49.99 *

   
     

Tetra Test Kits

  
       
       
      Float Valve Kit for Single Membranes £54.99 *

   
       
 

   Medications

   Adjusters

   Additives

   Purifiers

   Test Kits

   Dechlorinators

   Marine Salt

      
       
    Kent Pressure Boosting pump for 50gal R/O £219.99 *

   
       
       
       
    Kent Pressure Boosting pump for 50gal R/O £269.99 *

   
       
           
           
      CF1M Replacment 1 Micron Sediment Filter   £6.99 *

   
       

   Help

   Site Map

   Managing Orders

   Delivery/Couriers

   Returns/Refunds

   Customer Promise

   Contact Us

   Feedback

  
         
         
      CF5M Replacement 5 Micron Sediment Filter   £6.99 *

   
         
         
         
      CFCE Replacement Carbon Cartridge   £16.99 *

   
           
           
           
      CFI Mixed Resin Cartridge for Posidi/Maxxima   £34.99 *

     
           
           
           
      SILICAMIX Hi Silicate Removal Deionisation Cartridge   £44.95 *

     
           
           
           
      CFRA Clear Refillable Cartridge   £15.99 *

     
           
           
           
      MTFC10 TFC Membrane 10gpd   £59.99 *

     
           
           
           
      MTFC24 TFC Membrane 24gpd   £79.99 *

     
           
           
           
           
     

*  - Delivery 3 - 4 days subject to Supplier Availability

      
     

= In Stock

 = On Order = Special Order
     
     

Page 2 of 3 - Total Number Available 29

1  |  2  |  3

      
           
           
           
           
           
           
           
           
             
             

Home  |   Filtration  |   Temperature  |   Lighting  |   Water Quality  |   Food  |   Tanks  |   Decoration  |   Outdoor  |   Accessories

Copyright 2008 – AquariumSuperstore – All Rights Reserved -Unauthorised use of any images, thumbnails, illustrations, descriptions

 and article content is strictly prohibited under copyright law.

AquariumSuperstore HTML Catalogue - AquariumSuperstore PHP Catalogue