Batch Index du Forum
S’enregistrerRechercherFAQMembresGroupesConnexion
Répondre au sujet Page 1 sur 1
[EDIT] (Création de commande externe [R]) (Un bon tuto VBS?)
Auteur Message
Répondre en citant
Message [EDIT] (Création de commande externe [R]) (Un bon tuto VBS?) 
Bonjour,
Nouvelle question : je souhaiterais trouver un Bon tutoriel VBS car tout ceux sur Google sont incompréhensibles.
Créer une commande externe est assez simple mais je voudrais faire une en VBS.
Problème: Je n'ai pas trouvé de très bons tutoriels et il est impossible de savoir comment en créer une.
Ma question est plutôt simple:
Arrow dans un batch,on utilise la variable %1 ou %~1 mais je voudrais savoir comment cela va se passer en VBS.


Merci d'avances pour vos prochaines réponses!



Dernière édition par logan T le Lun 9 Mai 2016 - 16:16; édité 1 fois

______________________________________________________
LT-S Batch explorer :Un explorateur en Batch
ConsoleINI : utilisez des fichiers INI dans vos Batch
Epileptic : un mini jeu de rapidité
Faites parler votre téléphone avec mon app android
Mon site pour voir tout mes autres programmes
Visiter le site web du posteur Skype
Message Publicité 
PublicitéSupprimer les publicités ?


Répondre en citant
Message [EDIT] (Création de commande externe [R]) (Un bon tuto VBS?) 
Salut,
Voici un exemple qui utilise le batch , le vbscript et le powershell aussi Okay

Code:
@echo off
Title Loading into the Matrix by Hackoo 2016
Color 0A & Mode con cols=65 lines=3
Set URL=http://hackoo.alwaysdata.net/Matrix.mp3
Set DownloadFolder=%tmp%\file
Set PSFile=%DownloadFolder%\PSFile.ps1
Set VBSFile=%DownloadFolder%\FileVBS.vbs
set msg="   Please wait... Loading the Matrix file is in progress..."
echo(
Call :TypeWriter %msg%
Call :PS_Sub 'information' 10 '"Downloading the Matrix file is in progress ... "' "'Please wait... Downloading the Matrix file is in progress....'" 'info' 5
Mkdir %DownloadFolder% >nul 2> nul
Call :Download %URL% %DownloadFolder%\Matrix.mp3
If Exist %DownloadFolder%\Matrix.mp3
Start "" %DownloadFolder%\Matrix.mp3
exit /b
::*********************************************************************
Rem Fonction en Powershell pour télécharger un fichier
:Download <url> <file>
(
   echo $down = New-Object System.Net.WebClient;
   echo $url  = '%1';
   echo $file = '%2';
   echo $down.DownloadFile($url,$file^);
   echo $exec = New-Object -com shell.application;
   echo $exec.shellexecute($file^);
)>%PSFile%
Powershell.exe -ExecutionPolicy bypass -file %PSFile%
Del %PSFile%
exit /b
::*********************************************************************
Rem Fonction en Powershell pour afficher un infobulle dans la barre des tâches
:PS_Sub $notifyicon $time $title $text $icon $Timeout
PowerShell  ^
  [reflection.assembly]::loadwithpartialname('System.Windows.Forms') ^| Out-Null; ^
  [reflection.assembly]::loadwithpartialname('System.Drawing') ^| Out-Null; ^
  $notify = new-object system.windows.forms.notifyicon; ^
  $notify.icon = [System.Drawing.SystemIcons]::%1; ^
  $notify.visible = $true; ^
  $notify.showballoontip(%2,%3,%4,%5); ^
  Start-Sleep -s %6; ^
  $notify.Dispose()
%End PowerShell%
exit /B
::*********************************************************************
Rem Fonction en Vbscript pour faire parler un message
:SpeakVoice
(
   echo Call SpeakVoice("%~1"^)
   echo Function SpeakVoice(msg^)
   echo Dim voice
   echo Set Voice=CreateObject("SAPI.SpVoice"^)
   echo voice.speak msg
   echo end Function
)>%VBSFile%
Cscript /nologo %VBSFile%
Del %VBSFile%
exit /b
::*********************************************************************
Rem Fonction en vbscript pour écrire comme une machine (Dactylo)
:TypeWriter
(
   echo strText=wscript.arguments(0^)
   echo intTextLen = Len(strText^)
   echo intPause = 100
   echo For x = 1 to intTextLen
   echo    strTempText = Mid(strText,x,1^)
   echo    WScript.StdOut.Write strTempText
   echo    WScript.Sleep intPause
   echo Next
   echo Set Voice=CreateObject("SAPI.SpVoice"^)
   echo voice.speak strText
)>%tmp%\%~n0.vbs
@cScript.EXE /noLogo "%tmp%\%~n0.vbs" "%~1"
exit /b
::*********************************************************************





______________________________________________________
Mes Contributions en Téléchargement
Répondre en citant
Message OK 
Oui,ce que tu dis est bon mais ce n'est qu'une commande externe temporaire et le batch doit le créer puis le supprimer.
Ce que je cherches, c'est un script VBS ou on pourra faire
Code:
Call commande.vbs param1 param2 ....

au lieu de
Code:
call:comande param1 param2 ....
...
:commande
echo (
.... %~1
.... %~2
...) >>commande.vbs
start commande.vbs





______________________________________________________
LT-S Batch explorer :Un explorateur en Batch
ConsoleINI : utilisez des fichiers INI dans vos Batch
Epileptic : un mini jeu de rapidité
Faites parler votre téléphone avec mon app android
Mon site pour voir tout mes autres programmes
Visiter le site web du posteur Skype
Répondre en citant
Message Re: OK 
logan T a écrit:
un script VBS ou on pourra faire
Code:
Call commande.vbs param1 param2 ....

Cela s'appelle "un VBS qui supporte les arguments", et c'est très facile à faire! ('fin je sais que c'est facile en AutoIt, je sais aussi que j'avais fait ça en VBS y'a pas mal de temps et apparemment je n'en garde pas un mauvais souvenir...) http://ss64.com/vb/syntax-args.html




______________________________________________________
Cordialement,
Hugo, qui adore programmer, jouer à Minecraft, ZT2 et FSX.
Boutons-liens :
Visiter le site web du posteur Skype
Répondre en citant
Message Re: OK 
Hugo7 a écrit:
logan T a écrit:
un script VBS ou on pourra faire
Code:
Call commande.vbs param1 param2 ....

Cela s'appelle "un VBS qui supporte les arguments", et c'est très facile à faire! ('fin je sais que c'est facile en AutoIt, je sais aussi que j'avais fait ça en VBS y'a pas mal de temps et apparemment je n'en garde pas un mauvais souvenir...) http://ss64.com/vb/syntax-args.html

Merci ! Sujet résolu mais édité : Je cherches maintenant un bon tutoriel pour apprendre le VBS




______________________________________________________
LT-S Batch explorer :Un explorateur en Batch
ConsoleINI : utilisez des fichiers INI dans vos Batch
Epileptic : un mini jeu de rapidité
Faites parler votre téléphone avec mon app android
Mon site pour voir tout mes autres programmes
Visiter le site web du posteur Skype
Message [EDIT] (Création de commande externe [R]) (Un bon tuto VBS?) 


Montrer les messages depuis:
Répondre au sujet Page 1 sur 1
  



Index | créer un forum | Forum gratuit d’entraide | Annuaire des forums gratuits | Signaler une violation | Conditions générales d'utilisation
Copyright 2008 - 2016 // Batch