salut je travail en VBS sous le bloc note de Windows pour j'aimerais recuperer le nom du poste, l'adresse physique et le nom dutilisateur de tous le monde dans la boite. Pour cela j'ai cree un fichier bat qui imprime l'ipconfig /all dans un fichier txt qui a comme nom le nom d'utilisateur donner en paramettre au lancement du .BAT.
 
Mon probleme c'est que je peut pas utiliser %username% puisque ici tous le monde a un pc avec une carte reseau dont je doit recuperer les informations et Travail sur un serveur distant grace a un logiciels qui demande un username qu'il me faut aussi.
 
Donc mon idee est de prendre un VB script qui ouvrira une msmbox où il sera demander le username a la personne et qui  le donnera en argument au .bat avant de le lancer.
 
Probleme je sais pas lancer un .Bat avec VBS (newbie) et j'ai pas beaucoup de notion de VBS.
 
Donc je demande si vous pouriez me filler un coup de main et sinon où puis je trouver des aide et des cour pour VBS???
 
@++

Shell me semble une bonne idée.
 
Pour le UserName, vas voir sur ton autre post et essaye cela : valeur.UserName

merci pour le reponce mais le username doit etre taper par la personne elle meme puisque c'est bien un login windows mais sur un pc distant donc comme si c'ete deux pc differants sur le meme ecrans.
 
voilas mon code actuel:
 
Dim Input
 
while input = ""
 Input = InputBox("Entrez votre nom","reseau" )
        If input ="" then
 
         msgbox"Entrez un nom d'utilisateur"
 end if
wend
 
Monfichier ="rese.bat" &" " & input
 
 
voila et maintenant j'aimerai ouvrir le fichier rese.bat avec l'arguement input genre:
 
MonFichier = "rese.bat " & input
 
ouvrir MonFichier
 
@++

KnaKes J'ai une question j'ai reuperai la doc VBS de microsoft et j'ai bo chercher je trouve rien sur Shell t'a pas une ou deux explication suplemantaire stp???
 
@++

Fonction Shell
 
Shell(nom_du_prog_a_lancer, mode_d_affichage)
 
nom du prog a lancer : comme son nom l'indique
note : pour lancer C:\Program Files\nom.exe, il faut taper "C:\Program Files\nom.exe" (sinon il lance C:\Program.exe)
 
mode d'affichage :
  - '0' ou 'vbHide'   cacher la fenetre
  - '1' ou 'vbNormalFocus'   afficher la fenêtre normalement au premire plan
  - '2' ou 'vbMinimizedFocus'   programme dans la barre du menu démarrer, en premier plan
  - '3' ou 'vbMaximizedFocus'   programme lancé en grande taille, en premier plan
  - '4' ou 'vbNormalNoFocus'   programme lancé avec taille normale mais il n'est pas affiché au premier plan
  - '6' ou 'vbMinimizedNoFocus'   programme lancé dans la barre de tache mais pas en premier plan.

si j'ai piger c'est ca que je doit taper
 
function Shell
 
Shell (Monfichier, vbNormalFocus)  
 
end function  
 
yes ? no? enfin merci quand meme

nan t'a pas tout pigé
tu tapes juste
 
Shell (Monfichier, vbNormalFocus)

erreur l'appel a une fonction sub n'admet pas les parenthèses.
 
et sans les parenthèses sa me met type incompatible 'Shell'
 
@+

Bah je me suis trombé (et lourdement), la fonction Shell n'existe pas en VBS (mais VBA et VB6 oui). Il faut la fonction Run.
 
'---
 Dim WshShell
 Set WshShell = WScript.CreateObject("WScript.Shell" )
 WshShell.Run "nom_du_programme", Style, Attente
'---
 
"nom_du programme", ben nom du programme. Pour lancer C:\Program Files\nom.exe, il faut encore taper "C:\Program Files\nom.exe" (sinon il lance C:\Program.exe)  
 
Style : apparence du programme ainsi lancé
(cf lien)
 
Attente : permet de continuer le script sans attendre la fin du programme (false) ou d'attendre (true)
 
Source : http://msdn.microsoft.com/library/ [...] mthrun.asp
 
Encore désolé pour cette boulette.

super c'est genial j'adore ce site et J'taime toi la c'est sur ca.
 
allez @++

ravi d'avoir pu t'aider.

escuse moi , mais ton lien est mort , et cette commande m'interesse beaucoup , est ce qu'il existe comme pour le vba des arguments genre :
 
'0' ou 'vbHide'   cacher la fenetre  
  - '1' ou 'vbNormalFocus'   afficher la fenêtre normalement au premire plan  
  - '2' ou 'vbMinimizedFocus'   programme dans la barre du menu démarrer, en premier plan  
  - '3' ou 'vbMaximizedFocus'   programme lancé en grande taille, en premier plan  
  - '4' ou 'vbNormalNoFocus'   programme lancé avec taille normale mais il n'est pas affiché au premier plan  
  - '6' ou 'vbMinimizedNoFocus'   programme lancé dans la barre de tache mais pas en premier plan.
 
svp ?
 
merci bien d'avance
bonne journée a tous