<% LITE1 = "29.95" LITE2 = "36.95" RES1 = "39.95" RES2 = "36.95" RES3 = "44.95" TransferFee = "3.00" BUS1 = "89.95" BUS2 = "86.95" BUS3 = "89.95" FULL = "524.95" costPCI = "145" costUSB = "165" costEXT = "219" costEXTR = "219" costIP6 = "169" costIP10 = "129" costIP8 = "249" costCisco = "895.95" costNIC10 = "13.40" 'NP0402 costNIC100 = "17" 'NP0400 costNICISA = "13.40" 'NP0404 rFactor = 1.7 repcomm = 1.05 Markup = 1.26 'PCI = FormatNumber(costPCI*1.24*repComm ,0) + 0.95 'USB = FormatNumber(costUSB*1.26*repComm ,0) + 0.95 'EXT = FormatNumber(costEXT*1.28*repComm ,0) + 0.95 'EXTr = FormatNumber(costEXTr*1.28*repComm ,0) + 0.95 'IP6 = FormatNumber(costIP6*1.26*repComm ,0) + 0.95 'IP10 = FormatNumber(costIP10*1.28*repComm ,0) + 0.95 'IP8 = FormatNumber(costIP8*1.26*repComm ,0) + 0.95 Cisco = FormatNumber("895",0) + 0.95 NIC10 = "24.95" 'NP0402 'NIC100 = "29.95" 'NP0400 'NICISA = "24.95" 'NP0404 'KIT = "44.95" 'FILTERS = "10.00" ConnectionString = "dsn=InterPC;uid=ipc;pwd=main" Set ConnC = Server.CreateObject("ADODB.Connection") ConnC.Open ConnectionString Set RScost = ConnC.Execute("SELECT * FROM [invoicelist] where sku ='"+ "BB0024'") PCI = RScost("Amount") Set RScost = ConnC.Execute("SELECT * FROM [invoicelist] where sku ='"+ "BB0039'") USB = RScost("Amount") Set RScost = ConnC.Execute("SELECT * FROM [invoicelist] where sku ='"+ "BB0050'") EXT = RScost("Amount") Set RScost = ConnC.Execute("SELECT * FROM [invoicelist] where sku ='"+ "BB0055'") EXTr = RScost("Amount") Set RScost = ConnC.Execute("SELECT * FROM [invoicelist] where sku ='"+ "IP0006'") IP6 = RScost("Amount") Set RScost = ConnC.Execute("SELECT * FROM [invoicelist] where sku ='"+ "IP0008'") IP8 = RScost("Amount") Set RScost = ConnC.Execute("SELECT * FROM [invoicelist] where sku ='"+ "IP0010'") IP10 = RScost("Amount") ' Set RScost = ConnC.Execute("SELECT * FROM [invoicelist] where sku ='"+ "BB0021'") ' Cisco = RScost("Amount") Set RScost = ConnC.Execute("SELECT * FROM [invoicelist] where sku ='"+ "NP0406'") NIC100 = RScost("Amount") Set RScost = ConnC.Execute("SELECT * FROM [invoicelist] where sku ='"+ "INST001'") KIT = RScost("Amount") Set RScost = ConnC.Execute("SELECT * FROM [invoicelist] where sku ='"+ "BB0001'") FILTERS = RScost("Amount") ConnC.Close set ConnC = nothing set RScost = nothing PCIrent = FormatCurrency(costPCI * rFactor/12) ' "20" USBrent = FormatCurrency(USB * rFactor/12) ' "25" EXTrent = FormatCurrency(EXT * rFactor/12) ' "30" EXTRrent = FormatCurrency(EXTr * rFactor/12) ' "30" CISCOrent = FormatCurrency(CISCO * rFactor/12) ' "30" IP6rent = FormatCurrency(IP6 * rFactor/12) ' "26" IP10rent = FormatCurrency(IP10 * rFactor/12) ' "20" IP8rent = FormatCurrency(IP8 * rFactor/12) ' "20" NIC10rent = FormatCurrency(NIC10 * rFactor/12) NICISArent = FormatCurrency(NICISA * rFactor/12) NIC100rent = FormatCurrency(NIC100 * rFactor/12) KIT = "44.95" EVALUATION = "79.95" INSTALL1 = "89.95" INSTALL2 = "244.95" INSTALL3 = "699.95" ExtraIP = "19.95" ExtraEmail = "2.50" ExtraFILTERS = "10.95" descPCI = "PCI Internal DSL card', SNAPX, 20, SNAPY, 20)"" onMouseOut=nd()>"&_ "Internal PCI Modem - $" &PCI& "   " descUSB = "USB port of your PC. For Windows98/Windows98-SE, Windows 2000, or XP, not compatible with Windows 95.', CAPTION, '
USB External DSL Modem
', SNAPX, 20, SNAPY, 20)"" onMouseOut=nd()>"&_ "External USB Modem
- $" &USB& "   " descEXT = "External DSL Modem/Router', SNAPX, 20, SNAPY, 20)"" onMouseOut=nd()>"&_ "External Modem/Router - $" &EXT& "   " descEXTR = "External DSL Modem/Router/4-port switch', SNAPX, 20, SNAPY, 20)"" onMouseOut=nd()>"&_ "External Modem/Router/4-port switch - $" &EXTr& "   " descCISCO827 = "Cico 827 Router', SNAPX, 20, SNAPY, 20)"" onMouseOut=nd()>"&_ "CISCO Modem/Router - $" &Cisco& "  " descIP6 = "Internet Gateway', SNAPX, 20, SNAPY, 20)"" onMouseOut=nd()>"&_ "Gateway IP6 ...more - $" &IP6& "   " descIP10 = "Internet Gateway', SNAPX, 20, SNAPY, 20)"" onMouseOut=nd()>"&_ "Gateway IP10 ...more - $" &IP10& "   " descIP8 = "Internet Gateway', SNAPX, 20, SNAPY, 20)"" onMouseOut=nd()>"&_ "Gateway IP8 ...more - $" &IP8& "   " descNIC10 = "Network Interface card', SNAPX, 20, SNAPY, 20)"" onMouseOut=nd()>"&_ "NIC 10-baseT - $" &NIC10& "   " descNIC100 = "NIC 10/100', SNAPX, 20, SNAPY, 20)"" onMouseOut=nd()>"&_ "NIC 10/100 - $" &NIC100& "   " purchase = "PCI Internal DSL card', SNAPX, 20, SNAPY, 20)"" onMouseOut=nd()>"&_ "Purchase" PCIrent2own = rent2 & PCIrent & ", you own this product.', CAPTION, '
PCI Internal DSL card
', SNAPX, 20, SNAPY, 20)"" onMouseOut=nd()>"&_ "Rent-to-Own" USBpurchase = "PCI Internal DSL card', SNAPX, 20, SNAPY, 20)"" onMouseOut=nd()>"&_ "Purchase" USBrent2own = rent2 & USBrent & ", you own this product.', CAPTION, '
USB External DSL card
', SNAPX, 20, SNAPY, 20)"" onMouseOut=nd()>"&_ "Rent-to-Own" EXTpurchase = "External DSL Modem', SNAPX, 20, SNAPY, 20)"" onMouseOut=nd()>"&_ "Purchase" EXTrent2own = rent2 & EXTrent & ", you own this product.', CAPTION, '
External DSL modem
', SNAPX, 20, SNAPY, 20)"" onMouseOut=nd()>"&_ "Rent-to-Own" EXTRrent2own = rent2 & EXTRrent & ", you own this product.', CAPTION, '
DSL Ext. modem/router
', SNAPX, 20, SNAPY, 20)"" onMouseOut=nd()>"&_ "Rent-to-Own" CISCOrent2own = rent2 & CISCOrent & ", you own this product.', CAPTION, '
Cisco 827 modem/router
', SNAPX, 20, SNAPY, 20)"" onMouseOut=nd()>"&_ "Rent-to-Own" IP6rent2own = rent2 & IP6rent & ", you own this product.', CAPTION, '
Internet Gateway-4-port
', SNAPX, 20, SNAPY, 20)"" onMouseOut=nd()>"&_ "Rent-to-Own" IP10rent2own = rent2 & IP10rent & ", you own this product.', CAPTION, '
Internet Gateway
', SNAPX, 20, SNAPY, 20)"" onMouseOut=nd()>"&_ "Rent-to-Own" IP8rent2own = rent2 & IP8rent & ", you own this product.', CAPTION, '
Internet Gateway-7-port
', SNAPX, 20, SNAPY, 20)"" onMouseOut=nd()>"&_ "Rent-to-Own" NIC10rent2own = rent2 & NIC10rent & ", you own this product.', CAPTION, '
Network Interface Card
', SNAPX, 20, SNAPY, 20)"" onMouseOut=nd()>"&_ "Rent-to-Own" NIC100rent2own = rent2 & NIC10rent & ", you own this product.', CAPTION, '
Network Interface Card
', SNAPX, 20, SNAPY, 20)"" onMouseOut=nd()>"&_ "Rent-to-Own" 'descPCI = " Internal PCI DSL Modem - $" &PCI& "
   " Ball ="" IncludesTXT = "

