Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Tablas planas (https://www.clubdelphi.com/foros/forumdisplay.php?f=20)
-   -   Excepción, repentina. (https://www.clubdelphi.com/foros/showthread.php?t=27628)

Chocoslovaco 25-11-2005 20:34:30

Excepción, repentina.
 
Al grano:

Se me ha presentado repentinamente (al menos eso creo) una Excepcion en una pequeña apliación que estoy desarrollando. Resulta que me conecto a ana base de datos en Access 97, con aun ADOConnection y realizo una selección y actualizaciones con 2 ADOQuery, la excepcion que se me presenta es la siguiente:

"ODBC:la definición de la tabla vinculada ha cambiado "

Inicialmente la base de datos la tenia en una carpeta local (donde desarrollo la aplicacion), pero al trasladarla a otro equipo dentro dela red, en una carpeta compartida, me ha marcado dicha exepcion; pero si la devuelvo a el equipo (carpeta local) no se presenta el problema.¿Cual puede ser el problema? :(
Agradezco comentarios/sugerencias y agrego el codigo.

Mi Conexion:
Código Delphi [-]
 procedure TActualizar.FormCreate(Sender: TObject);
 begin
   try
     DBConexion.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;Data Source=\\'
       +'equipo\Carpetacompartida\MiBase.mdb;Persist Security Info=False';
     DBConexion.LoginPrompt:=False;
     DBConexion.Connected:=True;
   except
     on E:Exception do
     begin
       ShowMessage('Error en la Conexión con la Base de Datos');
       DBConexion.Close;
       btnActualizar.Enabled:=False
     end;
   end;
 end;

Y donde se presenta el error al ejecutarlo paso a paso
Código Delphi [-]
   procedure TActualizar.btnActualizarClick(Sender: TObject);
   var cant, pc, tpc : real;
   begin
     with QSelecciona do
       begin
         Close;
         SQL.Clear;
         SQL.Text:='SELECT Pedidos.IdPedido, aqui mas campos '+
                   'FROM Pedidos '+
                   'WHERE ((criterio1) AND (criterio2Fecha>#10/31/2005#))';
         Open; //Aqui es donde se creo el mesaje de error

Chocoslovaco 28-11-2005 21:15:09

Solución repentina??
 
Tal y como cito en el titulo, el problema de mi aplicación, la he resuelto repentinamente, el problema redicaba en el Sistema Operativo del equipo que contenia la BD (Win XP SP1, raro no???:D). Pues cambie la BD a otro equipo y mi aplicación se ejecutó sin ningun problema.
Creo que pediré que reinstalen el S.O. de ese equipo.:mad:
Gracias.

Pd. Este Hilo se puede dar por cerrado


La franja horaria es GMT +2. Ahora son las 16:57:51.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi