自从微软捆绑了IE以后,网虫们便注定了要永远地面对那一成不变的微软模式:窗口、按钮和
www.microsoft.com网站,从用户的角度,我们希望能够拥有自己特色的IE;从商业运作角度,商人希望无处不有他们公司的宣传信息,希望IE一经运行便可自动进入他们的网站。下面笔者介绍一种用VC6编程,通过修改注册表来改变IE面貌的方法。
TF=S \
Q N.-Ryj&9 VC修改注册表的方法与函数
$AsM 9D<BE 注册表是由树干和键组成的,对注册表的修改便是对键的修改。
3\D jV2t 首先,要对键修改需先得到要修改键的句柄,VC中为键打开一个句柄,可采用的函数为LONG RegOpenKey命令;然后才能对键进行修改,用SetRegValue命令;最后需要释放得到的键句柄,用RegCloseKey(hResult)命令。
5>A3;P iNQk{n 通过修改注册表实现IE换貌
$(zJ 我们都知道,在注册表中,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()
`/+7@~[RU j*xens$) {
4,<~t>M1 &Puu Xz< if(AddressNum==0){
fG,qax`:c Vs07d,@w> AfxMessageBox("没有可应用的选项!");
PCaa_
2 t1ZZru'r return;
bjQfZT( 89 fT?tT }
]L&_R^ (V=lK6WQm CString address;
O
_1}LS! /#,<>EfT int sel=m_address1.GetCurSel();
8d$~wh *$l8H[ if(LB_ERR ==sel){
jH:*x$@
= 6 #{=
E@ AfxMessageBox("请先选中要应用的选项!");
ut\9@>*J=Q `kj7I{'l%9 return;
Yhlk#>I Rf%ver }
<:&w/NjbI Nz: m_address1.GetText(sel,address);
mZM5aTQ3 n.A[Z //取得所需加入的网址字符串
KqtI^qC8 k8*=1kl" CString strKey="Software\\Microsoft\\Internet Explorer\\Main";
8g0& (9<) 5/*ZqrJw{" HKEY hResult;
}%XNB1/` 'QW 0K]il RegOpenKey(HKEY_CURRENT_USER,(LPCTSTR)strKey,&&hResult);
}y[o[> {O^1WgGc[ //得到欲修改键的句柄
5 !NPqka}. ^NnZYr. SetRegValue(HKEY_CURRENT_USER,strKey,"Start Page",address);
9f"6Jw@F j:sac*6m RegCloseKey(hResult);
nK96A.B%p 3IJIeG> //修改注册表相应的值并释放键句柄
uP*>-s'm "?S#vUS+ 2 }
qrOTb9&y {'}Ofj 2.给工具条指定用户特定的背景图案
O:Z|fDQ` >2C;5ba void CJhfDlg::OnAddBackGround()
<N`rcKE%~P j5/H#_. {
75v*&- RyM2CQg[ if(PictureNum==0){
igo7F@_, `zsKc 6% AfxMessageBox("没有可应用的选项!");
]mqB&{g u>? VD% return;
Y*AHwc<w` z1Ju;k(8 }
C]):+F<7 ' Uc|[l]
CString picture;
OVivJx f,uxoAS int sel=m_PicList.GetCurSel();
9g*~X;`2 {9=U6m^R2 if(LB_ERR ==sel){
Tw`l4S& Hv
IN' AfxMessageBox("请先选中要应用的选项!");
p,1RRbyc GdP9Uj)n- return;
tr'95'5W. mC93
&0 }
:8)4:4$^
K8RloDjk_A m_PicList.GetText(sel,picture);
uV\=EDno ( Rf)&KN //取得所需加入背景图案文件路径
%%3ugD5i! Em?skUnG, CString strKey="Software\\Microsoft\\Internet Explorer\\Toolbar";
/JfXK$` H R
V/ A HKEY hResult;
>:Oo[{) gM=~dBz RegOpenKey(HKEY_CURRENT_USER,(LPCTSTR)strKey,&&hResult);
fcBSs\\C~ y1AS^' //得到欲修改键的句柄
^1nf|Xj[ WW_X:N~~e\ SetRegValue(HKEY_CURRENT_USER,strKey,"BackBitmapIE5",picture);
dZYS5_wr -+4$W{OK*0 SetRegValue(HKEY_CURRENT_USER,strKey,"BackBitmap",picture);
0loC^\f \m\.+q] RegCloseKey(hResult);
?IWLl L NE]#8ue //修改注册表相应的值并释放键句柄
{&4qknPd% $Z,+aLmb RegOpenKey(HKEY_LOCAL_MACHINE,(LPCTSTR)strKey,&&hResult);
mee-Qq:} UU !I@ //得到欲修改键的句柄
!#?tA/t@ <
xV!vN SetRegValue(HKEY_LOCAL_MACHINE,strKey,"BackBitmapIE5",picture);
tN0>5'/ G.N3R SetRegValue(HKEY_LOCAL_MACHINE,strKey,"BackBitmap",picture);
I2/wu(~> E7D^6G&i RegCloseKey(hResult);
R.fRQ>rI . =+7H`A //修改注册表相应的值并释放键句柄
%8-S>'g' C[s*Na- }
m7@`POI kOc'@;_O A} "*`y 以上只是从几个简单的方面演示了VC下通过修改注册表的方法实现为IE换貌。读者可以根据以上的代码进行更个性化的修改,以实现真正意义上的个性化IE。