Includes:
" &_ "Download Speed', SNAPX, 20, SNAPY, 20)"" onMouseOut=nd()>"&Ball&"128k download speed
" &_ "Always On, no time limit', SNAPX, 20, SNAPY, 20)"" onMouseOut=nd()>"&Ball&"Always-ON, no time limits
" &_ "1 email account', SNAPX, 20, SNAPY, 20)"" onMouseOut=nd()>"&Ball&"1 email account
" &_ "10 Megabytes of webspace', SNAPX, 20, SNAPY, 20)"" onMouseOut=nd()>"&Ball&"10 Megabytes of webspace
" &_ "Download/Upload activity', SNAPX, 20, SNAPY, 20)"" onMouseOut=nd()>"&Ball&"1 Gigabyte (GB) of download/upload activity.
" '"10 hours Dialup per month', SNAPX, 20, SNAPY, 20)"" onMouseOut=nd()>"&Ball&"up to 10 hours/month of dialup
" IncludesTXT2 = "

Includes:
" &_ "Download Speed', SNAPX, 20, SNAPY, 20)"" onMouseOut=nd()>"&Ball&"1.5 up to 3Mbps download speed
" &_ "Always On, no time limit', SNAPX, 20, SNAPY, 20)"" onMouseOut=nd()>"&Ball&"Always-ON, no time limits
" &_ "1 email account', SNAPX, 20, SNAPY, 20)"" onMouseOut=nd()>"&Ball&"1 email account
" &_ "10 Megabytes of webspace', SNAPX, 20, SNAPY, 20)"" onMouseOut=nd()>"&Ball&"10 Megabytes of webspace
" &_ "Download/Upload activity', SNAPX, 20, SNAPY, 20)"" onMouseOut=nd()>"&Ball&"10 Gigabytes (GB) of download/upload activity.
" '"10 hours Dialup per month', SNAPX, 20, SNAPY, 20)"" onMouseOut=nd()>"&Ball&"up to 10 hours/month of dialup
" IncludesTXT3 = "

