Ver Mensaje Individual
  #6 (permalink)  
Antiguo 12/04/2005, 17:42
Avatar de trasgukabi
trasgukabi
 
Fecha de Ingreso: septiembre-2004
Mensajes: 2.749
Antigüedad: 20 años, 7 meses
Puntos: 18
ah, lo abre para añadir el registro con .addnew. el código bueno quedaría así:
Código:
 'Abrir conexion con la base de datos
 Set oConn = Server.CreateObject("ADODB.Connection")
 oConn.Open "dsn=tuDSNName;uid=tuUserName;pwd=tuUserPassword"
 
 'Ahora rs contiene todos los datos que necesitas
 Sqltxt = "INSERT into Tabla1 (asientode,diari,data,numde,numa,desc,introduit) values(" _
           & "'" & Cstr(request.form("txtAsientoDe") & "'," _
           & "'" & Cstr(request.form("txtDiari") & "'," _
           & "'" & Cstr(request.form("txtData") & "'," _
           & "'" & Cstr(request.form("txtNumDe") & "'," _
           & "'" & Cstr(request.form("txtNumA") & "'," _
           & "'" & Cstr(request.form("txtDesc") & "'," _
           & "'" & Cstr(request.form("txtIntroduit") & "'" _
           & ")"
 
 'Liberar memoria, por que ya no necesitamos los valores en el Recordset
 'Ejecutar el SQL para insertar el campo
 oConn.Execute(Sqltxt)
 
 'Cerrar conexion a la base de datos
 oConn.Close()
 set oConn = nothing
te faltaban las comas entre los valores
en el insert, al menos yo, pongo siempre la lista de campos a añadir antes de values() (no sé si realmente hace falta)


Última edición por trasgukabi; 12/04/2005 a las 17:47