Discussion :

[Benjamin GAGNEUX]

Salut,

Je réalise actuellement un logiciel multiposte utilisant (ADO) une base Access commune.

Cette Base de donnée est verrouillée en modification.

Arrivant actuellement vers la fin du développement, je me pose plusieurs questions.

1) Quel sont les messages d'erreurs (OleException) lorsque 2 personnes modifient un enregistrement ou lorsque les tables sont vides
(car il faut que ces messages soient traités différemment) ?

2) Quel est le meilleur moyen de stocker le chemin d'une base de donnée pour du multiposte (Fichier INI, registre windows, ...)

merci

[Bidouille]

1) Quel sont les messages d'erreurs (OleException) lorsque 2 personnes modifient un enregistrement ou lorsque les tables sont vides

C'est le dernier qui modifie qui a le dernier mot. Si tu fais un UPDATE sur un enregistrement inexistant, la requête échoue.

2) Quel est le meilleur moyen de stocker le chemin d'une base de donnée pour du multiposte (Fichier INI, registre windows, ...)

J'utilise un .ini et je n'aime pas la BDR qui est une exclusivité Windows.

[Benjamin GAGNEUX]

merci pour tes réponses.

C'est le dernier qui modifie qui a le dernier mot

Alors il y a risque de confusion au niveau des données ? Je pensais que si l'enregistrement était en cours de modification, alors la 2eme personne se verrait refuser l'accès...

Depuis que j'ai vidé les enregistrements des tables de ma bases de donnée, j'ai une exception à chaque Select que je fais : EOleException : le paramètre ClientID n'a pas de valeur par défault.

Et donc je souhaiterai traiter les exceptions de base de donnée selon la situation :
la connection a la base ne fonctionne pas -> sortie du programme.
la table est vide -> continuer car pas encore enregistré les donné (notemment lorsque nouvel acquéreur du logiciel)
etc....

Existe-t-il un récpitulatif des différentes exceptions à gérer pour Access sous ADO ?

[Benjamin GAGNEUX]

J'ai récupére les code d'erreur fourni par JET4 mais impossible de les utiliser dans delphi.

Par exemple l'exception le paramètre ClientID n'a pas de valeur par défault correspond au code 3747. Cependant Delphi me renvoie un code -2147217904.

En tout cas j'ai trouvé la liste des erreurs Jet4, si quelqu'un en a besoin, faites moi signe.

[Edit]
Lorsque la base n'est pas présente(3024) ou en mode lecture seule(exclusif :3051), Delphi renvoie -2147467259.
Il doit y avoir une relation entre le code de delphi et celui d'access...[/Edit]


merci

[Benjamin GAGNEUX]

Salut,

J'ai enfin trouvé le moyen de récupérer le code d'erreur fourni par MS-JET (ACCESS2000) sous ADO.

Il est nécessaire de mettre un TADOConnection en amont du TADOQuery

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
 
Var
  sMaRequete : string;
....
....
try
  TADOConnection1.Connected := True;
  TADOQuery1.SQL.Clear;
  TADOQuery1.SQL.Add(sMaRequete);
 
  TADOQuery1.Open;
....
Except
  On Exception do
    if (TADOConnection1.Errors[0].SQLState = '3747') then
        MessageDlg('Table vide ...',mtInformation,mbOKCancel,0):
End;

J'espère que cela pourra éviter de longue heures de recherche à d'autres.
A bientot
Ben