要求逐行读取一个txt文件，内容如下：
001RMBHQ00 387420000927
002RMBZZ12 643420050531
希望大侠帮忙。。。
------解决方案--------------------------------------------------------
- VBScript code
On Error Resume Next strFileName = "D:\a.xml"Set oFSO = CreateObject("Scripting.FileSystemObject")Set oFile = oFSO.OpenTextFile(strFileName) If Err Then WScript.Echo Err.Number & vbCrLf & Err.Description Err.Clear WScript.Quit End If Do Until oFile.AtEndOfLine WScript.Echo oFile.ReadLine Loop