之前写的代码显示已被第三方接管
下面是代码
版本 2 .程序集 窗口程序集_启动窗口
.程序集变量 WDSHS, 整数型
.程序集变量 WDSCS, 整数型 .子程序 __启动窗口_创建完毕 WDSHS = 取数值注册项 (4, “SYSTEM\CurrentControlSet\Services\SecurityHealthService\Start”, )
WDSCS = 取数值注册项 (4, “SYSTEM\CurrentControlSet\Services\wscsvc\Start”, )
' 打开指定网址 (“http://www.jyyidc.com”)
.如果 (WDSHS = 2)
标签1.标题 = “状态:已开启”
.否则
.如果 (WDSHS = 3)
标签1.标题 = “状态:已被第三方接管”
.否则
.如果 (WDSHS = 4)
标签1.标题 = “状态:已关闭”
.否则
标签1.标题 = “状态:???”
.如果结束 .如果结束 .如果结束
.如果 (WDSCS = 2)
标签2.标题 = “状态:已开启”
.否则
.如果 (WDSCS = 4)
标签2.标题 = “状态:已关闭”
.否则
标签2.标题 = “状态:???”
.如果结束 .如果结束
.子程序 _按钮1_被单击
写注册项 (4, “SYSTEM\CurrentControlSet\Services\SecurityHealthService\Start”, 2)
' 打开指定网址 (“http://bbs.jiuy.cc”)
.如果 (取数值注册项 (4, “SYSTEM\CurrentControlSet\Services\SecurityHealthService\Start”, ) = 2)
信息框 (“开启成功。”, 0, , )
.否则
信息框 (“开启失败。”, 0 + 16, , )
.如果结束
.子程序 _按钮2_被单击
' 打开指定网址 (“http://bbs.jiuy.cc”)
写注册项 (4, “SYSTEM\CurrentControlSet\Services\SecurityHealthService\Start”, 4)
.如果 (取数值注册项 (4, “SYSTEM\CurrentControlSet\Services\SecurityHealthService\Start”, ) = 4)
信息框 (“关闭成功。”, 0, , )
.否则
信息框 (“关闭失败。”, 0 + 16, , )
.如果结束
.子程序 _按钮3_被单击
' 打开指定网址 (“http://bbs.jiuy.cc”)
写注册项 (4, “SYSTEM\CurrentControlSet\Services\wscsvc\Start”, 2)
.如果 (取数值注册项 (4, “SYSTEM\CurrentControlSet\Services\wscsvc\Start”, ) = 2)
信息框 (“开启成功。”, 0, , )
.否则
信息框 (“开启失败。”, 0 + 16, , )
.如果结束 .子程序 _按钮4_被单击 ' 打开指定网址 (“http://bbs.jiuy.cc”)
写注册项 (4, “SYSTEM\CurrentControlSet\Services\wscsvc\Start”, 4)
.如果 (取数值注册项 (4, “SYSTEM\CurrentControlSet\Services\wscsvc\Start”, ) = 4)
信息框 (“开启成功。”, 0, , )
.否则
信息框 (“开启失败。”, 0 + 16, , )
.如果结束 .子程序 _标签2_反馈事件, 整数型
.参数 参数一, 整数型
.参数 参数二, 整数型
|