Что нового

Отключение звука в IE

Trans

Знающий
Сообщения
257
Репутация
6
Ребят может кто знает как отключить звук в IE которое воткнуто в GUI c помощью функции
Код:
ObjCreate("Shell.Explorer.2")
, надоедают эти щелчки при кликах
 

madmasles

Модератор
Глобальный модератор
Сообщения
7,790
Репутация
2,322
Trans,
Попробуйте так, у меня работает с 'InternetExplorer.Application'.
Код:
Global $sSoundClickFile

ConsoleWrite(_NoSoundClick($sSoundClickFile) & @LF)
MsgBox(64, 'Info', $sSoundClickFile)
;Ваш код
ConsoleWrite(_ReturnSoundClick($sSoundClickFile) & @LF)


Func _NoSoundClick(ByRef $s_SoundClickFile)
	Local $s_RegPath = 'HKEY_CURRENT_USER\AppEvents\Schemes\Apps\Explorer\Navigating\.Current'

	$s_SoundClickFile = RegRead($s_RegPath, '')
	If @error Then Return False
	Return (RegWrite($s_RegPath, '', 'REG_SZ', '') = 1)
EndFunc   ;==>_NoSoundClick

Func _ReturnSoundClick($s_SoundClickFile)
	Local $s_RegPath = 'HKEY_CURRENT_USER\AppEvents\Schemes\Apps\Explorer\Navigating\.Current'

	If Not $s_SoundClickFile Then Return False
	Return (RegWrite($s_RegPath, '', 'REG_SZ', $s_SoundClickFile) = 1)
EndFunc   ;==>_ReturnSoundClick
 

Ganibal95

GreenBytes
Сообщения
877
Репутация
240
Код:
Func _GAPI_IESoundOff()
	Return DllCall("urlmon.dll", "long", "CoInternetSetFeatureEnabled", "int", 21, "int", 2, "bool", True)
EndFunc
 
Автор
T

Trans

Знающий
Сообщения
257
Репутация
6
Ganibal95Спасибо! Тема Решена :smile:
 

CreatoR

Must AutoIt!
Команда форума
Администратор
Сообщения
8,671
Репутация
2,481
Ganibal95
Ganibal95 сказал(а):
У меня этот вариант не работает (Win 7, IE 8).
А вот вариант от madmasles работает без проблем.
 

fanlik

Новичок
Сообщения
7
Репутация
0
Блин.
А как, выключить звук в окне ie?
Тоже видео и реклама...
Бошка уже раскалывается, ни как не могу отследить ни в реестре, ни в инете.
 
Верх