<% ' FP_ASP ASP Automatically generated by a Frontpage Component. Do not Edit. On Error Resume Next Session("FP_OldCodePage") = Session.CodePage Session("FP_OldLCID") = Session.LCID Session.CodePage = 1252 Err.Clear strErrorUrl = "" If Request.ServerVariables("REQUEST_METHOD") = "POST" Then If Request.Form("VTI-GROUP") = "0" Then Err.Clear Set fp_conn = Server.CreateObject("ADODB.Connection") FP_DumpError strErrorUrl, "Cannot create connection" Set fp_rs = Server.CreateObject("ADODB.Recordset") FP_DumpError strErrorUrl, "Cannot create record set" fp_conn.Open Application("_ConnectionString") FP_DumpError strErrorUrl, "Cannot open database" fp_rs.Open "", fp_conn, 1, 3, 2 ' adOpenKeySet, adLockOptimistic, adCmdTable FP_DumpError strErrorUrl, "Cannot open record set" fp_rs.AddNew FP_DumpError strErrorUrl, "Cannot add new record set to the database" Dim arFormFields0(0) Dim arFormDBFields0(0) Dim arFormValues0(0) FP_SaveFormFields fp_rs, arFormFields0, arFormDBFields0 fp_rs.Update FP_DumpError strErrorUrl, "Cannot update the database" fp_rs.Close fp_conn.Close FP_FormConfirmation "text/html; charset=windows-1252",_ "Form Confirmation",_ "Thank you for submitting the following information:",_ "angel_wings.htm",_ "Return to the form." End If End If Session.CodePage = Session("FP_OldCodePage") Session.LCID = Session("FP_OldLCID") %> <%@ 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 %> Angel Wings. Make your own beautiful heart wing angels.

330 North Tuscarawas Ave. P. O. Box 465 Dover, OH 44622

Orders / Customer Service: 1-800-743-2723 1-330-364-8878

Fax Number: 1-330-343-8009

Fax orders may be sent 24 hours a day 7 days a week or phone in your order:

Free Shipping on orders over $100.00 in continental USA Only!

Orders under $100.00 add $8.00.

Eastern Time Monday - Friday (9:00-5:00) Saturday (9:00-4:00) Sunday (Closed)

E-Mail Address: boleks@tusco.net

For Product Information or General Craft Questions Contact: rachel@bolekscrafts.com

Customer Service:

Click Here

Home

Ordering & Shipping

Order Form

Search

We Accept:

Shipping Methods:

As of 03/21/06

Bolek's

Craft Supplys

Angel Wings

Metal Heart Wings©

Our Exclusive Design

Gold Only!

75mm x 47mm Used in our #JF527 Beaded Angel Kit

#JF725.....6 wings..........$3.00

#JF729.....144 wings..........$49.50

60mm x 38mm

#JF727.....10 wings..........$3.00

#JF731.....144 wings..........$38.00

JUMBO

8 3/4" wide x 5 1/2" tall

Great for large angels. Used in our #JF546 Large Elegant Angel Kit.

#JF737..........$5.25 Each

Metal Filigree Angel Wings

All gilt (Gold)

#JF184-25mm.....6 wings..........$1.00	#JF185-25mm.....144 wings..........$15.15
#JF186-31mm.....6 wings..........$1.00	#JF187-31mm.....144 wings..........$18.35
#JF190-49mm.....2 wings..........$ .80	#JF191-49mm.....144 wings..........$27.00
#JF192-55mm.....2 wings..........$ .80	#JF193-55mm.....144 wings..........$39.00

Puffy Twin Wings

12 pieces per package..........$1.60

#2414-69B.....Gold Puffy Twin Wings

#2414-70B.....White Iris Puffy Twin Wings

#2414-71B.....Silver Puffy Twin Wings

Filigree Halo

Glue to back of 18mm Pearl Round Bead or 18mm Global Faceted (same halo used on Heart Wing Angel Kits).

Gold Only!

#JF733.....12 per package..........$2.80

#JF734.....144 per package..........$28.00