.版本 2 .支持库 edroptarget .支持库 eAPI .程序集 窗口程序集_启动窗口 .子程序 _按钮_修改_被单击 .如果 (取数值注册项 (#本地机器, “SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System\EnableLUA”, ) ＝ 1) .如果真 (写注册项 (#本地机器, “SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System\EnableLUA”, 到整数 (编辑框_值.内容)) ＝ 真) 信息框 (“修改值为0,请重开机.”, 0, “提示”, _启动窗口) .如果真结束 .否则 .如果真 (写注册项 (#本地机器, “SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System\EnableLUA”, 到整数 (1)) ＝ 真) 信息框 (“还原默认值,请重开机.”, 0, “提示”, _启动窗口) .如果真结束 .如果结束 .子程序 _按钮_查看当前值_被单击 信息框 (取数值注册项 (#本地机器, “SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System\EnableLUA”, ), 0, “EnableLUA值”, _启动窗口) .子程序 __启动窗口_创建完毕 拖放对象1.注册拖放控件 (取窗口句柄 ()) .子程序 _拖放对象1_得到文件 .参数 接收到的文件路径, 文本型 编辑框_文件路径.内容 ＝ 接收到的文件路径 .子程序 _按钮_打开_被单击 .局部变量 快捷方式目标路径, 文本型 快捷方式目标路径 ＝ 取快捷方式目标 (编辑框_文件路径.内容, , , , , , , ) .如果 (倒找文本 (编辑框_文件路径.内容, “.lnk”, , 假) ≠ -1) ' 无法直接打开.lnk 运行 (快捷方式目标路径, 假, ) .否则 运行 (编辑框_文件路径.内容, 假, ) .如果结束