按键精灵安卓版基础课程第12课-给脚本添加使用期限(体验版)

-回复 -浏览
楼主 2021-02-21 08:13:40
举报 只看此人 收藏本贴 楼主


更多内容可以查看之前发布的文章教程。

QQ交流群:78237147

群内有【高清】视频教程

我的微信:xiaomu86119


本期课程中的脚本代码:


Dim i

i = Time()

TracePrint i


//Call File.Write("/sdcard/MobileAnjian/anjian.txt","我爱按键精灵")

//

//Dim 返回值

//返回值=File.Read("/sdcard/MobileAnjian/anjian.txt")

//TracePrint 返回值



Dim j

j = File.Read("/sdcard/MobileAnjian/13.txt")

TracePrint j


If j = null Then 

Call File.Write("/sdcard/MobileAnjian/13.txt",i)

End If


j = File.Read("/sdcard/MobileAnjian/13.txt")

TracePrint j

TracePrint i-j

If i - j < 20 Then 

TracePrint "您的脚本可以正常试用"

Call 子程序()

Else 

TracePrint "您的脚本已经过期"

ShowMessage "您的脚本已经过期"

Delay 5000

End If


Sub 子程序()

//我们脚本具体内容

End Sub


我要推荐
转发到