<% If Request.Form("login").Count > 0 Then If cInt(Request.Form("hidContinue"))=1 Then Db.Execute("DELETE FROM TempShoppingCart WHERE IdSession = " & Session.SessionID) End If Login = Request.Form("login") Password = Request.Form("password") sQuery = "SELECT COUNT(*) Cant FROM TempShoppingCart WHERE IdSession = " & Session.SessionID Ds.Open sQuery, Db nCantShoppCart = cInt(Ds("Cant")) Ds.Close MyQuery = "SELECT U.IdUser, U.Login, U.Password, U.Firstname, U.Lastname, U.IdUserType, U.CorporateName FROM [User] U WHERE U.Login = '"& Login &"'" Ds.Open MyQuery, Db If Login <> "" then If Ds.EOF Then strError = "User not found." Else If Ds("Password") = Password Then If cLng(Ds("IdUserType")) <> cMayorista Or nCantShoppCart = 0 Then Session("IdUsuario") = cLng(Ds("IdUser")) Session("Firstname") = Ds("Firstname") Session("Lastname") = Ds("Lastname") Session("IdUserType") = cLng(Ds("IdUserType")) Session("Corporate") = Ds("CorporateName") 'Actualizo el IdUser del ShoppingCart Db.Execute("UPDATE TempShoppingCart SET IdUser=" & Session("IdUsuario") & " WHERE IdSession = " & Session.SessionID) Response.Redirect "ShoppingRoom_Catalog.asp" Else strError = "Your Shopping Cart Will Be Erased..." & "" End If Else strError = "The password is incorrect" End If End If End If Ds.Close End If %>

Related Pages

If you have a related site and would like to trade links, please copy the text below and place the link on your resources page. Once you have published our link please contact us with the following information:

1. Site URL
2. Site Title
3. A Brief Description
4. Reciprocal Link URL

We will review your site and upon approval, it will appear in our directory within 3 days.

   

LinkPartners
The Easy Way to Find Link Swap Partners

Shop-til-u-drop -
THE shopping centre for the best shops, top brands, keenest prices. Stress free shopping at it's best!

Guaranteed website promotion & search engine submission services
FullPromote provides various search engine submission & website promotion service! Guarantee your site listing in DMOZ, Google, AOL, MSN, ASk etc. major search engines.

Cipinet Search Engine  

Real Estate Agencies.Net

USCITY.NET Directory

Auctions :
Buy or sell almost anything. No listing fees, free image hosting, and automatic re-list. Sellers may link ads to their own websites.

Link Master

ABC Home Shopping Guide

Business Seek Directory

Homerweb - The Best Search Engine

Dream-link

ACE Directory

Elib Directory
Accessories in Florida, Shopping accessories for home.

ABC Home Shopping Guide
The ABC Home Shopping guide is dedicated to help save you precious time and money by providing an easy to use online bargain shopping guide to convenient, secure and safe shopping destinations!

#1 Free Link Exchange Directory On The Web - Link Market
Have you ever tried to exchange links, swap links, or trade links? Was it hard? Use link market instead; - it is easy to use, free and very smart. It will save you hours of work.

Dirlist.net Directory
Directory of web sites that allows users to rate and review sites. Add a link.

Surplus Exchange
Where you can find exiting products at the reasonable price.

Bonin's Resources
A web directory of business, resources, shopping, sports and much more! Visit over 1000 different categories for your informational needs.

Auctions - Free Online Auctions
Free Auctions Listing : America's #1 FREE Auction Website! Free auction website that brings buyers and sellers together for free. No charge to post your auction and no fees when you sell your item. Register today for free at www.Ibidfree.com

Amfibi Web Search
General search engine which includes its own index of websites, a directory (provided by the Open Directory Project) and a meta search feature for searching multiple search engine at once.


Intercambio de Enlaces

::::::::

2006 2-3-4- 5- 6- 7- 8- 9- 10- 11- 12