Tutoriel VBS - Notions de base : 5 étapes

2024 Auteur: John Day | [email protected]. Dernière modifié: 2024-01-30 09:11

D'accord, certaines personnes m'ont demandé d'où ai-je appris mes vb. Je vais l'apprendre de moi =DSo, commençons… Qu'est-ce que vbs ?VBScript est un langage de script Microsoft. -_- donc étant Microsoft, ils font en sorte que cela ne fonctionne que sur IE. Mais en plus d'être un script Web, il est utilisé pour toutes sortes de choses… par exemple sur la photo 2) (c'est la deuxième photo) C'est à partir du dossier System 32. Vbs peut également être utilisé pour créer des programmes. tutoriel.. mais je n'en ai pas trouvé. À part cammel8 qui semble être vraiment bon avec les scripts vbs =P.. mais je vais quand même faire le tutoriel.

Étape 1: les bases de Vbs

Ok donc voici les bases.. choses que vous devriez déjà savoir … Vous enregistrez les fichiers sous: quelque chose.vbs Ce n'est pas comme un fichier batch, il n'a pas d'écran vous indiquant des informations. D'une certaine manière, c'est un peu comme javascript. Mais en même temps, il n'y a rien de tel.) cela ferait apparaître une boîte de message disant bonjour. (photo 1) Parallèlement à cela, vous pouvez ajouter différents boutons à la boîte de message.. voici tout sur les boîtes de message: un tableau: dim iRule(3)mais cela donnerait ceci: (car 0 est inclus)iRule(0)="var1"iRule(1)="var2"iRule(2)="var3"iRule(3) ="var4"Utilisation de vars dans le script.. Vous pouvez facilement utiliser vars..vous pourriez avoir: (photo 2)

dim iRuledim instructablesiRule="instructables"instructables=msgbox("bonjour " & iRule) En raison du & il dit "bonjour instructables" parce que la valeur de iRule est instructables. une valeur de retour. Sub iRule(arg1, arg2, arg3)…Script…End SubThe arg 1, 2, 3 sont les Arguments. Cela concerne toutes les bases.. profitez-en.. ou continuez à lire pour des bases moins basiques..

Étape 2: Pas si basiques de Vbs

Je vais commencer cette étape avec les fonctions… parce que je les trouve toujours ennuyeuses. photo 1)

Function times(x, y) times = x * yEnd FunctionDim resultdim var1result = times(10, 10)var1=msgbox(result)Cela vous donnerait 100 laissez-moi vous expliquer ….vous l'avez dit à fois 10 par 10..résultat = temps (10, 10) ceci est allé à la fonction timesx est maintenant 10 et y est maintenant 10 donc: x * y renvoie la valeur avec answer. For, Next, Do, LoopLa boucle For, Next peut être utilisée pour répéter des choses, par exemple:for var = 0 à 5 msgbox(var)nextmsgbox("Finish")Cela fera apparaître une boîte de message comptant 0, 1, 2, 3, 4, 5 puis il dira 'Finish'REMEMBER dans vbs 0 compte presque toujours! donc ce code répéterait une commande 6 fois, par exemple: pour var = 0 à 5 msgbox("hello")nextmsgbox("Finish")le message 'hello' apparaîtrait 6 fois. à la 7ème fois, il dira Terminer. Si vous ajoutez: étape … à la fin de pour var = 0 à 5 par exemple pour var = 0 à 5 étape 5 qui le fera sauter 5 à chaque fois.. afficher deux fois car 5 est la limite. Vous pouvez également vous retirer.. par exemple l'étape -5 comptera 5 à rebours à chaque fois. Do, Loopthe do loop est utilisé pour boucler un morceau de code encore et encore et encore ect. principalement utilisé pour les virus =Pmais vous pouvez les utiliser pour vous aider.. dites si vous voulez continuer à dire un message jusqu'à ce qu'une certaine option soit choisie. Vous pouvez toujours ajouter un Until sur la partie do ou sur la boucle. egdo jusqu'à var=5mais dans le code, vous devez le faire ajouter 1 ou plus à la var.. ou il continuera à boucler. est égal à 10 ! C'est tout pour les Not So Basics de vbs.

Étape 3: les si et les ensuite

Les thèses sont assez faciles à obtenir mais j'ai décidé qu'ils avaient besoin d'une page au cas où quelqu'un ne saurait pas ce qu'ils ont fait. pas difficile car nous savons tous que les instructables sont les meilleurs. =P… maintenant pour les ifs and thens multilignes… (musique effrayante) mais là, pas si effrayant, vous ajoutez simplement une fin si à la fin de l'instruction is. e-g.webp

le else et elseif Ce ne sont pas difficiles non plus..le else est juste pour quand vous voulez une option pour une chose et une autre pour le reste.. e-g.webp

Étape 4: Cas

les cas sont simples et peuvent vous rendre la vie beaucoup plus facile.. exemple de cas simple:

Dim FavCol FavCol = "rouge" Sélectionnez la case FavCol Case "Black" msgbox("votre couleur fav est noire") Case "rouge"msgbox("votre couleur fav est rouge") Case "Jaune"msgbox("votre couleur fav est jaune ") Case Elsemsgbox("Maintenant, c'est juste déroutant") End SelectCe script simple sélectionnera des options dans une liste dans ce cas, il vous dira que votre couleur préférée est le rouge. Laissez-moi entrer un peu plus en détail… vous obtenez votre var: Dim var, var="iRule" var peut quel n'importe quoipuis vous demandez au vbs de parcourir une liste pour trouver votre var … s'il ne le trouve pas, il ira à: Case Else qui est exactement comme la commande if, else. s'il trouve votre var, il s'exécutera

Étape 5: Passer Vars

Si vous regardez autour de vous sur Internet, vous constaterez que beaucoup de gens veulent savoir comment passer des vars entre batch à vbs et vbs à batch… Je vais vous montrer la meilleure façon que j'ai trouvée: puisqu'il s'agit d'un tutoriel vbs, je Je vais d'abord vous montrer comment transférer des vars de vbs vers batch…VBS TO BATCHCeci est le vbs:

dim aa=InputBox("Tapez quelque chose:", "Var")dim WshShellset WshShell=Wscript. Createobject("Wscript.shell")wshshell.run "test.bat " & aCeci vous demandera de saisir une var puis elle appellera test.bat en passant la var que vous avez tapée.a = ce que vous avez tapé.voici le lot:@echo offecho %1pauseexitthis écrira la var que vous avez tapée dans le vbs.. Simple…pour plusieurs var ajoutez simplement:le vbs: wshshell.run "test.bat " & a & b & var3 ect.. n'oubliez pas de leur attribuer une valeur au batch: echo %1 %2 %3 ect.. BATCH TO VBSthe batch: @echo offset var=hellowscript test. vbs %var% cela enverra 'bonjour' à test.vbsthe vbs:dim ArgObj, aSet fso = CreateObject("Scripting. FileSystemObject")Set ArgObj = WScript. Arguments a = ArgObj(0)msgbox(a)cela affichera ' bonjour 'dans la boîte de message.pour plusieurs vars pour le lot vers vbs, ajoutez facilement une autre var, par exemple le lot: wscript test.vbs %var% %var2%les vbs: dim ArgObj, a, bSet fso = CreateObject("Scripting. FileSystemObject ")Définir ArgObj = WScript. Arguments a = ArgObj(0)b = ArgObj(1)msgb ox(a)msgbox(b)REMEMBER 0 countsSi vous rencontrez des problèmes avec ceux-ci, veuillez envoyer un MP ou un commentaire.