'On Error Resume Next
Set fs = CreateObject("Scripting.FileSystemObject")
Set file = fs.OpenTextFile(readfilepath, 1, false)
readfile=file.readall
file.close
set fs=nothing
end Function
以上就是【用VBScript实现读取文本文件的方法】的全部内容了,欢迎留言评论进行交流!
'On Error Resume Next
Set fs = CreateObject("Scripting.FileSystemObject")
Set file = fs.OpenTextFile(readfilepath, 1, false)
readfile=file.readall
file.close
set fs=nothing
end Function