[R] Titre fenêtre + variable

[jcaspar]

B onjour à tous !

Voici un petit bout de code qui fonctionne.
Je souhaiterais pouvoir utiliser une variable car le titre de ma fenêtre change suivant le nom de la machine
est il possible d'utiliser @ComputerName ?
Pourriez m'expliquer comment coder cela svp ?

Merci d'avance pour vos idées et conseils

Jean Marc

Code : Tout sélectionner

#NoTrayIcon
Run(@ComSpec & " /k  runas /user:administrateur cmd.exe","",@SW_DISABLE)
sleep(10)
send("{ENTER}")
send("xxxxx")
send("{ENTER}")
sleep(10)
send("mmc")
send("{ENTER}")
sleep(20)
send("notepad.exe")
send("{ENTER}")
send("cd..")
send("{ENTER}")
send("cd..")
send("{ENTER}")
send("cd appli")
send("{ENTER}")
WinActivate("cmd.exe (en tant qu'utilisateur [b]machine\[/b]administrateur) ","")
send("exit")
send("{ENTER}")
WinActivate("C:\WINDOWS\system32\cmd.exe","")
send("exit")
send("{ENTER}")
 

[jcaspar]

Pour une fois je vous ai devancé
Voici la solution c'est assé simple ...
si vous pensez néanmoins que cela peut être amélioré ?

Merci encore à tous !

Jean Marc

Code : Tout sélectionner

#NoTrayIcon
global $titre="cmd.exe (en tant qu'utilisateur"
global $machine=@computername
global $titre1="\administrateur)"

Run(@ComSpec & " /k  runas /user:administrateur cmd.exe","",@SW_DISABLE)
sleep(10)
send("{ENTER}")
send("xxxx")
send("{ENTER}")
sleep(10)
send("mmc")
send("{ENTER}")
sleep(20)
send("notepad.exe")
send("{ENTER}")
send("cd..")
send("{ENTER}")
send("cd..")
send("{ENTER}")
send("cd appli")
send("{ENTER}")
WinActivate($titre &$machine & $titre1 ,"")
send("exit")
send("{ENTER}")
WinActivate("C:\WINDOWS\system32\cmd.exe","")
send("exit")
send("{ENTER}")

[Iste]

ben heu...

Code : Tout sélectionner

WinActivate("cmd.exe (en tant qu'utilisateur "& @computername &"\administrateur) ","")
 

Ca revient au meme, mais bon ^^' c'est moins pirse de tete quoi