我用易语言编了个下载器，怎么设为默认下载器

已注销41434

关联文件地址 也可以调用迅雷的下载组建

guduyouxi

BHO 去看一下

七贱小乖

这个好像用QQ安全管家可以实现

694336034

[e]
.版本 2

.子程序 _按钮4_被单击
.局部变量 STEP, 整数型
.局部变量 脚本路径, 文本型
.局部变量 易程序路径, 文本型
.局部变量 脚本內容, 文本型

脚本路径 ＝ 取运行目录 () ＋ “\myDown.htm”
易程序路径 ＝ 长名到短名 (取运行目录 () ＋ “\文件下载器.exe”)
' 脚本的WScript.Shell只认短文件名,所以要转换
STEP ＝ 1
' 添加IE右键菜单下载链接项
.如果真 (写注册项 (#现行用户, “Software\Microsoft\Internet Explorer\MenuExt\使用我的程序下载链接\”, 脚本路径))
    STEP ＝ 2
    ' 写Contexts值是决定本菜单项在什么时候是有效的,该值为以下组合
    ' 缺省   1
    ' 图片   2
    ' 控件   4
    ' 表单域   8
    ' 选择文本  16
    ' 锚点   32
    ' 我们希望菜单项在用户点击图片或者超链接时出现，那么我们就将值设置为34
    ' 如果不写Contexts项,就是任何时候都出现
    .如果真 (写注册项 (#现行用户, “Software\Microsoft\Internet Explorer\MenuExt\使用我的程序下载链接\contexts”, 34))
        STEP ＝ 3
        ' 写出脚本文件
        脚本內容 ＝ 到文本 (#脚本)
        脚本內容 ＝ 子文本替换 (脚本內容, “程序全路径”, 易程序路径, , , 真)
        .如果真 (写到文件 (脚本路径, 到字节集 (脚本內容)))
            信息框 (“安装完毕!关闭所有的IE窗口,重新打开IE即可生效.”, 0, )
            返回 ()
        .如果真结束

    .如果真结束


.如果真结束


信息框 (“第” ＋ 到文本 (STEP) ＋ “步出错”, 0, )
[/e]