Имя пользователя:
Пароль:
 

Показать сообщение отдельно

Новый участник


Сообщения: 1
Благодарности: 0

Профиль | Отправить PM | Цитировать


Я решил проблему так, может быть и глупо, но выход)) (Ось: Win7)
Код: Выделить весь код
; ----------Смена языка на Английский по-умолчанию----------
$win=WinExists ("Выполнить")
Send ("#к")
if $win=0 Then
	Send ("#r")
EndIf
	
WinWaitActive("Выполнить")
Sleep (100)
Send ("{BS}")
Send("{ASC 099}{ASC 111}{ASC 110}{ASC 116}{ASC 114}{ASC 111}{ASC 108}{ASC 032}{ASC 105}{ASC 110}{ASC 116}{ASC 108}{ASC 046}{ASC 099}{ASC 112}{ASC 108}{ASC 044}{ASC 044}{ASC 050}{Enter}")
WinWaitActive("Язык и региональные стандарты")
Send ("{ENTER}")
WinWaitActive("Языки и службы текстового ввода")
Send ("{UP}")
Sleep (200)
Send ("{ENTER}")
WinWaitActive("Язык и региональные стандарты")
Send ("{ESC}")
;-----------------------------------------------------------

Последний раз редактировалось Luck_DMST, 11-02-2011 в 14:44. Причина: добавил ОСь


Отправлено: 14:40, 11-02-2011 | #4