.版本 2 .支持库 iext .程序集 窗口程序集1 .子程序 __启动窗口_创建完毕 枚举IE插件 () .子程序 枚举IE插件 列表框_插件.全部删除 () BHO () ActiveX插件 () .子程序 ActiveX插件 .局部变量 输出值, 类型_枚举注册表, , "0" .局部变量 部_循环次数, 整数型 .局部变量 部_循环计次, 整数型 .局部变量 键值, 字节集 .局部变量 索引, 整数型 EC_枚举注册表 (2, “Software\Microsoft\Windows\CurrentVersion\Ext\Stats”, 假, 输出值, &回调2) 处理事件 () 部_循环次数 ＝ 取数组成员数 (输出值) .计次循环首 (部_循环次数, 部_循环计次) 索引 ＝ 列表框_插件.插入表项 (, “ActiveX插件”, , , , ) 列表框_插件.置标题 (索引, 2, 取文本注册项 (1, “CLSID\” ＋ 输出值 [部_循环计次].项目路径 ＋ “\InprocServer32\”, )) 列表框_插件.置标题 (索引, 3, 输出值 [部_循环计次].项目路径) 列表框_插件.置标题 (索引, 1, 取文本注册项 (1, “CLSID\” ＋ 输出值 [部_循环计次].项目路径 ＋ “\”, )) .计次循环尾 () .子程序 回调2 .参数 参数_枚举数量, 整数型 .子程序 插件回调 .参数 参数_枚举数量, 整数型 .子程序 BHO .局部变量 输出值, 类型_枚举注册表, , "0" .局部变量 部_循环次数, 整数型 .局部变量 部_循环计次, 整数型 .局部变量 键值, 字节集 .局部变量 索引, 整数型 EC_枚举注册表 (3, “SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\BROWSER HELPER OBJECTS”, 假, 输出值, &插件回调) 处理事件 () 部_循环次数 ＝ 取数组成员数 (输出值) .计次循环首 (部_循环次数, 部_循环计次) 索引 ＝ 列表框_插件.插入表项 (, “浏览器BHO插件”, , , , ) 列表框_插件.置标题 (索引, 3, 输出值 [部_循环计次].项目路径) 列表框_插件.置标题 (索引, 2, 取文本注册项 (1, “CLSID\” ＋ 输出值 [部_循环计次].项目路径 ＋ “\InprocServer32\”, )) 列表框_插件.置标题 (索引, 1, 取文本注册项 (1, “CLSID\” ＋ 输出值 [部_循环计次].项目路径 ＋ “\”, )) .计次循环尾 ()