Includes:
" &_ "Download Speed', SNAPX, 20, SNAPY, 20)"" onMouseOut=nd()>"&Ball&"3 up to 3Mbps download speed
" &_ "Always On, no time limit', SNAPX, 20, SNAPY, 20)"" onMouseOut=nd()>"&Ball&"Always-ON, no time limits
" &_ "3 email accounts', SNAPX, 20, SNAPY, 20)"" onMouseOut=nd()>"&Ball&"2 email accounts
" &_ "10 Megabytes of webspace', SNAPX, 20, SNAPY, 20)"" onMouseOut=nd()>"&Ball&"10 Megabytes of webspace
"&_ "Download/Upload activity', SNAPX, 20, SNAPY, 20)"" onMouseOut=nd()>"&Ball&"10 Gigabytes (GB) of download/upload activity
" '"10 hours Dialup per month', SNAPX, 20, SNAPY, 20)"" onMouseOut=nd()>"&Ball&"up to 10 hours/month of dialup
" NotesTXT = "

Notes:
" &_ "Compatible DSL Modem
', SNAPX, 20, SNAPY, 20)"" onMouseOut=nd()>"&Ball&"Compatible DSL Modem is required

" &_ "DSL Line Filter', SNAPX, 20, SNAPY, 20)"" onMouseOut=nd()>"&Ball&"DSL Line filter for each phone is required
" &_ Ball&"1st & Last months payments due at startup
" &_ Ball&"See Minimal System Requirements ...more
" &_ Ball&"Pricing on hardware subject to change without notice
" &_ Ball&"All prices exclude taxes
" RentToOwnTXT = "

Rent-to-Own:
" &_ "Hardware can be financed with our Rent-to-Own policy with 12 easy payments.
" InstallTXT = "

Installion Kit:
" &_ "Installation kit includes: 1 DSL Line Filter, software on CD and instructions.
" RentTXT = "

Rental:
" &_ "You can rent a modem that is simply added to your monthly service. Rented Internal Modems are subject to a one time refundable deposit of $75. Rented External Modems are subject to a one time refundable deposit of $150. Modems must be returned in orginal packaging and in working order upon termination of service.
" ExtraStuff = " DSL Line Filter', SNAPX, 20, SNAPY, 20)"" onMouseOut=nd()>DSL Line Filters - $" &FILTERS& " each
" &_ " Extra Emails Addresses', SNAPX, 20, SNAPY, 20)"" onMouseOut=nd()>Extra Emails - $" &ExtraEmail& " per month
" '" IP Addresses', SNAPX, 20, SNAPY, 20)"" onMouseOut=nd()>IP Address - $" &ExtraIP& " per month
" InstallKit = " ° 1 - DSL Line Filter
° software on CD
° instructions.', CAPTION, '

Installation Kit
', SNAPX, 20, SNAPY, 20)"" onMouseOut=nd()>Installation Kit - $"&KIT&"
" InstallKitold = " ° 1 - DSL Line Filter
° 1 - 10bT Network Interface Card            PCI or ISA
° software and instructions.', CAPTION, '
Installation Kit
', SNAPX, 20, SNAPY, 20)"" onMouseOut=nd()>Installation Kit
- $"&KIT&"
" Tab1 = "           " Footer = "

If you need more or additional hardware just give us a ring @ 905-378-1078 and we can customize a package to fit your needs." %>
What is WarpSPEED?   Frequently Asked Questions   Costs of Service?   Check for Availability  

Test to see if WarpSPEED DSL is available on your phone line.

    Enter your area code and phone number  (example: 9053781078)
Please Note:    It is advisable that you check each phone number you have. Service not may be available one line may be available on another.

For businesses to receive WarpSPEED@WORK, you should test your fax phone number, not your main office number if you have an internal switchboard unit.

Other factors may affect the actual availability of WarpSPEED DSL in your area. Please consult your InterPC sales associate for further details or check out our FAQ page.

InterPC WarpSPEED@HOME is our DSL service for residential use only.
InterPC WarpSPEED@WORK is our DSL service installed on business phone lines.

If your number is not available, Add your name to the waiting list