Base de datos de solo lectura?

Utilizo el siguiente código y me da el error de que el objeto es de sólo
lectura o la base de datos está abierta en módo de sólo lectura.
Utilizo Visual Basic 6.0, MDAC_TYP 2.6 y SQL Server 2000 en modo local.

Este es el código que utilizo, a través de ODBC.

Public WRK As Workspace
Public DBS As Database
Set WRK = CreateWorkspace("", "ADMIN", "", dbUseODBC)
Set DBS = WRK.OpenDatabase("MiFormas", dbDriverNoPrompt, False,
"ODBC;DRIVER=SQL
Server;SERVER=XP-CASA;DATABASE=MiFormas;UID=guest;PWD=;DSN=MICONE")
Dim jota As Recordset
Set jota = DBS.OpenRecordset("select * from prove")
jota.edit

Y a partir de aquí es donde está el problema.

Alguien sabe porqué. Lo he intentado y he mirado todo.

Utilizo el siguiente código y me da el error de que el objeto es de sólo
lectura o la base de datos está abierta en módo de sólo lectura.
Utilizo Visual Basic 6.0, MDAC_TYP 2.6 y SQL Server 2000 en modo local.

Este es el código que utilizo, a través de ODBC.

Public WRK As Workspace
Public DBS As Database
Set WRK = CreateWorkspace("", "ADMIN", "", dbUseODBC)
Set DBS = WRK.OpenDatabase("MiFormas", dbDriverNoPrompt, False,
"ODBC;DRIVER=SQL
Server;SERVER=XP-CASA;DATABASE=MiFormas;UID=guest;PWD=;DSN=MICONE")
Dim jota As Recordset
Set jota = DBS.OpenRecordset("select * from prove")
jota.edit

Y a partir de aquí es donde está el problema.

Alguien sabe porqué. Lo he intentado y he mirado todo.

Agustin

¿Que hace jota.edit?
Saludos
IIslas


"Agustín" escribió:

Utilizo el siguiente código y me da el error de que el objeto es de
sólo
lectura o la base de datos está abierta en módo de sólo lectura.
Utilizo Visual Basic 6.0, MDAC_TYP 2.6 y SQL Server 2000 en modo
local.

Este es el código que utilizo, a través de ODBC.

Public WRK As Workspace
Public DBS As Database
Set WRK = CreateWorkspace("", "ADMIN", "", dbUseODBC)
Set DBS = WRK.OpenDatabase("MiFormas", dbDriverNoPrompt, False,
"ODBC;DRIVER=SQL
Server;SERVER=XP-CASA;DATABASE=MiFormas;UID=guest;PWD=;DSN=MICONE")
Dim jota As Recordset
Set jota = DBS.OpenRecordset("select * from prove")
jota.edit

Y a partir de aquí es donde está el problema.

Alguien sabe porqué. Lo he intentado y he mirado todo.

Utilizo el siguiente código y me da el error de que el objeto es de

lectura o la base de datos está abierta en módo de sólo lectura.
Utilizo Visual Basic 6.0, MDAC_TYP 2.6 y SQL Server 2000 en modo

Este es el código que utilizo, a través de ODBC.

Public WRK As Workspace
Public DBS As Database
Set WRK = CreateWorkspace("", "ADMIN", "", dbUseODBC)
Set DBS = WRK.OpenDatabase("MiFormas", dbDriverNoPrompt, False,
"ODBC;DRIVER=SQL
Server;SERVER=XP-CASA;DATABASE=MiFormas;UID=guest;PWD=;DSN=MICONE")
Dim jota As Recordset
Set jota = DBS.OpenRecordset("select * from prove")
jota.edit

Y a partir de aquí es donde está el problema.

Alguien sabe porqué. Lo he intentado y he mirado todo.

Hola Agustin,

Estas usando DAO, proba con este codigo:


Public WRK As Workspace
Public DBS As Database
Set WRK = CreateWorkspace(MainWS, "admin", "", dbUseJet)
Set DBS = WRK.OpenDatabase("", False, False,
"ODBC;DSN=MICONE;SERVER=XP-CASA;DATABASE=MiFormas;UID=guest;PWD=")
Dim jota As Recordset
Set jota = DBS.OpenRecordset("select * from prove",dbOpenDynaset,0)
jota.edit



Un saludo, Víctor Koch.


"Agustín" escribió en el mensaje
news:

Utilizo el siguiente código y me da el error de que el objeto es de

sólo

lectura o la base de datos está abierta en módo de sólo lectura.
Utilizo Visual Basic 6.0, MDAC_TYP 2.6 y SQL Server 2000 en modo

local.

Este es el código que utilizo, a través de ODBC.

Public WRK As Workspace
Public DBS As Database
Set WRK = CreateWorkspace("", "ADMIN", "", dbUseODBC)
Set DBS = WRK.OpenDatabase("MiFormas", dbDriverNoPrompt, False,
"ODBC;DRIVER=SQL
Server;SERVER=XP-CASA;DATABASE=MiFormas;UID=guest;PWD=;DSN=MICONE")
Dim jota As Recordset
Set jota = DBS.OpenRecordset("select * from prove")
jota.edit

Y a partir de aquí es donde está el problema.

Alguien sabe porqué. Lo he intentado y he mirado todo.