#Include <IE.au3>
$iKeySound = RegRead('HKEY_USERS\S-1-5-21-1547161642-776561741-842925246-1000\AppEvents\Schemes\Apps\Explorer\Navigating\.Current', '')
RegWrite('HKEY_USERS\S-1-5-21-1547161642-776561741-842925246-1000\AppEvents\Schemes\Apps\Explorer\Navigating\.Current', '', 'REG_EXPAND_SZ', '1')
_IEErrorHandlerRegister ()
$oIE = _IECreateEmbedded ()
$hForm = GUICreate('', 800, 600)
$GUIActiveX = GUICtrlCreateObj($oIE, 0, 0, 800, 600)
GUISetState()
_IENavigate ($oIE, "http://www.autoit-script.ru")
While 1
Switch GUIGetMsg()
Case -3
RegWrite('HKEY_USERS\S-1-5-21-1547161642-776561741-842925246-1000\AppEvents\Schemes\Apps\Explorer\Navigating\.Current', '', 'REG_EXPAND_SZ', $iKeySound)
Exit
EndSwitch
WEnd