begin process at 2012 02 14 20:50:42
  Trouver un code source :
 
dans
 
Accueil > Forum > 

Archive Visual Basic & VB.NET

 > 

Archives Visual Basic

 > 

Exécution

 > 

exécution tache différée


Derniers messages déposésPoser une question dans le forum ou lancer une discussion

exécution tache différée

mercredi 11 mai 2005 à 22:58:51 | exécution tache différée

cirilovb

Salut, je débute totale en autodidacte sous vb,

Je tatonne et j'essaie d'optimiser un peu des choses que je fais en entreprise pour bouger le moins possible de mon fauteuil lol.

Je souhaite exécuter un exe (winvnc.exe) sur un PC distant afin de prendre la main à distance sur un PC d'agence distante. Je souhaite au lieu de faire un net time sur le PC voulu et utiliser la commande AT pour planifier ma tache, qu'elle se lance automatiquement 10 sec après avoir entrer dans mon VBS ou BAT ou mix entre les deux le  numéro du PC.

Pas bien compliqué pour des connaisseurs je suppose ;-)

Voila cque j'ai commencé a faire mais rien de bien fameux.
Le pb de ce que j'ai commencé à faire est  que ce n'est pas l'heure sur le PC distant qui est prise en compte, a savoir que mon heure sur mon poste n'est pas la même à la seconde prêt de tous les autres postes distant..

Dim today
Dim answer
today =Now
answer = today.AddSeconds(10)
Dim reponse
reponse = InputBox("Entrez le numero de PC sur lequel vous voulez prendre la main")
SCHTASKS /CREATE /TN vnc /TR C:\vncviewer.exe /sc once /st today /s PC32


j'ai un message d'erreur a la dernière ligne, surement car je n'ai pas créé l'objet SCHTASKS.

Jvous remercie de m'éclairer sur ce point, et merci de votre patience.


mercredi 11 mai 2005 à 23:13:59 | Re : exécution tache différée

BaFM

Il te faut ces lignes pour pouvoir exécuter une commande :

Dim WshShell 'Variable recevant l'objet WScript.Shell
Set WshShell = CreateObject("WScript.Shell") 'Création de l'objet
WshShell.Exec("SCHTASKS /CREATE /TN vnc /TR C:\vncviewer.exe /sc once /st " & today & " /s PC32") 'Exécution de la commande.

Et voilà, ca exécute ta commande comme il faut :)

MyGoddess



mercredi 11 mai 2005 à 23:19:16 | Re : exécution tache différée

cirilovb

'Variable recevant l'objet WScript.Shell

cette variable c'est quoi ?? c'est le numéro de PC???

mercredi 11 mai 2005 à 23:21:36 | Re : exécution tache différée

cirilovb

a non C des explication en vert,

lol

je débute vraiment, jvais tenter de m'en sortir avec ça même si jcomprends pas encore tout ;-)

mercredi 11 mai 2005 à 23:22:50 | Re : exécution tache différée

BaFM

Non, c'est juste pour stocker l'objet système qui te permet d'exécuter des commandes.
Regarde la doc sur [ Lien ], cherche windows script host documentation v5.6
Ce sera en anglais mais c'est très complet ;)
mercredi 11 mai 2005 à 23:29:32 | Re : exécution tache différée

cirilovb

ok,

j'ai modif mon script; yavait une erreur je crois juste dans l'heure d'exec de la tache, c'était answer au lieu de today ;-)

voila mon VBS, mais j'ai une erreur

Dim today
Dim answer
today =Now
answer = today.AddSeconds(10)
Dim reponse
reponse = InputBox("Entrez le numero de PC sur lequel vous voulez prendre la main")
Dim WshShell
Set WshShell = CreateObject("WScript.Shell")
WshShell.Exec("SCHTASKS /CREATE /TN vnc /TR C:\vncviewer.exe /sc once /st " & answer & " /s PC32")

ou est elle??? on peut pas utiliser NOW si??? après maintenant il est déja trop tard non ??? lol


mercredi 11 mai 2005 à 23:41:17 | Re : exécution tache différée

BaFM

Dim answer
answer = DateAdd("s", 10, Now)

Voilà comment tu peut calculer le nouveau temps. Aide toi du fichier d'aide don je t'es donnée le chemin pour y aller :)

mercredi 11 mai 2005 à 23:51:56 | Re : exécution tache différée

cirilovb

eee, ba, regarde "mon" script

Dim reponse
reponse = InputBox("Entrez le numero de PC sur lequel vous voulez prendre la main")
Dim today
today = Now
Dim answer
answer = DateAdd("s", 10, Now)
Dim WshShell
Set WshShell = CreateObject("WScript.Shell")
WshShell.Exec("SCHTASKS /CREATE /TN vnc /TR C:\vncviewer.exe /sc once /st " & answer & " /s & reponse")

ça lance po vncviewer, essaie avec une exe chez toi pour voir, C un script générique, change juste l exe ;-) et fais moi signe si tu arrive a qqchose

Merci

jeudi 12 mai 2005 à 00:00:15 | Re : exécution tache différée

BaFM

J'ai fait ca :

Dim WshShell 'Variable recevant l'objet WScript.Shell
Set WshShell = CreateObject("WScript.Shell") 'Création de l'objet
WshShell.Exec("notepad prout.txt") 'Exécution de la commande

et ca fonctionne tout seul... Peut être qu'il ne trouve pas le fichier SCHTASKS...
vendredi 13 mai 2005 à 12:20:05 | Re : exécution tache différée

cirilovb

Bon, j'ai trouvé mais je fait tout autrement.

Pour ceux que ça intéresse, j'utilise la commande Psexec du kit Pstools.
Avec l'option -i ça exécute le fichier voulu sur le PC distant comme si on cliquait dessus, c'est vraiment terrible.

Dans  mon .bat, je voudrais lancer vncviewer sur mon poste puis lancer la commande Psexec pour lancer winvnc.exe sur le poste distant.

Mais le fait que vncviewer se lance sur mon poste bloque la commande Psexec qui suite dans mon batch. Je suis contraint de fermer la fenêtre de vncviewer pour que le batch execute la suite du bacth

Comment, passer (dans un batch)à la deuxième commande directement une fois que le première est lancer?

Merci.



Cette discussion est classée dans : exe, pc, tache, distant, today


Répondre à ce message

Sujets en rapport avec ce message

afficher l'heure systeme d'un PC distant sur réseau [ par nico601 ] est ce que tu connaiterais la procédure pour pouvoir lire la date et l'heuresysteme d'un pc distant sur réseauxen VB si possible Je sais comment résoudre le nom d'un pc DISTANT ! ! ! [ par CrowEye ® ] Etant donné le nombre de demande concernant la résolution de noms de pc's ...Je vous indique que la réponse se trouve sur le site:http://perso.club-in EXECUTER UN EXE SUR UN PC EN RESEAU LOCAL [ par bousama ] Je voudrais savoir comment faire en VB pour lancer un exe sur un pc en réseau local, ( ex: lancer c:\prog.exe sur l'autre Pc apratir de mon pc ) mer Distribution .exe sur plusieurs PC [ par Activb2 ] Salut,J'ai réalisé un projet en VB + Access qui fonctionne bien sur tous postes ou il y a VB d'installer et même sur certain postes ou il n'y a pas VB COMMENT ENVOYER UNE IMAGE AVEC WINSOCK ... [ par DeAtHCrAsH ] En fait j'ai une picturebox avec une image loader a l'interieur ... J'aimerais ensuite pouvoir envoyer cette image un a PC distant,et que le PC distan Lancer un exe sur ordi distant [ par Lapita ] BonjourQuelqu'un saurait-il comment faire pour lancer une appli sur une ordi distant en intranet ? (sous W2K)Merci d'avance probleme : shell + copy [ par Calimoino ] Lu tlm, bon voila je suis un débutantet je voudrait faire un programme ki copie un fichier de mon pc , vers un ordinateur distant.Pour cela j'utili Version OS PC Distant (PAS LOCAL) [ par dlaurent ] Bonjour,Je cherche à connaitre par un script VBS la version de l'OS d'une machine Distante. L'explorateur Windows est capable (Clic droit/propriétés) Liste des Dossier partager sur un PC Distant [ par DiJiTooL ] Voila je cherche a recuperer la liste des dossier partager sur un pc distant, par exemple: \\192.168.0.2merci d'avance@+


Nos sponsors


Sondage...

CalendriCode

Février 2012
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
272829    

Consulter la suite du CalendriCode

Photothèque

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 3,760 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales