27/03/2004, 15:55
|
| | | Fecha de Ingreso: marzo-2004
Mensajes: 2
Antigüedad: 21 años, 1 mes Puntos: 0 | |
| Ayuda para actualizar una base de datos!!!!!!!
Estoy tratando de hacer una actualizacion de una base de datos...y me da error...Estas son los codigos
1- para conseguir la info:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
"http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<title>Untitled Document</title>
</head>
<FORM ACTION="pag2.asp" METHOD="post"><BR>
<B>Usuario:</B> <INPUT NAME="usuario" SIZE="12"><BR>
<B>Contraseña:</B> <INPUT NAME="password" SIZE="12"><BR><BR>
<INPUT TYPE="Submit" VALUE="Ingresar">
</FORM>
<body>
</body>
</html>
2- el codigo para la actualizacion
<%
Dim oConn, usuario, password
'capturamos la informacion que viene de algún formulario...
usuario = Request.Form("usuario")
password = Request.Form("password")
'hacemos toda la conexion a la BD.
Set conexion = Server.CreateObject("ADODB.Connection")
files = server.MapPath("basedatos.mdb")
conexion.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & files & ";Persist Security Info=False"
'Hago el INSERT, creando un nuevo registro.
oConn.Execute "INSERT INTO Tabla1 (usuario,password) VALUES ('" + Request.Form("usuario") + "','" + Request.Form("password") + "')"
Response.Write("Se ha agregado el registro con exito.")
oConn.Close
Set oConn = nothing
%>
Me da el error:
Tipo de error:
Error de Microsoft VBScript en tiempo de ejecución (0x800A01A8)
Se requiere un objeto: ''
/pag2.asp, línea 11 |