Comment tester si une base de donnée existe

Question

bonjour, je voudrais faire que lorsque j ex&#233;cute le programme, celui ci teste ci la base de donn&#233;e existe et que si elle n existe pas le programme ne s execute pas ou n effectue pas de connexion odbc des le lancement car mon programme excute une requete d&#233;s le lancement du programme et lorsque je l utilise sur un pc qui ne possede pas la base de donn&#233;e elle affiche d innombrable message d erreur.
 j utilise sql server 2000

cs_cantador · Answer

gestion d'erreur sur le Connect

cantador

yvessimon · Answer

Tu connais ne nom de ta base alor avec if  FileExists('nomfichierbase')   then ---> tu

peux tenter une ouverture si la base est bien d&#233;clar&#233;e alors pas d'erreur si non erreu &#224; l'ouverture.


yvessimon

gabs77 · Answer

ok je vois a peu pres
mais supposons que ma base de donn&#233;es s appel  'gestioncas' 
et g une connexion automatique avec la fonction database

donc g mis :
========
procedure Tcas.FormCreate(Sender: TObject);
begin
   if fileexists('gestioncas') then 
   begin
      showmessage('dispo !!'); 


      database1.AliasName:='gestioncas';     //ouverture de la base de donn&#233;e
      database1.DatabaseName:='cas';        //on renomme la base de donn&#233;e 
                                                                //pour l ex&#233;cution des requetes 
                                                               //avec ses parametres de connectivit&#233;
      database1.LoginPrompt:=false;         //ne pas demander le mot de passe de conexion
      database1.Connected:=true;             //base toujours connect&#233;
   end else
   showmessage('No dispo !!');               //non dispo
   application.Terminate;                         //forcer fermeture du programme
end;

mais il ne reconnait pas il me met toujours non dispo alors ke c la bonne requete
je pense kil doit y avoir une maniere speifique d apeler la base mais je ne vois pas

yvessimon · Answer

si ta base de donn&#233;e et de type eccess alors avec  TADOConnection

un double clique permet de se connecter a la base de donn&#233;es.



Cela d&#233;pend de ton gestionnaire de base de donn&#233;es.



et avec 

try

// ouvrir la base

except

// gestion en cas d'erreur

end


yvessimon

gabs77 · Answer

j ai essy&#233; avec le try except mais du coup il me met tout le temps dispo que ce soit le bon nom de la table ou non et m affiche un message d erreur kan c pas le bon (ce ki est normal !!)
je ne vois vraiment pas komen je pe faire

try
database1.AliasName:='gestioncas';
database1.DatabaseName:='cas';
showmessage ('DISPO !!!');
except
showmessage ('non dispo !!!');
application.Terminate;
end;

yvessimon · Answer

L'erreur doit se produire lors de la connexion 

database1.connect := true; ou autre moyen de connexion



Cherche des exmeples de base de donn&#233;es ADO access sur le site.



Bon courage.

yvessimon

Comment tester si une base de donnée existe

6 réponses

Votre réponse

Discussions similaires