<%Response.Buffer = True%> <% Dim vntGetPassword Dim vntResult vntGetPassword = Request.Form ("txtPassword") If trim(vntGetPassword) <> "" Then vntResult = CheckPassword( vntGetPassword, vntPassword ) If vntResult = 0 Then Session("Connected") = "False" %>

Login failed due to an incorrect password!

 
 
Click to login.
<% Else %>
 
 

Login was successful! You may now proceed as a trader allowing you to make orders and to see our prices. Please navigate the site using the above menu options.

<% Session("Connected") = "True" End If Else %>
   
   
This feature will allow you to view all our prices and to place orders with us.
If you don't have a password, please call us and we will be happy to provide you with one.
   
Please enter your customer password to login:

<% End If%>