用vbs实现读取文本文件的方法

vbs读取文件方法Function readfile(readfilepath)

1. 'On Error Resume Next  
2.     Set fs = CreateObject("Scripting.FileSystemObject")  
3.     Set file = fs.OpenTextFile(readfilepath, 1, false)  
4.     readfile=file.readall  
5.     file.close  
6.     set fs=nothing  
7. end Function