VC编程改造IE浏览

自从微软捆绑了IE以后，网虫们便注定了要永远地面对那一成不变的微软模式：窗口、按钮和www.microsoft.com网站，从用户的角度，我们希望能够拥有自己特色的IE；从商业运作角度，商人希望无处不有他们公司的宣传信息，希望IE一经运行便可自动进入他们的网站。下面笔者介绍一种用VC6编程，通过修改注册表来改变IE面貌的方法。 sUc[!S:/  
<+q`Dk  
VC修改注册表的方法与函数 . 70=xH  
注册表是由树干和键组成的，对注册表的修改便是对键的修改。 |XG&[TI- "  
首先，要对键修改需先得到要修改键的句柄，VC中为键打开一个句柄，可采用的函数为LONG RegOpenKey命令；然后才能对键进行修改，用SetRegValue命令；最后需要释放得到的键句柄，用RegCloseKey(hResult)命令。 Ut'T!RD  
:/5GHfyj  
通过修改注册表实现IE换貌 3V^5 4_  
我们都知道，在注册表中，IE的主要设置内容在键HKEY_CURRENT_USER 下面的Software\\Microsoft\\Internet Explorer中，例如，我们想对IE的启动初始访问页进行定义修改，便可以把Software\\Microsoft \\Internet Explorer\\Main下的“Start Page”设置为需要的网址，如“www.ccidnet.com”。另外通过修改键HKEY_CURRENT_USER和键HKEY_LOCAL_MACHINE 下面的Software \\Microsoft\\Internet Explorer\\Toolbar里“BackBitmap”和“BackBitmapIE5”的值，即可加入用户特定的背景图案。我们通过以下代码可实现对IE的改造： void CJhfDlg::OnAddAddress() /({oN1X>i  
@XtrC|dkkE  
　　{ DBaZcO(U  
y>E:]#F  
　　 if(AddressNum==0){ )7+z/y+[n  
hO3 q|SL  
　　AfxMessageBox("没有可应用的选项!"); `p* 43nV  
aN*{nW  
　　 return; PknKzrEG:>  
0L3
2sFy  
　　 } Uvc$&j^k  
t}Td$K7  
　　 CString address; yevJA?C4 v  
iJoY
xx  
　　 int sel=m_address1.GetCurSel(); `<v$+mG  
hG#
2}K_  
　　 if(LB_ERR ==sel){ &{<h
Y|%  
W*_c
*  
　　AfxMessageBox("请先选中要应用的选项!"); rA?<\*  
]v>[r?X#V  
　　 return; +UX~
't_'v  
<+ [N*  
　　 } =$y J66e  
d6[' [
dG  
　　 m_address1.GetText(sel,address); zvq}7,  
d*6/1vyjT  
　　//取得所需加入的网址字符串 uZ3do|um  
z3L=K9)  
　　 CString strKey="Software\\Microsoft\\Internet Explorer\\Main"; =ca[*0^Z7  
yO@1#  
　　 HKEY hResult; ??.aLeF&  
8`)* ?Q9~  
　　RegOpenKey(HKEY_CURRENT_USER,(LPCTSTR)strKey,&&hResult); 0n
2H7}Uq  
Gukvd6-g9b  
　　//得到欲修改键的句柄 hPz=Ec<zW  
xgkCN$zQ`  
　　 SetRegValue(HKEY_CURRENT_USER,strKey,"Start Page",address); V{q*hQd_3  
pnp8`\cIH  
　　 RegCloseKey(hResult); p&<n_b  
Pke8RLg2A  
　　//修改注册表相应的值并释放键句柄 Y-1K'VhT  
FMF mn|  
　　} V*2*5hx  
{4/*2IRN9h  
　　2.给工具条指定用户特定的背景图案 CFW Hih  
W"
vkmk  
　　void CJhfDlg::OnAddBackGround() owA8hGF  
IOC$jab@  
　　{ `5Z'8^  
V?.=_T<  
　　 if(PictureNum==0){ 3!sZA?q  
$iy!:Did  
　　AfxMessageBox("没有可应用的选项!"); y1}2h
T0,  
+I
bV  
　　 return; c C) <Y#1  
h/:LC 7  
　　 } ?F$#t6Q  
G;wh).jG5  
　　 CString picture; wX6-WQR  
ju;OQC~[L]  
　　 int sel=m_PicList.GetCurSel(); iumwhb  
XA>uCJf  
　　 if(LB_ERR ==sel){ rB]2qk`/'  
~rjK*_3/  
　　 AfxMessageBox("请先选中要应用的选项!"); Yuf+d-%  
E'mT%@MOM  
　　 return; wxJ"{(;  
[hH>BEtm  
　　 } $gYGnh_,Q  
kxyOe[7 S  
　　 m_PicList.GetText(sel,picture); 8q6Le{G  
$\]Mvd  
　　//取得所需加入背景图案文件路径 $39TP@?:Z)  
m;xa}b{(i  
　　 CString strKey="Software\\Microsoft\\Internet Explorer\\Toolbar"; v)|a}5={  
h\Y~sm?
!`  
　　 HKEY hResult;
]lyQ*
gM  
) d'H&c3  
　　 RegOpenKey(HKEY_CURRENT_USER,(LPCTSTR)strKey,&&hResult); d^tY?*n  
' i5}`\  
　　 //得到欲修改键的句柄 N:pP@o  
(Lh!7g/0N  
　　 SetRegValue(HKEY_CURRENT_USER,strKey,"BackBitmapIE5",picture); eS4t0`kP  
VE/m|3%t  
　　 SetRegValue(HKEY_CURRENT_USER,strKey,"BackBitmap",picture); izl-GitP  
@J6r;4|&  
　　 RegCloseKey(hResult); z.)*/HGJm  
@QnKaZ8jW  
　　//修改注册表相应的值并释放键句柄 ]xb2W~  
e~># M$  
　　 RegOpenKey(HKEY_LOCAL_MACHINE,(LPCTSTR)strKey,&&hResult); ~X<$l+5  
]Y->EME:W  
　　//得到欲修改键的句柄 :TKx>~`  
XrMw$_0)  
　　 SetRegValue(HKEY_LOCAL_MACHINE,strKey,"BackBitmapIE5",picture); ';.y`{/  
}c=Y<Cdh  
　　 SetRegValue(HKEY_LOCAL_MACHINE,strKey,"BackBitmap",picture); \0;w7tdo  
g co;8e_  
　　 RegCloseKey(hResult); In:V.'D/>t  
0%HAa|L,,  
　　//修改注册表相应的值并释放键句柄 KC9VQeSc  
Wq1OYZ,  
　　} YaQ5Z-c  
d0%Wz5Np  
fo>_*6i74  
以上只是从几个简单的方面演示了VC下通过修改注册表的方法实现为IE换貌。读者可以根据以上的代码进行更个性化的修改，以实现真正意义上的个性化IE。

用工具弄过...