Goto en VBS

Goto en VBS - VB/VBA/VBS - Programmation

Marsh Posté le 26-04-2012 à 15:33:50    

Bonjour à tous,  
 
Avant de me faire taper sur les doigts, je sais que le goto n’existe pas en VBS et qu'il faut rayer de mon langage ce mot :-).
 
Ma question est simple, comment puis-je aller à une autre ligne dans un VBS ?
 

Code :
  1. If Not objFSO.FileExists("C:\Windows\FirstConnectionLeasecomien.txt" ) Then
  2. Aller à la ligne 15
  3. Else
  4. Aller à la ligne 45
  5. End If


 
Merci d'avance.

Reply

Marsh Posté le 26-04-2012 à 15:33:50   

Reply

Marsh Posté le 26-04-2012 à 16:11:31    

Soit tu mets le code que tu veux exécuter directement après le then, soit tu crées une fonction que tu appelleras à cet endroit.
Quand tu dis qu'il faut rayer le goto de ton langage, faut aussi rayer ce qu'il fait, hein :D


---------------
The only thing necessary for the triumph of evil is for good people to do nothing.
Reply

Marsh Posté le 15-05-2012 à 17:00:59    

Je ne vois pas trop ce que tu veux dire dans ta deuxième solution.
Pourrais-tu me donner un exemple ?

Reply

Marsh Posté le 15-05-2012 à 17:12:53    

Une fonction c'est (en gros) un ensemble de commandes que tu nommes par exemple "Fonction1", et à laquelle tu peux faire appel ensuite par ce nom.


---------------
The only thing necessary for the triumph of evil is for good people to do nothing.
Reply

Marsh Posté le 16-05-2012 à 08:54:17    

Ok, j'ai compris mais j'arrivais pas à trouver la formulation.
Mais avec les subroutine ça marche nikel :-)

Reply

Marsh Posté le 16-05-2012 à 10:29:49    

de mémoire en VB, il y a une différence entre les subroutines et les fonctions. Les premières ne renvoient pas de résultat (variable de retour) contrairement aux secondes.


---------------
Astres, outil de help-desk GPL : http://sourceforge.net/projects/astres, ICARE, gestion de conf : http://sourceforge.net/projects/icare, Outil Planeta Calandreta : https://framalibre.org/content/planeta-calandreta
Reply

Sujets relatifs:

Leave a Replay

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