<% Set Conn2 = Server.CreateObject("ADODB.Connection") Conn2.Open "DSN=Thaibronze" Set RS2 = Server.CreateObject("ADODB.Recordset") RS2.Open "Select * From member Where login='"&session("login")&"' and password='"&session("password")&"'",Conn2,1,3 If Not RS2.EOF Then %> BackOffice
Login System
 
Login name :
 
Password :
 
 
>>0<<
© 2001 Siam E-Commerce Technologies Co., Ltd. all rights reserved.

 

<% Else Response.Redirect "../home.htm" End If %>