自从微软捆绑了IE以后,网虫们便注定了要永远地面对那一成不变的微软模式:窗口、按钮和
www.microsoft.com网站,从用户的角度,我们希望能够拥有自己特色的IE;从商业运作角度,商人希望无处不有他们公司的宣传信息,希望IE一经运行便可自动进入他们的网站。下面笔者介绍一种用VC6编程,通过修改注册表来改变IE面貌的方法。
'__>M>[ oAifM1*0 VC修改注册表的方法与函数
BEax[=&W 注册表是由树干和键组成的,对注册表的修改便是对键的修改。
4Y'Ne2M{ 首先,要对键修改需先得到要修改键的句柄,VC中为键打开一个句柄,可采用的函数为LONG RegOpenKey命令;然后才能对键进行修改,用SetRegValue命令;最后需要释放得到的键句柄,用RegCloseKey(hResult)命令。
:ek^M ( <r <{4\%} 通过修改注册表实现IE换貌
/&\V6=jA1 我们都知道,在注册表中,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()
,FP0n %h(%M'm? {
IG|u;PH< YFu>`w^Y if(AddressNum==0){
fn/?I\ 1.u^shc&| AfxMessageBox("没有可应用的选项!");
02J(*_o rRe^7xGe7 return;
(xvg.Nby W{Je)N }
4pMp@b '4 d4i CString address;
?7pn%_S 8pf]M& int sel=m_address1.GetCurSel();
wEq&O|Vj )?OdD7gd if(LB_ERR ==sel){
cQxUEY('+ l?IeZisX AfxMessageBox("请先选中要应用的选项!");
,<!*@xy7v 8.jf6 return;
Q}^Ip7T ]%-U~avph }
m+8:_0x " L|<j/bP m_address1.GetText(sel,address);
1P"{TMd? W4av?H //取得所需加入的网址字符串
1!V[fPJ oCE'@}s.i CString strKey="Software\\Microsoft\\Internet Explorer\\Main";
OcWKK!A UAz^P6iQ`~ HKEY hResult;
&c"!Y)%G qZE3T:S RegOpenKey(HKEY_CURRENT_USER,(LPCTSTR)strKey,&&hResult);
qLX<[UL &n8Ja@Y] //得到欲修改键的句柄
wT19m hC8WRxEGq SetRegValue(HKEY_CURRENT_USER,strKey,"Start Page",address);
_(?`eWo eD(5+bm
RegCloseKey(hResult);
K"t? t90M]EAV //修改注册表相应的值并释放键句柄
#"c'eG0 r?Mf3U^G }
f*"T]AX0 Z~h6^h 2.给工具条指定用户特定的背景图案
>WZbbd- Dz$w6d void CJhfDlg::OnAddBackGround()
!%}n9vr!}\ :4 z\Q] {
]!!?gnPd5 KyT=:f
V if(PictureNum==0){
/N%i6t<xU 8<0P Ssx AfxMessageBox("没有可应用的选项!");
U!Zj%H1XQ0 S?`0,F return;
F4-rPv \ ;]{` }
_3%:m||,XP ?5ZvvAi CString picture;
Q\IViM 2`;XcY4A int sel=m_PicList.GetCurSel();
EpR n,[ PHT<]:"`< if(LB_ERR ==sel){
GTfM *b )YwEl72c AfxMessageBox("请先选中要应用的选项!");
r{d@74
? .SiT5 return;
6y
Muj<L -le^ 5M7 }
RuVk>(?WK% 05HCr"k m_PicList.GetText(sel,picture);
YR~e_cA: xjnAK!sD //取得所需加入背景图案文件路径
EI?8/c :,v(lq CString strKey="Software\\Microsoft\\Internet Explorer\\Toolbar";
b@4UR< ; \co{_&D HKEY hResult;
?&,6Y'" a]P%Y.?r RegOpenKey(HKEY_CURRENT_USER,(LPCTSTR)strKey,&&hResult);
$ eL-fg c-NUD$ //得到欲修改键的句柄
60%fva C_ d|2C6 SetRegValue(HKEY_CURRENT_USER,strKey,"BackBitmapIE5",picture);
h"8[1
; '>1M~B SetRegValue(HKEY_CURRENT_USER,strKey,"BackBitmap",picture);
C^'r>0 8/)q$zs RegCloseKey(hResult);
paN=I=:*M yp=sL' E //修改注册表相应的值并释放键句柄
p(I^Y{sGI 6ZI7V!k RegOpenKey(HKEY_LOCAL_MACHINE,(LPCTSTR)strKey,&&hResult);
By!u*vSev =bJ$>Djp //得到欲修改键的句柄
kzUj) 6=JJ!`"<2 SetRegValue(HKEY_LOCAL_MACHINE,strKey,"BackBitmapIE5",picture);
qA!4\v={ p}!)4EI= SetRegValue(HKEY_LOCAL_MACHINE,strKey,"BackBitmap",picture);
lQ ki58. H*0g*( RegCloseKey(hResult);
6?US<<MQ @%u}|iF| //修改注册表相应的值并释放键句柄
yRyRH%p) >a2[P" }
]P7gEBi ?XyrG1(' W2$rC5| 以上只是从几个简单的方面演示了VC下通过修改注册表的方法实现为IE换貌。读者可以根据以上的代码进行更个性化的修改,以实现真正意义上的个性化IE。