24 replies to this topic

[Punzo]

Buen dia a todos, tengo un problemita con una aplicacion que quiero que corra desde un cd, pero al momento de que la aplicacion quiere abrir la bd me dice que: "No se pudo bloquear el archivo", no se si es forzosamente necesario tener la bd en disco duro? mi ConnectionString es el siguiente:

delphi

Ac.ConnectionString := 'Provider=Microsoft.ACE.OLEDB.12.0;Data Source='+Archivo+';' + 
                                   'Mode=Read;Persist Security Info=False';

Ojala que me puedan ayudar, gracias de antemano. Tanto la BD de Access como la aplicacion se encuentran en cd.

[Caral]

Hola
Nunca lo he hecho, pero LEER la BD deberia ser posible desde el CD.
Saludos

[Punzo]

Pues no puede leer desde el cd, de hecho en el connectionstring lo puse como modo lectura solamente, y no lo abre; tendras alguna idea del porque?, gracias por tu pronta respuesta.

[poliburro]

El problema es que estas usando un proveedor OLEDB que no admite el arametro mode. prueba usando Jet de la siguiente manera:

delphi

Ac.ConnectionString := 'Provider=Microsoft.Jet.OLEDB.4.0; Source='+Archivo+';' +                                    'Mode=Read;Persist Security Info=False';

[Punzo]

Ok, probando, gracias.

[Caral]

Hola
No se amigo.
He hecho pruebas desde un disco USB y no solo lo lee, hace de todo.
En el caso de un CD, me imagino que tendran que ver otras cosas, por eso me imagino que leerlo lo haria.
Ahora: Por que no intentas poner el programa fuera del CD y ver si lee la BD en el CD ?.
Saludos

[Punzo]

Probe con el proveedor Microsoft.Jet.OLEDB.4.0, y me sigue diciendo lo mismo: "No se pudo bloquear el archivo", saque el exe al disco duro para que lea la bd en el cd, y me dice lo mismo, creen que es mejor hacer un instalador para que los copie al dd?, de plano no se puede leer una bd de access en cd desde una aplicacion?

[Fenareth]

Hola Punzo 

Tengo entendido que Access bloquea la BD cuando un usuario tiene acceso a ella (yo he tenido que cerrar Access cuando quiero conectarme al *.mdb desde Delphi)...


Por el error y por ésto que me ha pasado, creo que el problema es que no puede escribir sobre el CD donde tienes la BD, a Caral no le pasa éste problema porque en la USB si puede escribir...


La BD tiene que estar colocada en un lugar donde pueda leer/escribir sobre ella porque de igual modo, si no es el bloqueo, cómo grabará los datos sobre la BD ?


Haz la prueba sacando la BD del CD y coméntanos porfas....


Saludox !

[Punzo]

Copiandolos al DD, si funciona bien sin problemas, de hecho cuando abre la bd, crea un archivo .ldb en el mismo sitio donde se encuentra la bd. Entonces no se podra de plano leer la bd?

[Fenareth]

Pues así directamente me suena como a que no, pero a lo mejor haciendo una trampilla que cuando ejecutes el exe, copies la BD a una dirección temporal en Disco Duro y al cerrar el exe, se destruya...


No sé, podría ser 


Saludox !

[Caral]

Hola
Acabas de dar en el clavo tu mismo.
Cuando se abre la BD access ella crea un archivo adicional, con una llave para indicar que esta abierta.
NO puede crear ese archivo en el CD, asi de sencillo.
Osea, No se puede usar desde un CD.
Saludos

[enecumene]

Sí se puede leer desde un CD, sólo agregar la siguiente línea:

delphi

ADOConnection.Mode := cmShareExclusive;

Saludos.

[Fenareth]

Esto hace al *.mdb de sólo lectura amigo ? 


Saludox !

[enecumene]

Esto hace al *.mdb de sólo lectura amigo ? 


Saludox !

Yes mi querida amiga .

[Caral]

Hola
Y me pregunto:
Donde estabas Fernando, aqui nosotros inventado remedios caseros y tu que ......
Saludos

[Punzo]

Agregue la linea enecumene, y me sale el mismo error: No se pudo bloquear el archivo; probe tambien con cmRead, y nada.

[Punzo]

Quedo asi:

delphi

Ac.ConnectionString := 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\LN.mdb;Mode=Read;Persist Security Info=False';
Ac.Mode := cmShareExclusive;
Ac.Open;

y me tira el mismo error. 

[poliburro]

quita la línea Ac.Mode := cmShareExclusive; deja solo el Ac.Open. e intentalo de nuevo

[Fenareth]

Quedo asi:

delphi

Ac.ConnectionString := 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\LN.mdb;Mode=Read;Persist Security Info=False';
Ac.Mode := cmShareExclusive;
Ac.Open;

y me tira el mismo error. 

Prueba con

delphi

Ac.ConnectionString := 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\LN.mdb;Mode=cmShareExclusive;Persist Security Info=False';
Ac.Open;

Saludox !

[poliburro]

o puedes dejar la línea Ac.Mode := cmShareExclusive; y quitar el Mode=Read; de la cadena de conexión.

es cosa de probarle