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)