【NO.0029】另类的脚本执行器【 正在进行 】

1554057597

这个挺有意思的！

www1760462

回复一下骗点分分

a278401627

来学习一下

a87399

支持支持啊！

超强chain

知道什么意思  但是还不会做

xjzggzg

回复 9# zjlikeyu
不赖啊！

xjzggzg

看看哈！不错！顶起！

46316447

作业.zip (1.88 KB, 下载次数: 6)

2011-2-7 18:08 上传

点击文件名下载附件
无
下载积分: 精币 -2 枚

1. .版本 2
   
2. .支持库 edroptarget
   
3. .支持库 PBShell
   
4. 
   
5. .程序集 窗口程序集1
   
6. 
   
7. .子程序 __启动窗口_创建完毕
   
8. 
   
9. 拖放对象1.接收文件 ＝ 真
   
10. 拖放对象1.注册拖放控件 (取窗口句柄 ())
    
11. 
    
12. .子程序 _按钮1_被单击
    
13. 
    
14. 通用对话框1.过滤器 ＝ “脚本文件（*.txt）|*.txt”
    
15. 通用对话框1.打开 ()
    
16. 编辑框1.内容 ＝ 通用对话框1.文件名
    
17. 
    
18. .子程序 _拖放对象1_得到文件
    
19. .参数 接收到的文件路径, 文本型
    
20. 
    
21. 编辑框1.内容 ＝ 接收到的文件路径
    
22. 
    
23. .子程序 执行脚本
    
24. .局部变量 脚本, 文本型, , "0"
    
25. .局部变量 次数, 整数型
    
26. 
    
27. 脚本 ＝ 分割文本 (到文本 (读入文件 (编辑框1.内容)), #换行符, )
    
28. 编辑框2.内容 ＝ 到文本 (读入文件 (编辑框1.内容))
    
29. .计次循环首 (取数组成员数 (脚本), 次数)
    
30.     .判断开始 (脚本 [次数] ＝ “关机 ()”)
    
31.         关闭系统 (#关机, 真)
    
32.         输出 ()
    
33.     .判断 (脚本 [次数] ＝ “重启 ()”)
    
34.         关闭系统 (#重启, 真)
    
35.         输出 ()
    
36.     .判断 (脚本 [次数] ＝ “休眠 ()”)
    
37.         关闭系统 (#休眠, 真)
    
38.         输出 ()
    
39.     .判断 (脚本 [次数] ＝ “取现行时间 ()”)
    
40.         信息框 (到文本 (取现行时间 ()), 64, 标题)
    
41.         输出 ()
    
42.     .默认
    
43.         编辑框3.加入文本 (“[” ＋ 取现行时间 () ＋ “]” ＋ “执行脚本失败！” ＋ #换行符)
    
44.     .判断结束
    
45. 
    
46. .计次循环尾 ()
    
47. 
    
48. .子程序 输出
    
49. 
    
50. 编辑框3.加入文本 (“[” ＋ 取现行时间 () ＋ “]” ＋ “执行脚本成功！” ＋ #换行符)
    

复制代码

{:3_240:} 可以吗？

寂寞小生

拿走看看怎么样

流年

想学习，做做看吧。