|
发表于 2011-3-5 11:41:06
|
显示全部楼层
陕西省西安市
本帖最后由 zichuan 于 2011-3-5 22:16 编辑
[e].版本 2
.支持库 shell
.程序集 窗口程序集1
.程序集变量 bc1, 整数型
.程序集变量 bc2, 整数型
.程序集变量 yz, 文本型
.程序集变量 yzdb, 文本型
.程序集变量 机器码, 文本型
.子程序 __启动窗口_创建完毕
bc1 = 5
yz = 到文本 (校验_取md5 (到字节集 (到数值 (系统_取硬盘特征字 () + 81853239))))
创建目录 (取特定目录 (3) + “paopao”)
写到文件 (取特定目录 (3) + “paopao\PaoPaoyz.bin”, 读入文件 (取特定目录 (3) + “paopao\PaoPaoyz.bin”))
yzdb = 到文本 (读入文件 (取特定目录 (3) + “paopao\PaoPaoyz.bin”))
.如果 (yzdb ≠ yz)
信息框 (“1.您未注册,注册后将不再出现本提示和网页”, 0, “泡泡提示您:”)
机器码 = 到文本 (系统_取硬盘特征字 ())
编辑框1.内容 = “提取码:” + 机器码
.否则
编辑框1.内容 = “注册给” + “【” + 系统_取用户名 () + “】”
编辑框1.禁止 = 真
按钮1.标题 = “已注册”
按钮1.禁止 = 真
.如果结束
.子程序 _按钮1_被单击
_启动窗口.总在最前 = 假
写到文件 (取特定目录 (3) + “paopao\PaoPaoyz.bin”, 到字节集 (编辑框2.内容))
信息框 (“输入完成,为了更好的使用软件程序将重新启动”, 0, “验证提示:”)
结束 ()
[/e]
这是我以前写的一个需要注册码的 你看看 源码直接复制吧 如果还是不会 联系我 你说要什么样的 我给你写
你要的源码给你补上了
重启验证_by_paopao.7z
(48.04 KB, 下载次数: 10)
|
评分
-
查看全部评分
|