屏蔽网页导航声音

默认情况下，IE内核的网页浏览框(WebBrowser、CHtmlView、CHtmlDialog等控件)在跳转网页、点击按钮时会发出声音，用CoInternetSetFeatureEnabled这个API可以禁止掉。

VC/C++代码：

[cpp]  view plain  copy

1. #include <urlmon.h>  
2. #ifndef FEATURE_DISABLE_NAVIGATION_SOUNDS  
3. #define FEATURE_DISABLE_NAVIGATION_SOUNDS 21  
4. #endif  
5. #ifndef SET_FEATURE_ON_PROCESS  
6. #define SET_FEATURE_ON_PROCESS 0x00000002  
7. #endif  
8.   
9. void DisableClickSounds()    
10. {    
11.     CoInternetSetFeatureEnabled((INTERNETFEATURELIST)FEATURE_DISABLE_NAVIGATION_SOUNDS,SET_FEATURE_ON_PROCESS,true);    
12. }   

C#代码：

[csharp]  view plain  copy

1. const int FEATURE_DISABLE_NAVIGATION_SOUNDS = 21;  
2. const int SET_FEATURE_ON_PROCESS = 0x00000002;  
3.   
4. [DllImport("urlmon.dll")]  
5. [PreserveSig]  
6. [return: MarshalAs(UnmanagedType.Error)]  
7. static extern int CoInternetSetFeatureEnabled(  
8.     int FeatureEntry,  
9.     [MarshalAs(UnmanagedType.U4)] int dwFlags,  
10.     bool fEnable);  
11.   
12. static void DisableClickSounds()  
13. {  
14.     CoInternetSetFeatureEnabled(  
15.         FEATURE_DISABLE_NAVIGATION_SOUNDS,  
16.         SET_FEATURE_ON_PROCESS,  
17.         true);  
18. }  

易语言代码：

[plain]  view plain  copy

1. .版本 2  
2.   
3. .子程序 禁止网页跳转声音  
4.   
5. CoInternetSetFeatureEnabled (#FEATURE_DISABLE_NAVIGATION_SOUNDS, #SET_FEATURE_ON_PROCESS, 1)  
6.   
7. .DLL命令 CoInternetSetFeatureEnabled, 整数型, "urlmon", "CoInternetSetFeatureEnabled"  
8.     .参数 FeatureEntry, 整数型, , INTERNETFEATURELIST  
9.     .参数 dwFlags, 整数型, , DWORD  
10.     .参数 fEnable, 整数型, , BOOL  
11.   
12. .常量 FEATURE_DISABLE_NAVIGATION_SOUNDS, "21", , 禁止跳转声音  
13. .常量 SET_FEATURE_ON_PROCESS, "2", , 仅对当前进程有效