易语言吧

 找回密码
 立即注册
搜索
热搜: 活动 交友 discuz
查看: 6731|回复: 11

[易语言源码] 易语言简单的限制软件到期时间源码

[复制链接]

295

主题

537

帖子

1万

积分

超级版主

Rank: 8Rank: 8

积分
14490

幽默大师终生成就

威望
0
易币
13868
贡献
0
积分
14490
UID
580
在线时间
464 小时
注册时间
2019-12-5
发表于 2020-3-4 21:45:04 | 显示全部楼层 |阅读模式
易语言简单的限制软件到期时间源码
思路是获取北京时间.然后判断软件到期没有...从而限制使用时间.
只是供来学习的.真正的软件测试卡.天卡并不是这样实现的哦.
源码截图

截图202003042140071386..png


  1. .版本 2
  2. .支持库 script

  3. .程序集 窗口程序集_启动窗口
  4. .程序集变量 文本时间, 文本型
  5. .程序集变量 增加的时间, 日期时间型

  6. .子程序 __启动窗口_创建完毕



  7. .子程序 _时钟1_周期事件

  8. 时钟1.时钟周期 = 1000
  9. 脚本组件1.执行 (#js)
  10. 标签1.标题 = “当前北京时间:” + 脚本组件1.运行 (“showtime”, )


  11. .子程序 _按钮1_被单击

  12. 按钮1.禁止 = 真
  13. _启动窗口.标题 = “程序正常使用中”
  14. 编辑框1.禁止 = 真
  15. 脚本组件1.执行 (#js)
  16. 文本时间 = 脚本组件1.运行 (“showtime”, )
  17. 增加的时间 = 增减时间 (到时间 (文本时间), 8, 到数值 (编辑框1.内容))

  18. .子程序 _时钟2_周期事件
  19. .局部变量 判断时间, 文本型
  20. .局部变量 数字, 整数型

  21. 时钟2.时钟周期 = 1000
  22. 脚本组件1.执行 (#js)
  23. 判断时间 = 脚本组件1.运行 (“showtime”, )
  24. 数字 = 取时间间隔 (增加的时间, 到时间 (判断时间), 8)
  25. .如果 (数字 ≤ 0)
  26.     时钟2.销毁 ()
  27.     按钮2.销毁 ()
  28.     _启动窗口.标题 = “程序使用到期了”
  29.     返回 ()
  30. .否则
  31.     _启动窗口.标题 = “程序正常使用中”
  32. .如果结束


  33. .子程序 _按钮2_被单击

  34. 信息框 (“易语言学习吧www.eyy8.vip”, 0, , )

复制代码
源码下载:


简易时间到期源码.zip

58.31 KB, 下载次数: 40

售价: 2 易币  [记录]

12

主题

29

帖子

444

积分

易语言学徒

Rank: 3Rank: 3

积分
444
威望
0
易币
415
贡献
0
积分
444
UID
2149
在线时间
8 小时
注册时间
2020-3-3
发表于 2020-3-5 23:46:17 | 显示全部楼层
楼主发贴辛苦了,谢谢楼主分享!我觉得易语言吧是注册对了!
回复

使用道具 举报

0

主题

11

帖子

19

积分

初识易语言

Rank: 1

积分
19
威望
0
易币
8
贡献
0
积分
19
UID
2933
在线时间
1 小时
注册时间
2020-3-24
发表于 2020-4-12 16:22:57 | 显示全部楼层

这个帖子不回对不起自己!我想我是一天也不能离开易语言吧
回复

使用道具 举报

1

主题

9

帖子

73

积分

易语言菜鸟

Rank: 2

积分
73
威望
0
易币
64
贡献
0
积分
73
UID
1669
在线时间
7 小时
注册时间
2020-2-18
发表于 2020-4-13 15:37:24 | 显示全部楼层

感谢楼主的无私分享!要想易语言吧好 就靠你我他

脚本组件1.执行 (#js)
菜鸟一个,才学习没多长时间,这条看不懂,请问大哥什么意思?
回复

使用道具 举报

0

主题

13

帖子

27

积分

初识易语言

Rank: 1

积分
27
威望
0
易币
14
贡献
0
积分
27
UID
4027
在线时间
2 小时
注册时间
2020-4-16
发表于 2020-4-16 16:48:56 | 显示全部楼层

既然你诚信诚意的推荐了,那我就勉为其难的看看吧!易语言吧不走平凡路。
回复

使用道具 举报

0

主题

13

帖子

27

积分

初识易语言

Rank: 1

积分
27
威望
0
易币
14
贡献
0
积分
27
UID
4027
在线时间
2 小时
注册时间
2020-4-16
发表于 2020-4-16 17:22:08 | 显示全部楼层

这东西我收了!谢谢楼主!易语言吧真好!
回复

使用道具 举报

0

主题

10

帖子

13

积分

初识易语言

Rank: 1

积分
13
威望
0
易币
3
贡献
0
积分
13
UID
6228
在线时间
1 小时
注册时间
2020-5-20
发表于 2020-5-20 20:50:36 | 显示全部楼层
感谢楼主, 东西我收了!易语言吧真是好
回复

使用道具 举报

0

主题

8

帖子

29

积分

初识易语言

Rank: 1

积分
29
威望
0
易币
20
贡献
0
积分
29
UID
6438
在线时间
0 小时
注册时间
2020-5-29
发表于 2020-5-29 22:09:33 | 显示全部楼层
111111111111111111111111111
回复

使用道具 举报

0

主题

43

帖子

168

积分

易语言菜鸟

Rank: 2

积分
168
威望
0
易币
125
贡献
0
积分
168
UID
7339
在线时间
11 小时
注册时间
2020-7-12
发表于 2020-7-13 19:10:11 | 显示全部楼层
楼主发贴辛苦了,谢谢楼主分享!我觉得易语言吧是注册对了!
回复

使用道具 举报

0

主题

25

帖子

59

积分

易语言菜鸟

Rank: 2

积分
59
威望
0
易币
34
贡献
0
积分
59
UID
9506
在线时间
1 小时
注册时间
2020-10-6
发表于 2020-10-10 08:19:59 | 显示全部楼层
楼主发贴辛苦了,谢谢楼主分享!我觉得易语言吧是注册对了!
回复

使用道具 举报

懒得打字嘛,点击右侧快捷回复 【选择右侧内容,快速回复】
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

大漠插件注册码无须等1-3号

QQ|一:站内所有资源均来自互联网收集或用户上传分享,本站不拥有此类资源的版权。 作为网络服务提供者,对转载行为的发生不具备充分的监控能力。但是当版权拥有者提出侵权并出示充分的版权证明材料时,易语言吧负有移除转载作品以及停止继续传播的义务。在满足前款条件下采取移除等相应措施后不为此向原发布人承担违约责任,包括不承担因侵权不成立而给原发布人带来损害的赔偿责任。 用户免费分享产生,如果侵犯了你的权益,联系QQ:3066137757|Archiver|手机版|小黑屋|易语言吧

GMT+8, 2024-11-22 09:13 , Processed in 0.301137 second(s), 45 queries .

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表