大学助学金申请书标题:关于鼠标右键菜单的一个问题

来源:百度文库 编辑:查人人中国名人网 时间:2024/04/30 01:40:55
我在网上下qq表情以前只要在图片上点鼠标右键,选择添加到qq表情就ok了,现在不知怎么回事“添加到qq表情”这个选项没有了,重装了qq还是没有,谁能告诉我这是怎么回事啊?谢谢大家了!
能不能简单易懂一点,太复杂了我自己弄不成

在注册表中的一个VALUE值被删了.
把下面的注册表信息保存在文本文件然后另存为 add.reg 然后双击导入既可!注意:下面的QQ路径你自己改成你自己的QQ安装的目录.

Windows Registry Editor Version 5.00

[HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\MenuExt]

[HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\MenuExt\添加到QQ表情]
@="c:\\Program Files\\Tencent\\qq\\AddEmotion.htm"
"contexts"=dword:00000002

另外.把以下HTML代码同样的方法另存为 AddEmotion.htm 然后放到QQ的目录下既可!

<script language="VBScript">

Sub AddEmotion(strUrl)
On Error Resume Next
set cpAdder = CreateObject("QQCPHelper.CPAdder")
if 0 = err then
call cpAdder.AddCustomEmotion(strUrl)
end if
end sub

Sub OnContextMenu()
set srcEvent = external.menuArguments.event
set EventElement = external.menuArguments.document.elementFromPoint(srcEvent.clientX, srcEvent.clientY)

if "HTMLImg" = TypeName(EventElement) then
Call AddEmotion(EventElement.href)
end if
end sub

call OnContextMenu()

</script>

另存为 AddEmotion.htm ,文件名一定不能错!