尝试使用 FileSystemObject 打开 csv 时出错:代码运行但不执行任何操作
Error trying to open a csv using FileSystemObject: code runs and does nothing
我有以下打开文件的代码:
Sub prueba3()
Dim Obj As Object
Dim WB As Object
Set Obj = CreateObject("Scripting.filesystemobject")
Set WB = Obj.OpenTextFile("V:\evfilesce9i9\apps9\vbe9\dep4\KFTP\KFTP001D_FicherosCeca. RFSectorial\RF Sectorial 2018-05\QryCECARFSECTORIAL0239_EVO1_PRO_20180508205535.csv")
End Sub
我原本希望打开 Obj.Opentextifle()
函数中指定的文件,但代码运行却什么也没做。
如果我误解了 FileSystemObject
的工作原理,谁能帮我解释一下?
提前致谢
WB
现在是一个 TextStream 对象。你可以用它做一些事情
Debug.print(WB.ReadAll())
这会将文件中的所有内容打印到控制台。
如您所写,您的代码将打开文件,然后仅此而已,因为您不要求它执行任何其他操作。更多 here 关于您正在使用的方法。
我有以下打开文件的代码:
Sub prueba3()
Dim Obj As Object
Dim WB As Object
Set Obj = CreateObject("Scripting.filesystemobject")
Set WB = Obj.OpenTextFile("V:\evfilesce9i9\apps9\vbe9\dep4\KFTP\KFTP001D_FicherosCeca. RFSectorial\RF Sectorial 2018-05\QryCECARFSECTORIAL0239_EVO1_PRO_20180508205535.csv")
End Sub
我原本希望打开 Obj.Opentextifle()
函数中指定的文件,但代码运行却什么也没做。
如果我误解了 FileSystemObject
的工作原理,谁能帮我解释一下?
提前致谢
WB
现在是一个 TextStream 对象。你可以用它做一些事情
Debug.print(WB.ReadAll())
这会将文件中的所有内容打印到控制台。
如您所写,您的代码将打开文件,然后仅此而已,因为您不要求它执行任何其他操作。更多 here 关于您正在使用的方法。