vbs文件操作

原创

长路Java 2021-09-03 14:28:18 ©著作权

文章标签 其他 desktop 文件属性字符串 IT 文章分类 代码人生

©著作权归作者所有：来自51CTO博客作者长路Java的原创作品，请联系作者获取转载授权，否则将追究法律责任

1.查看文件属性和读取
2.利用指针指向是否指向文件末尾，不断偏移指针
3.在文件中跳过
4.在文件中写入
———————————————————————————————————
创建时，1 读入 2 写入 8追加
查看文件属性和读取
read，readline，readall

set fso = wscript.createobject("scripting.filesystemobject")   '创建下面两个对象
set ffile = fso.opentextfile("C:\Users\93997\Desktop\vbs练习\123456.txt",1,true) '1 读入 2 写入 8追加
value =  ffile.read(20)   '读取20个字符
'line = ffile.readline	    '读取一行
'contents = ffile.readall	'读取所有
msgbox value

利用指针指向是否指向文件末尾，不断偏移指针
ffile.atendofstream

set fso = wscript.createobject("scripting.filesystemobject")
set ffile = fso.opentextfile("C:\Users\93997\Desktop\vbs练习\123456.txt",1,true)
do while ffile.atendofstream<>true		'atendonfstream 判断指针是否指到文件末尾利用循环读出所有信息
ffile.read(10)  
loop

在文件中跳过
skip,skipline

set fso = wscript.createobject("scripting.filesystemobject")
set ffile = fso.opentextfile("C:\Users\93997\Desktop\vbs练习\123456.txt",1,true)
ffile.skip(3)		'跳过几个字符
ffile.skipline     '跳过一行

在文件中写入
write(x)：写入字符串
writeline(x)：写入字符串那一行进去，然后另起一行
writeblankline(n)：写入n行空行

set fso = wscript.createobject("scripting.filesystemobject")
set ffile = fso.opentextfile("C:\Users\93997\Desktop\vbs练习\123456.txt",2,true)
a = "66666"
ffile.writeline(a)
ffile.writeblanklines(2)
ffile.write(a)
msgbox "写入成功"
ffile.close()   '关闭文件