vbs读取文件方法Function readfile(readfilepath)
- '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
vbs读取文件方法Function readfile(readfilepath)
- '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