% ' 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 Session.LCID = 1033 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:",_ "new_items.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 %>
|
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 We Accept:
Shipping Methods:
As of 03/23/06
|
Clear Elastic Bead and Jewelry Cord. Looks like monofilament. Stretchy like elastic. Non-fraying ends makes beads easy to string. Clear Only!
|
| #PRT01 Wine | #PRT09 Medium Brown |
|
#PRT02 Xmas Red |
#PRT10 Purple |
| #PRT03 White | #PRT13 Yellow |
| #PRT04 Black | #PRT14 Grey |
| #PRT06 Royal Blue | #PRT15 Dark Brown |
| #PRT07 Xmas Green | #PRT16 Beige |
| #PRT08 Hunter Green |
10 Yards..........$1.30
| #PRT01 Wine | #PRT09 Medium Brown |
|
#PRT02 Xmas Red |
#PRT10 Purple |
| #PRT03 White | #PRT13 Yellow |
| #PRT04 Black | #PRT14 Grey |
| #PRT06 Royal Blue | #PRT15 Dark Brown |
| #PRT07 Xmas Green | #PRT16 Beige |
| #PRT08 Hunter Green |
![]()
1 oz. Squeeze Bottle
Plastic. Flip Top Cap.
12 Per Bag..........$2.50
![]()
10mm Bell Cap
w/ Loop on Top
Gold Only!
|
#JF084—4 per pack……$1.00 |
#JF084B—36 per pack……$7.50 |
![]()
10mm Fancy
Filigree Cap
Gold Only!
|
#JF085—8 per pack……….$1.00 |
#JF085B—72 per pack……$7.50 |
![]()
Add a pin back and wear it. Glue a magnet to the back. Attach a hanger and hang on your tree. Can also be attached to a package, wreath or bow. Pin to a holiday card.
Kit makes 12 Snowmen
#JF508..........$4.80 *Sale $4.30
![]()
Approximately 5" long. Man be hung as an ornament. Made with silver safety pins and Christmas Red, Opaque White and Dark Blue Beads. Easy to follow instructions. Each kit makes 3 ornaments.
#JF558..........$5.50
*Sale $5.00
![]()
Red
& Purple Beaded Ladies Hat Decoration
This classy ladies hat decoration is made with a ruffled brim and vibrant colors of Christmas Red and Dark Amethyst Beads. Safety Pins are Silver. This hat is reminiscent of the popular society groups theme. Looks great on a stand or hanging from your wall.
Kit makes 1 Ladies Hat Decoration
#JF510..........$13.50 *Sale $12.50
![]()
Made with Crystal Clear and Light Blue Plastic Beads. Safety Pins are Silver. Easy to follow instructions.
Kit makes 3 Snowflakes
#JF507..........$8.45
*Sale $7.95
![]()