personaliser une erreur lors de l'execution d'un exe avec shell...

personaliser une erreur lors de l'execution d'un exe avec shell... - VB/VBA/VBS - Programmation

Marsh Posté le 20-04-2005 à 12:02:46    

J'ai fait un petit soft qui exécute un programme lors qui clic sur un bouto,.
 
Il s'avere que si le programme ne se trouve pas a l'endrois souhaité le programme plante et j'aimerai à la place afficher une msgbox en disant que le programme est introuvable.
 
C'est possible ?
 
Merci d'avance

Reply

Marsh Posté le 20-04-2005 à 12:02:46   

Reply

Marsh Posté le 20-04-2005 à 12:12:50    

Salut,
 
Faut faire une gestion d'erreur qui capture cette erreur... Ou alors tester avant l'existence de l'exe que tu lances et s'il le fichier n'existe pas afficher le message à l'utilisateur.

Reply

Marsh Posté le 20-04-2005 à 12:19:39    

d'accord mais cquel est le code pour l'une ou l'autre solution ??
 

Reply

Marsh Posté le 20-04-2005 à 13:25:17    

Salut,
 
Je vais pas te mâcher le travail... Regarde un peu dans l'aide de VB tu trouveras tout ce qu'il faut...
 
Mais pour te donner un coup de pouce, pour la gestion d'erreur tu dois commencer par faire un F1 pour avoir l'aide et tu tapes "gestion d'erreur" et pour le test d'existence d'un fichier tu fais toujours F1 et tu tapes "existence d'un fichier" et tout cela dans l'onglet "Aide intuitive".
 
Voilà

Reply

Marsh Posté le 21-04-2005 à 21:33:14    

Dans ton programme, de préférence au début, tape 1 des 2 lignes

Code :
  1. On Error Resum Next
Code :
  1. On Error Goto gestion_erreur


 
La première saute la ligne qui cause une erreur. C'est pour 'cacher' les problèmes. L'autre permet de gérer les erreurs en les dirigeants sur un label.
Pour le traitement, tu peux avoir un truc du genre :

Code :
  1. Select Case Err.Number
  2. Case 1
  3. 'Gestion de l'erreur numéro 1
  4. Case 2
  5. ...
  6. Case n
  7. Case Else
  8. 'Permet de gérer les erreurs éventuelles
  9. End Select
  10. Err.Clear ' on initialise les erreur

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed