Insertar Datos en ContaPlus

12/01/2006 - 23:32 por Javier | Informe spam
Hola a todos

Estoy con una página en ASP y estoy entantando insertar datos en las tablas
de contaplus y hago :

set conn = server.createobject("adodb.connection")
conn.Open "Driver={Microsoft dBASE Driver
(*.dbf)};DriverID'7;Dbq=C:\ContaPro\EMP01;"

SET qry=server.createObject("adodb.recordset")
SQL="SELECT * FROM cambio"
qry.open SQL,conn,1,3
IF not qry.eof THEN
response.Write("Primero")
response.Write("<br>")
response.Write(qry("cambio2"))
response.Write("<br>")
response.Write("<br>")
response.Write("<br>")
end if
qry.close

Esto me funciona de cine, pero cuando quiero insertar o actualizar algo me
dice :

insertar :
Const adOpenKeyset = 3
Const adLockOptimistic = 3
set rs=createobject("ADODB.Recordset")
rs.CursorType = adOpenKeyset
rs.LockType = adLockOptimistic
sqltxt="SELECT * from cambio where coddivisa='111'"
rs.Open sqltxt, conn
if rs.eof then
rs.Addnew
rs("coddivisa")="JJJ"
rs("fecha")="01/01/2001"
rs("cambio")=1
rs("cambio2")=1
rs("tasaconv")=1
rs.Update
else
rs("cambio2")="29"
rs.update
end if
rs.close

Error

Microsoft OLE DB Provider for ODBC Drivers error '80004005'

[Microsoft][Controlador ODBC dBase] No se puede actualizar. Base de datos u
objeto de sólo lectura.

/enlace/enlace.asp, línea 45

línea 45 : rs.Update

¿Alguiien sabe que carajo pasa?
 

Leer las respuestas

#1 Miguel Gonzalez
13/01/2006 - 10:53 | Informe spam
Hola Javier.

Me suena a que es un tema de permisos. Cabría ver si el usuario que
ejecuta la página ASP tiene permiso de modificación sobre las bases de
datos. Si el acceso al servidor web es anónimo, cabría comprobar los
permisos del ususario "IUSR_nombreServidor" (aunque creo que una página
ASP que modifica datos de contabilidad no debería tener acceso anónimo).

Saludos!
Miguel

Javier escribió:
Hola a todos

Estoy con una página en ASP y estoy entantando insertar datos en las tablas
de contaplus y hago :

set conn = server.createobject("adodb.connection")
conn.Open "Driver={Microsoft dBASE Driver
(*.dbf)};DriverID'7;Dbq=C:\ContaPro\EMP01;"

SET qry=server.createObject("adodb.recordset")
SQL="SELECT * FROM cambio"
qry.open SQL,conn,1,3
IF not qry.eof THEN
response.Write("Primero")
response.Write("<br>")
response.Write(qry("cambio2"))
response.Write("<br>")
response.Write("<br>")
response.Write("<br>")
end if
qry.close

Esto me funciona de cine, pero cuando quiero insertar o actualizar algo me
dice :

insertar :
Const adOpenKeyset = 3
Const adLockOptimistic = 3
set rs=createobject("ADODB.Recordset")
rs.CursorType = adOpenKeyset
rs.LockType = adLockOptimistic
sqltxt="SELECT * from cambio where coddivisa='111'"
rs.Open sqltxt, conn
if rs.eof then
rs.Addnew
rs("coddivisa")="JJJ"
rs("fecha")="01/01/2001"
rs("cambio")=1
rs("cambio2")=1
rs("tasaconv")=1
rs.Update
else
rs("cambio2")="29"
rs.update
end if
rs.close

Error

Microsoft OLE DB Provider for ODBC Drivers error '80004005'

[Microsoft][Controlador ODBC dBase] No se puede actualizar. Base de datos u
objeto de sólo lectura.

/enlace/enlace.asp, línea 45

línea 45 : rs.Update

¿Alguiien sabe que carajo pasa?

Preguntas similares