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

  FORUM HardWare.fr
  Programmation

  [VBS] Demander une valeur à l'utilisateur

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

[VBS] Demander une valeur à l'utilisateur

n°9525
Titoine42
Posté le 14-01-2001 à 01:27:17  profilanswer
 

J'ai un script existant qui ressemble à ça :
 
Set W = CreateObject("wscript.shell" )
hl = W.regread("HKEY_LOCAL_MACHINESoftwareValveHalf-LifeInstallPath" )
w.run hl & "hl.exe -console -game cstrike +connect IP_DU_SERVEUR:SON_PORT"
 
Est-il possible de lancer une boite de dialogue en demandant une valeur pour le serveur à l'utilisateur ?

 

mood
Publicité
Posté le 14-01-2001 à 01:27:17  profilanswer
 

n°9625
Titoine42
Posté le 15-01-2001 à 08:37:31  profilanswer
 

personne?

 

n°9742
Titoine42
Posté le 16-01-2001 à 10:44:56  profilanswer
 

:cry:

 

n°9751
Fred999
Rabat-joie
Posté le 16-01-2001 à 12:16:42  profilanswer
 

Euh oui il y a une fonction native pour ça, un dérivé de Msgbox (désolé, j'ai pas l'aide d'installée et pas le truc en tête).
 
Au pire, tu fais une fenêtre toi-même, ça ne doit pas prendre bien longtemps. Mais ce serait dommage de réinventer l'eau chaude.

n°9757
yop
Posté le 16-01-2001 à 13:36:02  profilanswer
 

la fonction native est inputbox
Cela ressemble a un truc comme ca ..
port = inputbox("Entez votre numero de port" )

n°9898
Titoine42
Posté le 17-01-2001 à 10:30:59  profilanswer
 

super ça marche !
le problème, c'est que si je fais annuler, il me lance qd même counter strike
voila le nouveau code :
 
Set W = CreateObject("wscript.shell" )ss
hl = W.regread("HKEY_LOCAL_MACHINESoftwareValveHalf-LifeInstallPath" )ss
server = inputbox("Entez l'ip du serveur et son port (séparés par :)" )
w.run hl & "hl.exe -console -game cstrike +connect" & server
 
je fais comment pour tester le bouton cliqué dans le inputbox ?

 

n°9926
Fred999
Rabat-joie
Posté le 17-01-2001 à 12:02:41  profilanswer
 

Ce qui me semble bizarre dans ton code, c'est que tu ne précises pas quels boutons tu fais apparaître dans l'Inputbox (Yes/No dans ton cas), et que tu ne testes justement pas cette valeur. (ou alors, c'est pas assez clair pour moi) ;)
 
VB te retourne une valeur, qui correspond au bouton cliqué : fais un IF sur la valeur retournée par Inputbox et là ça ira tout de suite mieux.

n°10015
Titoine42
Posté le 17-01-2001 à 16:23:26  profilanswer
 

les boutons ok et annuler sont les boutons par défaut
 
je ne connais rien à la syntaxe du vbscript, j'ai tenté un test genre :
if (server = input(blablabla)) then
ma commande
endif
mais il me chie une erreur d'interpretation

 

n°10079
Titoine42
Posté le 17-01-2001 à 22:37:40  profilanswer
 

re:cry:

 

n°10091
yop
Posté le 18-01-2001 à 08:19:35  profilanswer
 

Pleure pas comme ca.
Si tu clique sur annuler il met nothing dans ta variable.
Tu test un truc du genre
serveur = inputbox ("....." )
if serveur = "" then
ssss-> Ce que tu veux faire,
else
ssss-> Ce que tu ne veux pas faire
end if
he voila le tour est joué.

mood
Publicité
Posté le 18-01-2001 à 08:19:35  profilanswer
 

n°10323
Titoine42
Posté le 19-01-2001 à 12:09:57  profilanswer
 

Merci beaucoup :jap:
 
Ca marchait po car je mettais "endif" et non "end if" :gun:
 
 
:bounce:


Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation

  [VBS] Demander une valeur à l'utilisateur

 

Sujets relatifs
Plus de sujets relatifs à : [VBS] Demander une valeur à l'utilisateur


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