установить WshShell = WScript.CreateObject(WScript.Shell)
WScript.Сон 1000
Выполнить x=x+1 Выполнить y=y+1 WshShell.SendKeys test{ENTER} WScript.Sleep 500 Цикл до y=7
WScript.Сон 3000
Цикл до x = 3
помогите пожалуйста
установить WshShell = WScript.CreateObject(WScript.Shell)
WScript.Сон 1000
Выполнить x=x+1 Выполнить y=y+1 WshShell.SendKeys test{ENTER} WScript.Sleep 500 Цикл до y=7
WScript.Сон 3000
Цикл до x = 3
помогите пожалуйста