网站首页 > 脚本专栏 > 按键精灵相关 > 按键精灵Q语言 正文
帮助你将按键脚本源代码,按照论坛Discuz!语言进行重新格式编排,主要是对语法进行着色,使脚本代码看起来更好看。
1.演示了如何调用系统打开文件对话框,以及如何根据用户的选择,进行下一步的操作(如打开文件等)。
2.演示了在“按键精灵”中,VBScript语言与按键精灵语言是怎么紧密结合在一起工作的(在使用中,你如果不注意,根本体会不到是在使用VBS语言)。
3.演示了如何从头至尾,读取文件中的所有行,以及同时打开两个文件,从一个文件中读、往另外一个文件写操作。
4.演示如何从文件名获取文件的路径。
5.演示如何读写INI文件中脚本配置。
运行环境:分辨率:1440x900 色深:32位 操作系统:Windows XP 按键精灵版本:7.00.3730
@ahfxman, 风烈焰。 2006年9月
//变量定义 Dim objDialog, fso Dim fSourceName,fTargetname Dim sLine, s, stemp1,stemp2 Dim LineLenOld, LineLenNew Dim MyArray, i1, i, s1 Dim DirPath //变量初始化 ForReading = 1:ForWriting = 2:ForAppending=8 remColor="Green" explainColor="Blue" IniFileName="c:\path.ini" //============== 主程序 =============== Gosub 读取路径 Gosub 打开文件 Rem 结束 MessageBox "程序结束, 谢谢使用" EndScript //============== 子程序 =============== Sub 打开文件 Set objDialog = CreateObject("UserAccounts.CommonDialog") objDialog.Filter = "脚本文件|*.txt" objDialog.InitialDir = DirPath intResult = objDialog.ShowOpen If intResult <> 0 Gosub 保存路径 Gosub 改名 Gosub 格式编辑 Else Goto 结束 EndIf Return 打开文件 Sub 保存路径 sTemp2 = objDialog.FileName MyArray = Split(sTemp2,"\",-1,1) i = UBound(MyArray) i1 = 1 s1 = MyArray(0) While i1<i s1 = s1 & "\" & MyArray(i1) i1 = i1+1 EndWhile s1 = s1 & "\" Plugin File.WriteINI("setup","路径",s1,IniFileName) Return 保存路径 Sub 读取路径 DirPath = "c:\" Plugin DirPath = File.ReadINI("setup","路径",IniFileName) Return 读取路径 Sub 改名 fSourceName = objDialog.FileName fTargetName = Replace(fSourceName,".txt",".ini") Return 改名 Sub 格式编辑 Set fso = CreateObject("Scripting.FileSystemObject") Set fSource = fso.OpenTextFile(fSourceName, ForReading, True) Set fTarget = fso.OpenTextFile(fTargetName, ForWriting, True) While fSource.AtEndOfStream<>true sLine = fSource.ReadLine() lineLenOld = Len(sLine) s=Trim(sLine) lineLenNew = Len(s) sTemp1 = Left(s,2) sTemp2 = Right(s,Len(s)-2) If s="[General]" s="[color=" & explainColor & "]" & s ElseIf s="[Script]" s="[/color][color=" & explainColor & "]" & s & "[/color]" ElseIf sTemp1="//" s="[color=" & remColor & "]" &s &"[/color]" Else EndIf s = Space(lineLenOld-lineLenNew) & s fTarget.WriteLine(s) EndWhile fSource.Close fTarget.Close VBSCall RunApp(fTargetName) Return 格式编辑
- 上一篇: 按键精灵打开"百度"搜索的例子源码
- 下一篇: 按键精灵破解网页右键限制脚本源码
猜你喜欢
- 2019-03-19 按键精灵钓鱼脚本源码
- 2019-03-16 按键精灵脚本源码 巨人拉车
- 2019-03-15 按键精灵脚本源码 开心宝贝后台跳绳
- 2019-03-14 按键精灵脚本源码 剑侠情缘-以五行找金
- 2019-03-11 按键精灵开心ol前台打怪脚本源码
- 2019-03-10 按键精灵脚本源码 《龙之刃》自动遇敌左右按键
- 2019-03-09 按键精灵女弓挂精灵脚本源码
- 2019-03-08 按键精灵小号桃源挖矿脚本源码
- 2019-01-25 按键精灵简单技能训练源码
- 2019-01-14 按键精灵单纯挖矿脚本源码
你 发表评论:
欢迎- 百度站内搜索
- 关注微信公众号
- 网站分类
-
- 网站公告
- 电子书书籍
- 程序员工具箱
- 编程工具
- 易语言相关
- 网络相关源码
- 图形图像源码
- 系统工具源码
- 易语言模块源码
- 易语言支持库
- 数据库类源码
- 易语言例程
- 易语言游戏开发
- 易语言模块
- 多媒体类源码
- 易语言资源网
- 易语言视频教程
- JS分析教程
- 易语言图文教程
- 易语言常见问题及笔记
- 工具源码
- 易语言版本
- 网络编程
- javascript
- PHP编程
- html
- 正则表达式
- 面试题
- nodejs
- 其它综合
- 脚本专栏
- python
- 按键精灵相关
- 按键精灵图文教程
- 按键精灵视频教程
- 按键精灵Q语言
- 按键精灵安卓版
- golang
- 游戏安全
- 火山相关
- 火山安卓软件
- 火山常见问题及笔记
- 火山安卓源码
- 火山视频教程
- 火山PC版本下载
- 火山PC视窗例程
- 互联网那些事
- 引流推广
- 项目揭秘
- 网络营销
- 营销软件
- QQ营销软件
- 娱乐软件
- 机器人插件
- 培训教程
- 技术教程
- 活动线报
- 数据库
- Redis
- Access
- MongoDB
- Mysql
- 问答
- 其它
- 易语言
- 需求
- 在线教程
- 多线程培训班
- 觅风易语言教程
- 模拟系列教程
- 集中营易语言教程
- 历史数据
- 随机tag
已有27位网友发表了看法:
易语言源码下载 评论于 [2019-04-06 18:18:44] 回复
发的脚本源码怎么用
资源网 评论于 [2019-05-28 17:23:21] 回复
按键精灵论坛源码
自学网 评论于 [2019-05-30 15:12:16] 回复
拼多多按键精灵脚本
易语言教程站 评论于 [2019-07-04 14:54:43] 回复
按键精灵脚本论坛
易语言教程站 评论于 [2019-07-19 09:26:13] 回复
按键精灵脚本格式
易语言教程站 评论于 [2019-07-21 09:47:37] 回复
按键精灵.Q格式脚本
易语言TV 评论于 [2019-08-17 18:06:59] 回复
按键精灵源码论坛
易语言例子 评论于 [2019-08-26 14:44:23] 回复
按键精灵 ForReading
易语言核心库 评论于 [2019-10-05 23:33:12] 回复
按键精灵脚本论坛
易语言教程站 评论于 [2019-10-31 22:12:25] 回复
按键精灵脚本论坛
易语言教程 评论于 [2019-12-06 23:53:12] 回复
按键精灵论坛
易语言例子 评论于 [2020-02-01 00:33:20] 回复
按键精灵脚本代码大全
易语言教程 评论于 [2020-02-07 22:18:21] 回复
按键精灵脚本论坛
易语言例程 评论于 [2020-03-03 00:30:36] 回复
按键精灵弹琴脚本源码
易语言例程 评论于 [2020-03-03 00:31:43] 回复
按键精灵脚本源码
现行程序 评论于 [2020-03-13 12:06:19] 回复
按键精灵拼多多脚本
目的代码 评论于 [2020-03-19 12:45:18] 回复
按键精灵脚本代码大全
程序代码 评论于 [2020-03-23 10:24:42] 回复
按键精灵脚本论坛
程序代码 评论于 [2020-03-23 10:27:18] 回复
按键精灵脚本源码
易语言 评论于 [2020-04-17 21:06:28] 回复
q语言传奇脚本
易语言 评论于 [2020-04-25 12:43:10] 回复
按键精灵脚本代码大全
易语言 评论于 [2020-05-09 13:59:44] 回复
按键精灵代码格式化
部分代码 评论于 [2020-05-28 14:56:10] 回复
按键精灵拼多多脚本
易语言 评论于 [2020-05-28 17:26:05] 回复
脚本源码怎么用
易语言 评论于 [2020-06-05 20:51:38] 回复
按键精灵脚本帮助文档
易语言教程 评论于 [2020-09-15 00:57:01] 回复
按键精灵论坛
易语言资源 评论于 [2021-12-30 22:49:44] 回复
按键精灵代码自动排版