До открытия ".vbs" я уже знал основы паскаля и решил написать одну небольшую программку и вот, в результате, что у меня получилось...
>dim count
set object = wscript.CreateObject("wscript.shell")
do
object.run "Yes.vbs"
count = count + 1
loop until count =20
Что с этим делать вы знаете, а теперь в бой ломать свои компьютеры ! (Или не свои )