Versión Completa : Ingresar Datos a un BD desde con ASP y Access
ChAmBa
noviembre 10, 2006, 06:02
Que tal laneros.. sucede q estoy haciendo una pagina web con ASP y Access.. ya hice la conexion.. y al ingresar los datos ya me manda a la pagina q los datos fueron ingresados.. pero al ver la BD.. solo me crea el campo en blanco y no almacena nada.. pero ojo si se crea el campo en blanco.. y ya hice dos tipos de conexiones y siempre me sale igual.. este es el codigo: tal ves alguien sabe q sucede--
<%
'Recogemos los valores del formulario
nombre=Request.Form("nombre")
'Instanciamos y abrimos nuestro objeto conexion
set conn=Server.CreateObject("ADODB.Connection")
Set rs=Server.CreateObject("ADODB.RecordSet")
conn.open "registrar","",""
sql = "SELECT * FROM usuario"
Set rs = Server.CreateObject("ADODB.RecordSet")
rs.Open sql, conn
sql1="INSERT INTO usuario (nombre)"
sql1= sql1 & " values (' "& nombre &" ')"
conn.execute(sql1)
%>
<h1><div align="center">Registro Insertado</div></h1>
<div align="center"><a href="lectura.asp">Visualizar el contenido de la base</a></div>
<%
'Cerramos el sistema de conexion
conn.Close
%>
Alexeyev
noviembre 13, 2006, 09:15
En la sentencia donde ejecutas el insert into puedes ponerlo asi de esta forma, para que en la variable res te devuelva un valor si es 1 si lo inserta si es 0 no lo inserto en la base
conn.execute misql, res
if err.number <> 0 then
res=0
end if
if (res = 0 ) then
'response.write "topo2"
response.write "<br><br><center><font class='error'>*** ERROR AL INSERTAR ***</font></center>"
end if
Aparte primero debes de ver si tu recordset no ha llego al final de archivo, o en su caso si insertas varios datos ocupa un while hasta que el recorset sea un fin de archivo
vBulletin®, Copyright ©2000-2008, Jelsoft Enterprises Ltd.