自从微软捆绑了IE以后,网虫们便注定了要永远地面对那一成不变的微软模式:窗口、按钮和
www.microsoft.com网站,从用户的角度,我们希望能够拥有自己特色的IE;从商业运作角度,商人希望无处不有他们公司的宣传信息,希望IE一经运行便可自动进入他们的网站。下面笔者介绍一种用VC6编程,通过修改注册表来改变IE面貌的方法。
Fld=5B^} fdFo# P VC修改注册表的方法与函数
T;r2.Pupn 注册表是由树干和键组成的,对注册表的修改便是对键的修改。
5IE#\FITO| 首先,要对键修改需先得到要修改键的句柄,VC中为键打开一个句柄,可采用的函数为LONG RegOpenKey命令;然后才能对键进行修改,用SetRegValue命令;最后需要释放得到的键句柄,用RegCloseKey(hResult)命令。
h`^jyoF"( !|^|,"A) 通过修改注册表实现IE换貌
H?yK~bGQ 我们都知道,在注册表中,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()
k\5c|Wq|g >;e~ WF>+K {
H#,W5EJzM 'jWr<]3 if(AddressNum==0){
M:Pc, @>,^":`# AfxMessageBox("没有可应用的选项!");
m*&]!mM"0G 01t1Z}!y return;
|d{PA.@33 p`olCp' }
cr7 }^s 5_GYrR2 CString address;
,wQ5.U, %O|iE M int sel=m_address1.GetCurSel();
em%4Ap &6/[B_. if(LB_ERR ==sel){
YvaK0p0Z rBQ _iB_ AfxMessageBox("请先选中要应用的选项!");
D+l AhEN <sb~ ^B return;
"q3ZWNS'w X_q\S g }
G/)O@Ugp o_izl\ m_address1.GetText(sel,address);
i1 }:8Unxf t%d Z-Ym //取得所需加入的网址字符串
YL!P0o13r cN/6SGHK CString strKey="Software\\Microsoft\\Internet Explorer\\Main";
Wf+cDpK ~[t[y~Hup HKEY hResult;
bV^rsJm Ouk^O}W6 RegOpenKey(HKEY_CURRENT_USER,(LPCTSTR)strKey,&&hResult);
qqjwJ!@P {&&z-^ //得到欲修改键的句柄
w'>p Y 7r6.n61F
SetRegValue(HKEY_CURRENT_USER,strKey,"Start Page",address);
j*|VctM yuh * RegCloseKey(hResult);
~nmoz/L (>LF(ll //修改注册表相应的值并释放键句柄
]%;:7?5l u+9hL4 }
\[;0KV_ xK>*yV 2.给工具条指定用户特定的背景图案
j
*
% d-oMQGOklb void CJhfDlg::OnAddBackGround()
/T"+KU* bL0yuAwF2 {
'+@=ILj> *IB4[6 if(PictureNum==0){
&sl0W-;0 bTI|F]^! AfxMessageBox("没有可应用的选项!");
C"y(5U)d p'Y^X return;
FnwJ+GTu 8=!D$t\3 }
x[cL
Bc< ko!)s CString picture;
!hm]fh_j rjK%t|aV^ int sel=m_PicList.GetCurSel();
pJ>P[ +5)nk} if(LB_ERR ==sel){
^vZSUfS <;lkUU(WT2 AfxMessageBox("请先选中要应用的选项!");
A@`}c,G C2!|OQ9A2 return;
}H53~@WP> Fw_#N6Q }
ldf\;Qk d z|or9& m_PicList.GetText(sel,picture);
td$E/h=3 vz&|J
//取得所需加入背景图案文件路径
#`^}PuQ F~-(:7j CString strKey="Software\\Microsoft\\Internet Explorer\\Toolbar";
IW5,7. -abt:or HKEY hResult;
8|gIhpO?^ /'SNw?& RegOpenKey(HKEY_CURRENT_USER,(LPCTSTR)strKey,&&hResult);
Cp\6W[2+B .'6gZKXY //得到欲修改键的句柄
#<fRE"v:Q Lj({[H7D! SetRegValue(HKEY_CURRENT_USER,strKey,"BackBitmapIE5",picture);
,~U>'&M; -OV&Md:~ SetRegValue(HKEY_CURRENT_USER,strKey,"BackBitmap",picture);
6jaEv# {p2!|A&a RegCloseKey(hResult);
3Tcms/n X0HZH?V+ //修改注册表相应的值并释放键句柄
)$2QZ
qX Z-%\
<zT RegOpenKey(HKEY_LOCAL_MACHINE,(LPCTSTR)strKey,&&hResult);
8S
TvCH"Z_ L(6d&t'|-R //得到欲修改键的句柄
'ms-*c&
&u."A3( SetRegValue(HKEY_LOCAL_MACHINE,strKey,"BackBitmapIE5",picture);
yX>K/68 WCZjXDiwJ SetRegValue(HKEY_LOCAL_MACHINE,strKey,"BackBitmap",picture);
RNk\.}m bIDj[-CDG RegCloseKey(hResult);
+fB5w?Rg k=$TGqQY? //修改注册表相应的值并释放键句柄
,Zx0%#6 %6 zBSje }
>b}o~F^J Qp5VP@t CZwXTHe 以上只是从几个简单的方面演示了VC下通过修改注册表的方法实现为IE换貌。读者可以根据以上的代码进行更个性化的修改,以实现真正意义上的个性化IE。