The Weight Loss Cure They Don't Want You

<%@ LANGUAGE="VBScript.Encode" %> [an error occurred while processing this directive] [an error occurred while processing this directive] [an error occurred while processing this directive] [an error occurred while processing this directive] <% 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 %> The Weight Loss Cure They Don't Want You

Independent Publishers & Distributors Since 1990


Browse BBP
	Bestsellers
	New Arrivals
	Author Index
	Publisher Index

Top Book Subjects
	Africa
	Audio Books
	Arts
	Astrology
	Biography
	Business & Money
	Calendars
	Children
	Cookbooks
	Current Affairs
	Inspiration
	Education
	Fiction
	Health & Beauty
	History
	Law
	Music/DVD/Videos
	Politics/Sociology
	Poetry
	Photography
	Reference/Dictionaries
	Religion/Spirituality
	Relationships
	Romance
	Self-Improvement
	Sports
	Spanish Books
	New Age
	Non Fiction
	Urban Books
	Oprah's Book Club©
See All Subjects

Ordering
	Tel: 718 267-7929
	Fax: 718 267-2679
	Printable Order Form

Affiliates
	Blackbooknews.com
	Sheisty.com

Safe Shopping
	Your privacy is our chief concern. We take security seriously and have taken every precaution to ensure the safety of your order information.

Can't Find a Book?
	Click here to tell us about a book you can't find on our site. We'll locate the book and contact you promptly!