Bueno ya encontré otro link publicado en este foro que lleva a aspfacil,
http://www.aspfacil.com/articulos/cv_usuarios.asp ahora estoy probando con este codigo. Y decidí, mientras resulta la prueba, usar la base de datos en acces. Pero la pagina que procesa el formulario de ingreso me da el siguiente error:
Error Type:
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][ODBC Microsoft Access Driver] Operation must use an updateable query.
/Pruebas/VER2/aspfacil/alta.asp, line 39
Hay problemas para hacer el update del registro:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<%
Dim nombre, apellidos, cargo, operacion, login, password
Dim correcto
Dim oConn, rs, SQL
%>
<%
nombre=Request.Form("nombre")
apellidos=Request.Form("apellidos")
login=Request.Form("login")
password=Request.Form("password")
cargo=Request.Form("cargo")
operacion=Request.Form("operacion")
correcto=True
if nombre="" then correcto=False end if
if apellidos="" then correcto=False end if
if password="" then correcto=False end if
if login="" then correcto=False end if
if cargo="" then cargo=False end if
if operacion="" then operacion=False end if
if correcto then
set oConn=Server.CreateObject("ADODB.Connection")
oConn.Open "Driver={Microsoft Access Driver (*.mdb)}; " & "Dbq=" & Server.MapPath("Usuarios.mdb")
SQL="SELECT * FROM Usuarios WHERE (Login='"&login&"');"
set rs=oConn.Execute(SQL)
if not rs.EOF then
Response.Write("El nombre de usuario ya está siendo utilizado. ")
Response.Write("Por favor, escoja otro.")
else
SQL="INSERT INTO Usuarios " & _
"(login, password, nombre, apellidos, cargo, operacion)"
SQL=SQL & " VALUES ('"&login&"', '"&password & _
"', '"&nombre&"','"&apellidos&"','"&cargo&"','"&operac ion&"');"
oConn.Execute(SQL)
Response.Write("Gracias por registrarte, "& nombre)
end if
rs.Close
oConn.Close
set rs=nothing
set oConn=nothing
else
Response.Write("¡Datos incorrectos!")
end if
%>
La parte q hace este update es:
else
SQL="INSERT INTO Usuarios " & _
"(login, password, nombre, apellidos, cargo, operacion)"
SQL=SQL & " VALUES ('"&login&"', '"&password & _
"', '"&nombre&"','"&apellidos&"','"&cargo&"','"&operac ion&"');"
oConn.Execute(SQL)
Response.Write("Gracias por registrarte, "& nombre)
end if
***
BUENO VOY A SEGUIR VIENDO A VER SI ME SALE, GRACIAS.