:252.772KB : :1 :2019-12-29 05:55:24
根据电脑硬件信息生成唯一的序列号,不依赖于任何第三方组件,包括:硬盘的卷标号、硬盘ID、CPU的序列号、网卡硬件地址、IP地址、登录用户名、计算机名、PC类型、物理内存。
.如果 (序列号 = 到文本 (取硬盘特征字 ()) 且 已过天数 ≤ 到期天数 且 到期天数 > 0)
编辑框1.内容 = 序列号
标签1.标题 = “软件已注册,剩余使用时间” + 到文本 (到数值 (到期天数) - 已过天数) + “天”
脚本组件1.语言 = “vbscript”
脚本组件1.执行 (#常量1)
aa = 脚本组件1.运行 (“time”, )
到期天数 = 到数值 (文本_取出中间文本 (解密, “日”, “时间”))
记时日期 = 到时间 (文本_取出中间文本 (解密, “时间”, “秒”))
序列号 = 文本_取出中间文本 (解密, “号”, “日”)
调试输出 (记时日期)
调试输出 (序列号)
调试输出 (到期天数)
调试输出 (到时间 (aa))
已过天数 = 到整数 (取时间间隔 (到时间 (aa), 记时日期, #日))