Discussion :

[gbuxo]

Bonjour,
Je travaille en ACC97 sur 2 PC en réseau comprenant chacun une base de données.
Depuis un PC je veux tester la base de l'autre et générer une erreur si le chelin de la base est faux.
Dans ma proc j'inscris le code :

Code :

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

1
2
3
4
5
6
7
8
On Error GoTo ERREUROUV
Set DB2 = DBEngine.Workspaces(0).OpenDatabase(NOMBASE2)
EXITOUV:
  Screen.MousePointer = 0
  Exit Sub
ERREUROUV:
  MsgBox Err.Description
  Resume EXITOUV

J'obtient le message d'erreur suivant :
"Chemin..... isn't a valid path. Make sure that the path name is spelled correctly and that you are connected to the server on which the file resides"
Malheureusement il n'y a aucun N° d'erreur et ne déclenche pas le On Error.
Donc impossible de traiter l'erreur... Que faire...
A+
Merci

[pgz]

Bonjour,

En cas d'erreur, tu as simplement demandé d'afficher par MsgBox sa description. ce n'est pas ce qui se passe?
Si tu veux le numéro d'erreur, il faut le demander, par exemple

Code :

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

MsgBox "Ouverture de BD2. Erreur n° " & Err.Number & vbcrlf & Err.Description

.

Bon courage,

pgz

[Tofalu]

Que vaut NOMBASE2 ?

[gbuxo]

Bonjour,
Exact j'avais le N° d'erreur.
Pour Tofalu NOMBASE2 est le chemin exacte de la base de données à lier.
Petite remarque : pour un PC style tour le N° d'erreur est 3044, et pour un portable (avec exactement le même XP installé) le N° d'erreur est : 3024.
Bizare non ?
A+