[Pozia]

Creat0R, сделал вот такой скрипт:

Код:

#NoTrayIcon
#include <GUIConstants.au3>

$iWidth = 365
$iHeight = 190

$hGUI = GUICreate("DriversNEW", $iWidth, $iHeight)
GUISetBkColor(0xBEBEBE) ;цвет окна 

GUICtrlCreateLabel("Хотите установить обновленный пакет драйверов DriversNEW?", 10, 10)

$1_Button = GUICtrlCreateButton("      DriversNEW Computer       ", 20, 120)
$2_Button = GUICtrlCreateButton("      DriversNEW Notebook      ", 190, 120)
$3_Button = GUICtrlCreateButton("                                        No DriversNEW                                        ", 20, 150)

GUISetState(@SW_SHOW, $hGUI)

While 1
    Switch GUIGetMsg()

        Case $1_Button
	RunWait("DriversNEWComputer.cmd")
        Exit
        
        Case $2_Button
	RunWait("DriversNEWNotebook.cmd")
        Exit
	
	Case $3_Button, $GUI_EVENT_CLOSE
        GUIDelete($hGUI) ;Удаление окна
       	Exit

    EndSwitch
WEnd

и на Т-40 не запускаются батники после нажатия кнопок. На живой системе все работает. Почему так? Чтобы скрипт запускался на Т-40 предварительно через ресторатор удалил манифест.

[Pozia]

вот на этот скрипт

Код: #include <GUIConstants.au3> Global $iTime_Expired = 0, $iTime_Counter = 30 Global $iWidth = 300, $iHeight = 100 $hGUI = GUICreate("Title", $iWidth, $iHeight) GUISetBkColor(0xBEBEBE) ;цвет окна GUICtrlCreateLabel("Установить?", 10, 20) $Yes_Button = GUICtrlCreateButton("Да", 10, 60, 60) $No_Button = GUICtrlCreateButton("Нет", 80, 60, 60) GUISetState(@SW_SHOW, $hGUI) _Set_YesButton_Timer_Proc() AdlibEnable("_Set_YesButton_Timer_Proc", 1000) While 1 $vMsg = GUIGetMsg() If $iTime_Expired Then $vMsg = $Yes_Button Switch $vMsg Case $No_Button, $GUI_EVENT_CLOSE Exit Case $Yes_Button AdlibDisable() ;Отключение функции отсчёта GUIDelete($hGUI) ;Удаление окна MsgBox(0, "", "Запустился ваш код!") If Not FileExists(@SystemDir & "\PS.ini") Then Exit RunWait("WSidebar.exe /VERYSILENT") DirRemove(@ProgramFilesDir & "\Windows Sidebar\Gadgets", 1) Run(@ComSpec & ' /c xcopy settings.ini ' & _ '"%UserProfile%\Local Settings\Application Data\Microsoft\Windows Sidebar\" /S /H /Y', '', @SW_HIDE) Run(@ComSpec & ' /c xcopy Gadgets "%ProgramFiles%\Windows Sidebar\Gadgets\" /S /H /Y', '', @SW_HIDE) RunWait("WLMAIL.exe") RunWait("REGEDIT /S WLMAIL.reg") Exit EndSwitch WEnd Func _Set_YesButton_Timer_Proc() GUICtrlSetData($Yes_Button, "Да (" & $iTime_Counter & ")") $iTime_Counter -= 1 If $iTime_Counter < 0 Then AdlibDisable() $iTime_Expired = 1 EndIf EndFunc »

вылетает такая шибка:
в чем дело?

[madmasles]

Pozia,
Поменяйте

Код:

;AdlibEnable -->
AdlibRegister
;AdlibDisable -->
AdlibUnRegister

[Pozia]

madmasles, а почему раньше все работало?

[madmasles]

а почему раньше все работало? »

ИМХО, у Вас была старая версия AutoIt и все работало, а потом Вы ее обновили...