2024年3月31日发(作者：)
实例】读写.TXT文本内容(可用于小精灵读取参数)
处理文件用到的常量有：ForReading = 1 ，ForWriting=2,ForAppending=8,用于
的操作分别是读/写和追加，都要在使用之前用VBS Const来声明。常用于处理文本文件
的方法有：Read(var)—读var个字符，ReadLine—读一行，ReadAll—读整个文件内容，
SkipLine—跳过本行指向下一行，Write(var)—把字符串var写入文件，WriteLine(var)—
把字符串var和换行符写入文件，WriteBlankLines(n)—写入n个换行符。
下面给出几个利用VBScript访问外部文件的例子:
1.创建一个新的文本文件，如果文件已经存在则报告错误：
1. Rem 在当前盘根目录下创建"测试.txt"并写入一个字符串
2. VBS dim fso,file,filename
3. VBS filename="测试.txt"
4. VBS Const ForWriting=2
5. VBS Set fso=CreateObject("stemObject")
6. If ists(filename)=-1
7. VBSCall Call MessageBox("发现错误!!!文件已经存在!!!")
8. Goto over
9. EndIf
10. VBS Set file=TextFile(filename,Ture)
11. VBS ine("文件第一行,这是一个测试文件")
12. VBS
13. VBSCall Call MessageBox("测试文件创建成功!!!")
14. Rem over
15. EndScript
复制代码
2.强行写入文件覆盖原有内容：
1. Rem 往当前盘根目录下的文件"测试.txt"写入一个字符串,覆盖原有内容
2. VBS dim fso,file,filename
3. VBS filename="测试.txt"
发布者：admin，转转请注明出处：http://www.yc00.com/web/1711885757a1972083.html
评论列表（0条）