<% dsn = "DBQ=" & Server.Mappath("..\..\db\artistanetdb.mdb") & ";Driver={Microsoft Access Driver (*.mdb)};" %> ArtistaNet.com

ArtistaNet.com - Main

 INICIO | MIEMBROS | COLABORADORES | MISION | BUSCAR

 

<% response.buffer = true 'decleration dim useraction dim conn,dsn,rs,sql 'if the user submit the form useraction = request("action") select case useraction case "login" user = request.form("user") pass = request.form("pass") Set Conn = Server.CreateObject("ADODB.Connection") Set Rs = Server.CreateObject("ADODB.Recordset") Conn.Open dsn SQL = "SELECT * FROM miembros where password='"& pass &"' and username='"& user & "'" rs.open sql,conn if rs.eof and rs.bof then response.write "
" response.write "" response.write "
ERROR de Password! Si es un usuario registrado, puede recuperar su contraseña.
" response.write "

" else intMiembro= Rs("idmiembro").Value session("auth")= pass response.redirect "loginusuarios.asp?intMiembro="&intMiembro end if end select %> ArtistaNet.com - Members Site
ArtistaNet.com
 
Por favor, ingrese su Nombre de usuario y contraseña:
Nombre de Usuario (4-10 caracteres)
Contraseña (6 caracteres)
 
 
No está registrado? Olvidó sus datos?