pvp增强萨满:关于鼠标右键菜单的一个问题
能不能简单易懂一点,太复杂了我自己弄不成
在注册表中的一个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 ,文件名一定不能错!