Insertar registros
Tengo una pgina que se entra con nombre y contrasea, lo comprueba de una base de datos donde aparece nombre, contrasea, nombre de la persona y empresa.
Al introducir el nombre y contrasea crea un registro en otra tabla de la misma bd con la hora, nombre y contrasea.
El problema es que yo, lo que quiero ver en esos registros es el nombre del usuario y la empresa. Quiero que consulte en la base de datos el nombre y password y cree un registro con el nombre y empresa. No si se entiende.
Lo he probado poniendo esto y me aparece en blanco el nombre y empresa:
rs.AddNew
rs("Usuario") = usuario
rs("Password") = password
rs("Nombre") = nombre
rs("Empresa") = empresa
rs("Id") = Now
rs.Update
La base de datos consta de una tabla donde aparecen los datos (se llama "datos") y otra tabla "registros"
Por favor ayuda!!!!!!!!!!
Al introducir el nombre y contrasea crea un registro en otra tabla de la misma bd con la hora, nombre y contrasea.
El problema es que yo, lo que quiero ver en esos registros es el nombre del usuario y la empresa. Quiero que consulte en la base de datos el nombre y password y cree un registro con el nombre y empresa. No si se entiende.
Lo he probado poniendo esto y me aparece en blanco el nombre y empresa:
rs.AddNew
rs("Usuario") = usuario
rs("Password") = password
rs("Nombre") = nombre
rs("Empresa") = empresa
rs("Id") = Now
rs.Update
La base de datos consta de una tabla donde aparecen los datos (se llama "datos") y otra tabla "registros"
Por favor ayuda!!!!!!!!!!
Tu primer select debe traer todos los datos es decir Nombre, Password, NombrePersona,Empresa con esto :
select * from tutabla
si password=trim(turecordset("Password") y password=trim(turecordset("Nombre")
' codigo para insertar en new tabla
puedese cerrar tu recordset y realizar tu Update
Const adOpenKeyset = 1
Const adLockOptimistic = 3
OtroRs.CursorType = adOpenKeyset
OtroRs.LockType = adLockOptimistic
OtroRs.open "TuNuevaTabla",TuConexion
OtroRs.addnew
OtroRs("NombrePersona")=rs("NombrePersona")
OtroRs("Empresa")=rs("Empresa")
OtroRs("Hora")=Now
OtroRs.update
OtroRs.close
RS es tu Primer recorset que trae todos tus datos y OtroRS es el que se crea para insertar los datos en una nueva Tabla
Espero esto te ayude
Lima - Perù
select * from tutabla
si password=trim(turecordset("Password") y password=trim(turecordset("Nombre")
' codigo para insertar en new tabla
puedese cerrar tu recordset y realizar tu Update
Const adOpenKeyset = 1
Const adLockOptimistic = 3
OtroRs.CursorType = adOpenKeyset
OtroRs.LockType = adLockOptimistic
OtroRs.open "TuNuevaTabla",TuConexion
OtroRs.addnew
OtroRs("NombrePersona")=rs("NombrePersona")
OtroRs("Empresa")=rs("Empresa")
OtroRs("Hora")=Now
OtroRs.update
OtroRs.close
RS es tu Primer recorset que trae todos tus datos y OtroRS es el que se crea para insertar los datos en una nueva Tabla
Espero esto te ayude
Lima - Perù