|
发表于 2013-4-5 14:48:37
|
显示全部楼层
湖南省郴州市
.版本 2
标签1.标题 = “使用时间:” + 到文本 (取现行时间 ())
软件到期时间 = 201209200000
.如果 (取月份 (取现行时间 ()) < 10)
月份整理 = “0” + 到文本 (取月份 (取现行时间 ()))
.否则
月份整理 = 到文本 (取月份 (取现行时间 ()))
.如果结束
.如果 (取日 (取现行时间 ()) < 10)
日期整理 = “0” + 到文本 (取日 (取现行时间 ()))
.否则
日期整理 = 到文本 (取日 (取现行时间 ()))
.如果结束
.如果 (取小时 (取现行时间 ()) < 10)
小时 = “0” + 到文本 (取小时 (取现行时间 ()))
.否则
小时 = 到文本 (取小时 (取现行时间 ()))
.如果结束
.如果 (取分钟 (取现行时间 ()) < 10)
分钟 = “0” + 到文本 (取分钟 (取现行时间 ()))
.否则
分钟 = 到文本 (取分钟 (取现行时间 ()))
.如果结束
现在时间 = 到数值 (到文本 (取年份 (取现行时间 ())) + 月份整理 + 日期整理 + 小时 + 分钟)
.如果真 (现在时间 > 软件到期时间)
时钟1.时钟周期 = 0
_启动窗口.可视 = 假
信息框 (“ 软件过期” + #换行符 + #换行符 + “请联系作者续费使用”, 0, “友情提示”)
_启动窗口.销毁 (真)
|
|