<%@ LANGUAGE="VBScript.Encode" %> <% order = Session("orderid") 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 %> Paedeia Reviews

 Paedeia means Education.  We welcome articles, news, book reviews and more...   

  
BROWSE
4 About Us
   
4 Authors & Contributors
   
4 Book Shelve
   
4 Awards & Citations
   
4 Arts & Culture
   
4 Education
   
4 Editorial Comments
   
4 Travel & Entertainment
   
4 Events
   
4 Links
   
4 Advertise
 
 

 

 

 

The Much Too Promised Land: America’s Elusive Search for Arab-Israeli Peace
 by Aaron David Miller

“The 9/11 attacks demonstrated with a terrifying clarity that the security of the continental U.S. was now attached to the affairs of the Arab and Muslim East, including the disposition of the much too ...

More

 

 

  
 
 

BOOKS

Other Candle Lights
--------

Twelfth House
--------


Rene Descartes