
Muchísimas gracias a todos los que respondéis mensajes y nos ayudáis a los que estamos aquí !!
Código:
dim dns, Con, RS dns="DRIVER={Microsoft Access Driver (*.mdb)};DBQ=\socios.mdb;" Set Con = Server.CreateObject("ADODB.Connection") Con.Open dns set RS= Server.CreateObject("ADODB.Recordset") dim usu, cont usu=request.form("usuario") con=request.form("contrasena") ssql= "SELECT * FROM socios WHERE socios.nick='"&usu&"' and socios.contra='"&cont&"';" RS.Open ssql, Conn