社区应用 最新帖子 精华区 社区服务 会员列表 统计排行 社区论坛任务 迷你宠物
  • 3767阅读
  • 1回复

VC编程改造IE浏览

级别: 终身会员
发帖
3743
铜板
8
人品值
493
贡献值
9
交易币
0
好评度
3746
信誉值
0
金币
0
所在楼道
自从微软捆绑了IE以后,网虫们便注定了要永远地面对那一成不变的微软模式:窗口、按钮和www.microsoft.com网站,从用户的角度,我们希望能够拥有自己特色的IE;从商业运作角度,商人希望无处不有他们公司的宣传信息,希望IE一经运行便可自动进入他们的网站。下面笔者介绍一种用VC6编程,通过修改注册表来改变IE面貌的方法。 x !o>zT\  
E|jbbCZy2  
VC修改注册表的方法与函数 C 4 &1M  
注册表是由树干和键组成的,对注册表的修改便是对键的修改。 OJL?[<I  
首先,要对键修改需先得到要修改键的句柄,VC中为键打开一个句柄,可采用的函数为LONG RegOpenKey命令;然后才能对键进行修改,用SetRegValue命令;最后需要释放得到的键句柄,用RegCloseKey(hResult)命令。 v<z%\`y  
dfBTx6/F  
通过修改注册表实现IE换貌 $(ugnnJ*  
我们都知道,在注册表中,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() jHj*S9:`  
<-:gaA`KM  
  { @,RrAL }|  
9 L{JU  
   if(AddressNum==0){ b{KpfbxcI  
:N<ZO`l?  
  AfxMessageBox("没有可应用的选项!"); >d&_e[j  
r1= :B'z  
   return; Jm|eZDp  
bt/u^E  
   } XO*62 >Ed  
BiQ7r=Dd.  
   CString address; (0Xgv3wd  
%z&=A%'a  
   int sel=m_address1.GetCurSel(); , wT$L 3  
p xrd D7  
   if(LB_ERR ==sel){  2L~[dn.s  
&n.7~C]R  
  AfxMessageBox("请先选中要应用的选项!"); e5_:15%R\  
5sD\4g)HK  
   return; M4rOnIJ  
<j93   
   } `Tx1?]  
e 'I13)  
   m_address1.GetText(sel,address); C ebl"3Q  
6e6~82t8/  
  //取得所需加入的网址字符串 ,[rh7 _  
YPraf$  
   CString strKey="Software\\Microsoft\\Internet Explorer\\Main"; 15i8) 4h  
SbmakNWJ}  
   HKEY hResult; DS,"^K  
iEG`+h'  
  RegOpenKey(HKEY_CURRENT_USER,(LPCTSTR)strKey,&&hResult); )E<<  
@<5?q: 9.8  
  //得到欲修改键的句柄 !xm87I  
n%lY7.z8d  
   SetRegValue(HKEY_CURRENT_USER,strKey,"Start Page",address); Zs _Jn  
_q >>]{5  
   RegCloseKey(hResult); B1]dub9  
$*ujX,}xG  
  //修改注册表相应的值并释放键句柄 '"{ IV  
#WD} XOA  
  } >E&m Np  
6mr5`5~w  
  2.给工具条指定用户特定的背景图案 kK]JN  
KXEDpr  
  void CJhfDlg::OnAddBackGround() Fa`/i v  
+~Ni7Dp]  
  { lLy^@s  
kK2x';21  
   if(PictureNum==0){ zfDx c3e  
yjUSM}$  
  AfxMessageBox("没有可应用的选项!"); EGYYSoBLU  
1*{` .  
   return; 9H~3&-8&  
 GU99!.$  
   } \'I->O]  
l$$N~FN  
   CString picture; ob=GB71j55  
R9X* R3nB  
   int sel=m_PicList.GetCurSel(); W-9^Ncp  
(,~gY=E+  
   if(LB_ERR ==sel){ &?\ h[3  
lYkm1  
   AfxMessageBox("请先选中要应用的选项!"); W)I)QinOH  
Ay'2! K,I  
   return; V:*QK,  
t0XM#9L  
   } ZSj^\JU  
f.ku v"  
   m_PicList.GetText(sel,picture); uop|8n1  
*6%!i7kr  
  //取得所需加入背景图案文件路径 G"3)\FEM  
gR)T(%W  
   CString strKey="Software\\Microsoft\\Internet Explorer\\Toolbar"; Gj]*_"T  
:d7Ju.*J  
   HKEY hResult; B`,4M&  
>]?!c5=  
   RegOpenKey(HKEY_CURRENT_USER,(LPCTSTR)strKey,&&hResult); )h-Qi#{  
F+r3~T%  
   //得到欲修改键的句柄 :4]^PB@dl  
eyK=F:GO  
   SetRegValue(HKEY_CURRENT_USER,strKey,"BackBitmapIE5",picture); IHCEuK  
..RCR_DIp  
   SetRegValue(HKEY_CURRENT_USER,strKey,"BackBitmap",picture); CO!K[ q#  
X PnN"Y"y  
   RegCloseKey(hResult); a=3?hVpB  
O(BAw  
  //修改注册表相应的值并释放键句柄 AZ~= ]1  
SS;[{u!  
   RegOpenKey(HKEY_LOCAL_MACHINE,(LPCTSTR)strKey,&&hResult); *I 7$\0Q  
.0^-a=/  
  //得到欲修改键的句柄 {U?UM  
l :\DC  
   SetRegValue(HKEY_LOCAL_MACHINE,strKey,"BackBitmapIE5",picture); |V#h "s  
8w &A89  
   SetRegValue(HKEY_LOCAL_MACHINE,strKey,"BackBitmap",picture); m{itMZ@  
|` gSkv  
   RegCloseKey(hResult); >, 22@4  
w@U`@})r.  
  //修改注册表相应的值并释放键句柄 __jFSa`at  
5yO %|)  
  } qE73M5L&  
^DZ(T+q,  
)r _zM~jI  
以上只是从几个简单的方面演示了VC下通过修改注册表的方法实现为IE换貌。读者可以根据以上的代码进行更个性化的修改,以实现真正意义上的个性化IE。
评价一下你浏览此帖子的感受

精彩

感动

搞笑

开心

愤怒

无聊

灌水
级别: 店掌柜
发帖
5692
铜板
103378
人品值
1520
贡献值
26
交易币
0
好评度
5373
信誉值
0
金币
0
所在楼道

只看该作者 1 发表于: 2006-06-09
用工具弄过...

简单生活
执著追求
别笑我浅溥,天真的以为用一腔真诚就能感动这个冷漠的世界。
也别说我幼稚,竟想用不长的人生去诠释繁杂的红尘。
然而除了真诚,我还能给你什么,的确我真的一无所有!

描述
快速回复

您目前还是游客,请 登录注册
批量上传需要先选择文件,再选择上传
认证码:
验证问题:
10+5=?,请输入中文答案:十五