Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
1298 connectés 

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  VBS ecire message dans une fenetre ...

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

VBS ecire message dans une fenetre ...

n°1910404
dc_volo
Posté le 30-07-2009 à 17:11:15  profilanswer
 

:D  j'ai un petit probleme ^^
 
alors voilà ( bonjour tous le monde X)  )
 
j'ai ovulu creer un programme batch qui lancer un autre batch qui lui meme lance un exe
 
pour plus de comprehension :
 
le " servertext.bat "  lance le " server.bat " qui lui lance un serveur dedié du jeu republic commando , une fenetre de console ...
le but du servertext.bat etait d'ecrire dans la fenetre "montextevoulu" mais sa ne faisait que lancer le serveur et point barre :/
 
code :  
 
:Lance
start server.bat
echo "say Salut à tous bienvenue sur le serveur "
:fin  
 
j'ai ensuite vue un lien parlant du vbs et que c'etait un peu plus complet j'ai donc scripter ceci :
 
Set WshShell = createobject("wscript.shell" )
Set oExec = WshShell.Exec("D:\Program Files\LucasArts\Star Wars Republic Commando\GameData\System\server.bat" )
.writeLine "say Bienvenue / Welcome"
.writeLine "say Sur le serveur / On the Server"
.writeLine "say Bon frag et no noob ! / Good frag and no noob !"
 
mais cette fois-ci j'ai eu une erreur que j'ai compris tout seul , le texte n'arrive pas à s'ecrire sur la fenetre ..
 
 
ce que je cherche en fait c'est , pouvoir créer un boucle géré par le temps qui ecris dans la fenetre ce que je souhaiterai ,  
 
un message repeté toute les 30 sec par exemple :/
 
 
j'ai chercher sur le net ouvrir un processus , et d'autre recherche mais rien ...
 
 
merci de bien vouloi m'aider ...
 
ou alors ce serrai comme afficher la fenetre que je souhaite et y ecrire mon texte repeter en boucle toute les 30 sec...

mood
Publicité
Posté le 30-07-2009 à 17:11:15  profilanswer
 

n°1910426
dc_volo
Posté le 30-07-2009 à 17:35:18  profilanswer
 

de plus je precise que je n'y connais rien , j'ai commencer y'a 2h à peine

 

j'ai trouvé çà

 

http://faqvbnet.developpez.com/?page=syst#syst_cmdline
http://faqvbnet.developpez.com/?page=syst#syst_iocons
http://faqvbnet.developpez.com/?pa [...] itebinfile

 

je rajoute le fait qu'il y a un temps de chargement pour que le serveur soit pres lancé ... de 1 à 10sec vraiment maxi plus souvent 2sec

 


Message édité par dc_volo le 30-07-2009 à 18:12:16
n°1910477
adri-du-91
tout probleme a sa solution
Posté le 30-07-2009 à 22:07:17  profilanswer
 

pour ton batch il me semble qu'il attend que ton serveur s'arrête pour afficher le message
si tu réessaye en quittant ton serveur une fois que tu l'a lancer avec ton batch tu verra ton message


Message édité par adri-du-91 le 30-07-2009 à 22:09:02

---------------
CrashDrives
n°1910497
dc_volo
Posté le 30-07-2009 à 23:57:38  profilanswer
 

c'est bien plus compliqué que çà ... et j'ai resolu une partie de mon probleme ... il me reste plus qu'a savoir comment faire une boucle  et ecrire dans un programme/processus PRECIS !

 

désolé pour ce court post j'edit en ce moment meme ... mon test etait concluant mais super chiant x)

 

donc en fait je precise ce qui se passe ...

 

je lance mon .vbs qui lance .bat qui lance par exemple une commande msdos ou alors un document de texte

 

je sais faire la boucle ( EDIT )

 

voici mon script :

  

Set WshShell = createobject("wscript.shell" )
WScript.Sleep(2000)
Set oExec = WshShell.Exec("L:\Star Wars Republic Commando\GameData\System\server.bat" )
WScript.Sleep(5000)

 

do while(1)
Set variable=CreateObject("WScript.Shell" )
variable.SendKeys ("say Bienvenue  / Welcome " )
variable.SendKeys ("{enter}" )
variable.SendKeys ("say Sur le serveur des Dark Clone / On the Dark Clone's Server" )
variable.SendKeys ("{enter}" )
variable.SendKeys ("say Bon frag et no noob ! / Good frag and no noob !" )
variable.SendKeys ("{enter}" )
variable.SendKeys ("say http://darkclone.servegame.org/" )
variable.SendKeys ("{enter}" )

 

WScript.Sleep(40000)  
loop

  


il ne me manque plus que comment ecrire sur un processus qui n'est pas une fenetre ouverte ou fenetre active ( pouvoir ecrire quand la fenetre est par exemple soustraite/reduite )


Message édité par dc_volo le 31-07-2009 à 01:00:27
n°1910599
dc_volo
Posté le 31-07-2009 à 11:42:07  profilanswer
 

up

n°1910625
adri-du-91
tout probleme a sa solution
Posté le 31-07-2009 à 14:14:07  profilanswer
 

dsl je ne peut pas plus t'aider je ne connais pas trop le vbs ( j'ai juste les petite base :D)


Message édité par adri-du-91 le 31-07-2009 à 14:14:39

---------------
CrashDrives
n°1910628
dc_volo
Posté le 31-07-2009 à 14:29:00  profilanswer
 

Lol ne t'en fait pas moi de meme , j'ai commencer hier en milieu d'aprem X)

n°1910659
dc_volo
Posté le 31-07-2009 à 14:48:16  profilanswer
 

j'ai une autre question comment faire un saut de ligne avec ce code ....
 
f.write("Suppress+=DevCompile" )
f.write("Suppress+=DevBind" )
f.write("Suppress+=DevBsp" )
f.write(" " )
f.write("[Engine.MaterialTypeInfo]" )
f.write("bSpawnHitDecals=true" )
 
parce que là j'ai mis un f.write qui n'ecrit que des espace à moins qu'une sendkey ? - non la sendkey pas possible


Message édité par dc_volo le 31-07-2009 à 15:00:37
n°1910759
dc_volo
Posté le 31-07-2009 à 17:09:45  profilanswer
 

up et re up , je pense pas que se soit bien compliqué pour vous ce dernier message ;)

n°1910991
dc_volo
Posté le 02-08-2009 à 16:06:51  profilanswer
 

j'ai trouver finallement il faut utiliser le code .WriteLine
 
merci de votre aide sa ma été d'un grand secours  ...... >.< -.-' *..* et j'en passe et des meilleurs


Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  VBS ecire message dans une fenetre ...

 

Sujets relatifs
[VBS] Extraire valeur champ fichier texte[VBS] Tableau dynamique croisé
Fenêtre de confirmation de formulaire à enlever[RESOLU] [VBS] copier uniquement les lignes filtrées sous Excel
Par défaut d'un format de message en pseudo BNF à une expression regu[PHP/XML] Problème pour trouver le code PHP à partir du code VBS
message d'erreur "can not access a member of class X"exec() et fenetre dos apparente
VBS Copier le nom d'un fichierVisual C++ fenetre de commande
Plus de sujets relatifs à : VBS ecire message dans une fenetre ...


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR