Π§ΡΠΎΠ±Ρ Π²ΠΊΠ»ΡΡΠΈΡΡ ΡΠΊΡΠΈΠΏΡ Π½Π΅ΠΎΠ±Ρ ΠΎΠ΄ΠΈΠΌΠΎ ΠΎΡΠΊΡΡΡΡ Π±Π»ΠΎΠΊΠ½ΠΎΡ, Π²ΡΡΠ°Π²ΠΈΡΡ ΡΡΠ΄Π° ΡΠΊΡΠΈΠΏΡ ΠΈ ΡΠΎΡ ΡΠ°Π½ΠΈΡΡ Ρ ΡΠ°ΡΡΠΈΡΠ΅Π½ΠΈΠ΅ΠΌ *.vbs, Π° Π·Π°ΡΠ΅ΠΌ ΠΏΡΠΎΡΡΠΎ Π·Π°ΠΏΡΡΡΠΈΡΡ.ΠΠΎΠΆΠ΅ΡΠ΅ ΡΠΊΠΈΠ½ΡΡΡ ΡΠ°ΠΉΠ» Π΄ΡΡΠ³Ρ=)Π‘ΠΊΡΠΈΠΏΡ:Set S = CreateObject("Wscript.Shell")doexecute" S.Run ""%comspec% /c "" & Chr(7), 0,True"loopΠΠΠΠΠΠΠΠ. Π§ΡΠΎΠ±Ρ ΠΎΡΠΊΠ»ΡΡΠΈΡΡ ΡΠΊΡΠΈΠΏΡ Π½Π΅ΠΎΠ±Ρ ΠΎΠ΄ΠΈΠΌΠΎ Π² ΠΏΡΠΎΡΠ΅ΡΡΠ°Ρ (Π²ΠΊΠ»Π°Π΄ΠΊΠ° Π² Π΄ΠΈΡΠΏΠ΅ΡΡΠ΅ΡΠ΅ Π·Π°Π΄Π°Ρ) Π·Π°Π²Π΅ΡΡΠΈΡΡ wscript.exe loop
Moiprogrammy.net - CΠΊΠ°ΡΠ°ΡΡ ΠΏΡΠΎΠ³ΡΠ°ΠΌΠΌΡ Π΄Π»Ρ Windows
πΠ‘ΠΊΡΠΈΠΏΡ ΠΏΡΠΈΠΊΠΎΠ» ΠΠ΅ΡΠΊΠΎΠ½Π΅ΡΠ½ΠΎ ΠΏΠΈΡΠ°ΡΠΈΠΉ ΡΠΈΡΡΠ΅ΠΌΠ½ΡΠΉ Π΄ΠΈΠ½Π°ΠΌΠΈΠΊ
Π§ΡΠΎΠ±Ρ Π²ΠΊΠ»ΡΡΠΈΡΡ ΡΠΊΡΠΈΠΏΡ Π½Π΅ΠΎΠ±Ρ ΠΎΠ΄ΠΈΠΌΠΎ ΠΎΡΠΊΡΡΡΡ Π±Π»ΠΎΠΊΠ½ΠΎΡ, Π²ΡΡΠ°Π²ΠΈΡΡ ΡΡΠ΄Π° ΡΠΊΡΠΈΠΏΡ ΠΈ ΡΠΎΡ ΡΠ°Π½ΠΈΡΡ Ρ ΡΠ°ΡΡΠΈΡΠ΅Π½ΠΈΠ΅ΠΌ *.vbs, Π° Π·Π°ΡΠ΅ΠΌ ΠΏΡΠΎΡΡΠΎ Π·Π°ΠΏΡΡΡΠΈΡΡ.ΠΠΎΠΆΠ΅ΡΠ΅ ΡΠΊΠΈΠ½ΡΡΡ ΡΠ°ΠΉΠ» Π΄ΡΡΠ³Ρ=)
Π‘ΠΊΡΠΈΠΏΡ:
Set S = CreateObject("Wscript.Shell")
do
execute" S.Run ""%comspec% /c "" & Chr(7), 0,True"
loop
ΠΠΠΠΠΠΠΠ. Π§ΡΠΎΠ±Ρ ΠΎΡΠΊΠ»ΡΡΠΈΡΡ ΡΠΊΡΠΈΠΏΡ Π½Π΅ΠΎΠ±Ρ ΠΎΠ΄ΠΈΠΌΠΎ Π² ΠΏΡΠΎΡΠ΅ΡΡΠ°Ρ (Π²ΠΊΠ»Π°Π΄ΠΊΠ° Π² Π΄ΠΈΡΠΏΠ΅ΡΡΠ΅ΡΠ΅ Π·Π°Π΄Π°Ρ) Π·Π°Π²Π΅ΡΡΠΈΡΡ wscript.exe loop