Visual Basic - Error al abrir DB mas de 1 vez

Life is soft - evento anual de software empresarial
   
Vista:

Error al abrir DB mas de 1 vez

Publicado por lucia (23 intervenciones) el 12/11/2007 23:02:28
Hola a todos:
Estoy programando en VBA, y al abrir una base de datos varias veces me da el siguiente error:

The database has been placed in a state by user admin on XXX that prevents it from being opened or locked

He leido en internet que se solucionaba sin cerrar la base de datos, pero no, sigue apareciendo el mismo error.

SOS!
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Error al abrir DB mas de 1 vez

Publicado por Lucio (2 intervenciones) el 12/11/2007 23:13:37
Primero, no sabes que hay un VBA en español y pone los mensajes en español? (valga la redundancia)

Segundo has leido en internet que se solucionaba sin cerrar la base de datos? pues no, o leiste mal o el que te informo no tenia ni idea de lo que te estaba informando.

Despues de ver (leer) tanta incultura, o falta de informacion me voy a dormir la siesta y cuando me despierte es posible que conteste a alguien (si merece la pena)
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Error al abrir DB mas de 1 vez

Publicado por lucia (23 intervenciones) el 13/11/2007 11:19:21
Claro que se que hay una versión en español, pero me defiendo igual de bien en español que en inglés.

Incultura? Claro, pero "el culto" de turno no pone ni un acento!!!!!
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Error al abrir DB mas de 1 vez

Publicado por El conejo (124 intervenciones) el 13/11/2007 00:46:23
Hola.

Podrías pegar la rutina como estas abriendo tu base de datos y de que forma estas enlazando las consultas?

Saludos.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Error al abrir DB mas de 1 vez

Publicado por lucia (23 intervenciones) el 13/11/2007 11:12:02
Hola, esta es la rutina que utilizado,

Set bd = OpenDatabase(CurrentProject.Path & "\Findes.mdb")
Set rst = bd.OpenRecordset("DiasTrabajados")

si solo abro una vez la aplicacion, todo va bien, pero si voy al modo diseño para hacer alguna modificacion, y vuelvo a ejecutarlo se vuelven a ejecutar esas dos lineas y me da el error del que hablaba.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Error al abrir DB mas de 1 vez

Publicado por El conejo (124 intervenciones) el 13/11/2007 15:26:58
Hola,

No veo donde pueda estar el error, me llama la atencíón currentproject.path no será que en algun momento ese currentproject cambia su ruta?

Bueno use
Microsoft ADO 3.51 Object Library

el código en Form_Load con debbug

Set bd = OpenDatabase(App.Path & "\prueba.mdb")
Set rst = bd.OpenRecordset("test")
If rst.RecordCount > 0 Then
MsgBox "Hay " & rst.RecordCount & " registros"
End If
rst.Close
Set rst = bd.OpenRecordset("test1")
If rst.RecordCount > 0 Then
MsgBox "Hay " & rst.RecordCount & " registros"
End If
rst.Close
bd.Close
Set bd = OpenDatabase(App.Path & "\prueba.mdb")
Set rst = bd.OpenRecordset("test")
If rst.RecordCount > 0 Then
MsgBox "Hay " & rst.RecordCount & " registros"
End If
rst.Close
Set rst = bd.OpenRecordset("test1")
If rst.RecordCount > 0 Then
MsgBox "Hay " & rst.RecordCount & " registros"
End If
rst.Close
bd.Close

La BD pruebas tiene 5 tablas test1, test2.. etc, no me dió el problema, por eso creo que es el objeto currentproject el que podria dar problemas, no sé con que referencía cargas ese objeto por eso no pude probarlo y lo cambie por app.path.

Saludos.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Error al abrir DB mas de 1 vez

Publicado por lucia (23 intervenciones) el 13/11/2007 17:17:30
Yo antes tb lo utilizaba asi, pero me daba un error de "Variable not defined" en App y encontré por la red que para VBA se utilizaba currentproject.path.

Tu no lo defines?
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Error al abrir DB mas de 1 vez

Publicado por El conejo (124 intervenciones) el 13/11/2007 19:17:33
Hola.

Perdón no debí responder, no tenía la menor idea que existía eso de Visual Basic For Applications.

Probé todo eso en VB6.

Aún así, leí en wikipedia algo:

Dim db As DAO.Database
Dim rs As DAO.Recordset

Set db = CurrentDb
Set rs = db.OpenRecordset("SELECT * FROM tblMain")

Do Until rs.EOF
MsgBox rs!FieldName
rs.MoveNext
Loop

rs.Close
db.Close
Set rs = Nothing
Set db = Nothing

Ahora no sé si servirá.
Saludos y descargando VBA. =).
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Error al abrir DB mas de 1 vez

Publicado por Lucia (23 intervenciones) el 13/11/2007 23:57:45
Muchas gracias. Ya te contaré si lo resuelvo o si no.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Error al abrir DB mas de 1 vez

Publicado por Lucia (23 intervenciones) el 14/11/2007 00:03:10
Pues si, pues si. Muy buena. Funciona

Muchas gracias again
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar