<SCRIPT language="VBscript">
resultat=0 'valeur par défaut
InputBox "Quel est votre résultat?", "resultat", resultat
document.write resultat
</SCRIPT>
dans la boite j'ai bien de dialogue j'ai bien 0, et document.write resultat
écris bien 0
mais si je met 50 dans la boite de dialogue , j'ai toujours 0 qui s'affiche
!
Dans son message 42767835$0$9939$ Teddy nous dit :
ok ça fonctionne sous CMD
mais j'arrive pas a declencher en VB, ou est ce que ça va pas?
Private Const SW_SHOWNORMAL = 1 Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long ------------------------------------------------------------------------------------ Private Sub Command1_Click()
ShellExecute Me.hwnd, "open", t$, vbNullString, "C:Windows", SW_SHOWNORMAL end sub
pas de message d'erreur, mais pas de tache créée
Bonsoir, Tu n'as pas choisi le plus simple. Essaie ceci 8<------------- set sh = CreateObject("WScript.Shell") sh.Run "tacommande" 8<-------------
Plus d'infos ici : http://minilien.fr/a0jzk6
Excuse-moi, tu es rendu où là ?? vbs, vba, vb ? Je t'ai répondu pour vbs comme tu le mentionnes au début, mais ils semble que tu sois rendu en VBA ou VB maintenant :-) Dans ce cas c'est encore plus simple : tu as une instruction Shell directement dans le langage VB/VBA
-- Fred
Dans son message %23CKPHK1TFHA.3952@TK2MSFTNGP15.phx.gbl
Fred nous dit :
Dans son message 42767835$0$9939$626a14ce@news.free.fr
Teddy nous dit :
ok ça fonctionne sous CMD
mais j'arrive pas a declencher en VB, ou est ce que ça va pas?
Private Const SW_SHOWNORMAL = 1
Private Declare Function ShellExecute Lib "shell32.dll" Alias
"ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String,
ByVal lpFile As String, ByVal lpParameters As String, ByVal
lpDirectory As String, ByVal nShowCmd As Long) As Long
------------------------------------------------------------------------------------
Private Sub Command1_Click()
ShellExecute Me.hwnd, "open", t$, vbNullString, "C:Windows",
SW_SHOWNORMAL
end sub
pas de message d'erreur, mais pas de tache créée
Bonsoir,
Tu n'as pas choisi le plus simple.
Essaie ceci
8<-------------
set sh = CreateObject("WScript.Shell")
sh.Run "tacommande"
8<-------------
Plus d'infos ici : http://minilien.fr/a0jzk6
Excuse-moi, tu es rendu où là ?? vbs, vba, vb ?
Je t'ai répondu pour vbs comme tu le mentionnes au début, mais ils semble
que tu sois rendu en VBA ou VB maintenant :-)
Dans ce cas c'est encore plus simple : tu as une instruction Shell
directement dans le langage VB/VBA
Dans son message 42767835$0$9939$ Teddy nous dit :
ok ça fonctionne sous CMD
mais j'arrive pas a declencher en VB, ou est ce que ça va pas?
Private Const SW_SHOWNORMAL = 1 Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long ------------------------------------------------------------------------------------ Private Sub Command1_Click()
ShellExecute Me.hwnd, "open", t$, vbNullString, "C:Windows", SW_SHOWNORMAL end sub
pas de message d'erreur, mais pas de tache créée
Bonsoir, Tu n'as pas choisi le plus simple. Essaie ceci 8<------------- set sh = CreateObject("WScript.Shell") sh.Run "tacommande" 8<-------------
Plus d'infos ici : http://minilien.fr/a0jzk6
Excuse-moi, tu es rendu où là ?? vbs, vba, vb ? Je t'ai répondu pour vbs comme tu le mentionnes au début, mais ils semble que tu sois rendu en VBA ou VB maintenant :-) Dans ce cas c'est encore plus simple : tu as une instruction Shell directement dans le langage VB/VBA
Bonjour, A mon avis, il manque des choses dans tes paramètres de commande AT. L'heure et /INTERACTIVE peut-être. Mais ce n'est pas la raison. Le mieux serait que tu mettes ta commande dans un batch, de façon à ce que la commande passée en paramètre à AT soit le plus simple possible. Tu ne peux pas imbriquer les guillemets. Ta commande AT fonctionne-t-elle si tu l'exécutes en ligne de commande ? Je viens de faire un essai avec winword.exe et un fichier doc en paramètre, cela ne fonctionne pas, même avec les noms de fichier court 8.3 Par contre, attention, le programme s'exécute avec l'identité system. Quand j'ai ainsi lancé Word (sans paramètre), il est parti dans sa procédure d'initialisation où il m'a demandé les initiales de l'utilisateur SYSTEM. Enfin, vérifie, mais il me semble qu'en VB6 tu as une fonction Shell qui t'évite le createObject.
-- Fred
Dans le message:427696a8$0$9831$626a14ce@news.free.fr,
avec
set sh = CreateObject("WScript.Shell")
sh.Run "tacommande"
Bonjour,
A mon avis, il manque des choses dans tes paramètres de commande AT.
L'heure et /INTERACTIVE peut-être.
Mais ce n'est pas la raison.
Le mieux serait que tu mettes ta commande dans un batch, de façon à ce que
la commande passée en paramètre à AT soit le plus simple possible. Tu ne
peux pas imbriquer les guillemets.
Ta commande AT fonctionne-t-elle si tu l'exécutes en ligne de commande ?
Je viens de faire un essai avec winword.exe et un fichier doc en paramètre,
cela ne fonctionne pas, même avec les noms de fichier court 8.3
Par contre, attention, le programme s'exécute avec l'identité system. Quand
j'ai ainsi lancé Word (sans paramètre), il est parti dans sa procédure
d'initialisation où il m'a demandé les initiales de l'utilisateur SYSTEM.
Enfin, vérifie, mais il me semble qu'en VB6 tu as une fonction Shell qui
t'évite le createObject.
Bonjour, A mon avis, il manque des choses dans tes paramètres de commande AT. L'heure et /INTERACTIVE peut-être. Mais ce n'est pas la raison. Le mieux serait que tu mettes ta commande dans un batch, de façon à ce que la commande passée en paramètre à AT soit le plus simple possible. Tu ne peux pas imbriquer les guillemets. Ta commande AT fonctionne-t-elle si tu l'exécutes en ligne de commande ? Je viens de faire un essai avec winword.exe et un fichier doc en paramètre, cela ne fonctionne pas, même avec les noms de fichier court 8.3 Par contre, attention, le programme s'exécute avec l'identité system. Quand j'ai ainsi lancé Word (sans paramètre), il est parti dans sa procédure d'initialisation où il m'a demandé les initiales de l'utilisateur SYSTEM. Enfin, vérifie, mais il me semble qu'en VB6 tu as une fonction Shell qui t'évite le createObject.
