
12/04/2005, 09:13
|
| | Fecha de Ingreso: febrero-2005
Mensajes: 73
Antigüedad: 20 años, 2 meses Puntos: 0 | |
Problema con recordset Hola a todos!!!
En Dreamweaver intento enviar datos de una tabla que está dentro de un formulario a la base de datos y me da un error que creo que no tendría que dar. A ver si alguien sabe ver que es lo que hago mal. Ahí va el código: <form name="form1" method="post" action="http://localhost/samgest/Inserinto.asp">
<% if request.form="" then %>
<table height="34" border="1">
<tr>
<td width="90" height="28"><input name="txtAsientoDe" type="text" size="12"></td>
<td width="90"><input name="txtAsientoA" type="textfield" size="12"></td>
<td width="100"><input name="txtDiari" type="textfield2" size="15"></td>
<td width="100"><input type="textfield3" name="txtData" size="15"></td>
<td width="90"><input type="textfield4" name="NumDe" size="12"></td>
<td width="90"><input type="textfield5" name="NumA" size="12"></td>
<td width="110"><input type="textfield6" name="Desc" size="25"></td>
<td width="100"><input type="textfield6" name="Introduit" xsize="17"></td>
</tr>
</table>
<%else
'Creamos los objetos
set oConn=Server.CreateObject("ADODB.Connection")
set rs=Server.CreateObject("ADODB.Recordset")
'Conectamos con DSN a la base de datos
oConn.Open "DSN=iva" 'abrimos la bd
set rs = createobject("ADODB.Recordset") 'abrimos un recordset para guardar el resultado de la sentencia SQL
rs.CursorType = 1
rs.LockType = 3
Sqltxt = "SELECT * FROM Tabla1"
rs.open Sqltxt, "DSN = iva"
rs.Addnew 'añadimos fila en la tabla de la bd
rs("AsientoDe") = request.form("txtAsientoDe")
rs("AsientoA") = request.form("txtAsientoA")
rs("Diario") = request.form("txtDiari")
rs("Fecha") = request.form("txtData")
rs("DocDe") = request.form("txtNumDe")
rs("DocA") = request.form("txtNumA")
rs("Descripción") = request.form("txtDesc")
rs("Introducido por") = request.form("txtIntroduit")
rs.Update
rs.close Sqltxt
rs.close 'cerramos la variable
oConn.close 'cerramos la tabla
set rs=Nothing 'para cerrar la variable y dejar el espacio de memoria vacío
set oConn=Nothing 'para cerrar la variable y dejar el espacio de memoria vacío
End if %>
<p>
<input type="submit" name="Submit" value="Enviar">
</p>
</form>
Cuando lo ejecuto, introduzco datos y le doy a Enviar me salta un error de que no encuentra el nombre del orígen de datos. He revisado el ODBC y no falta nada.
Gracias anticipadas!!!!!!!!!!!!!! |