Ошибка при попытке открыть csv с помощью FileSystemObject: код работает и ничего не делает

Question

У меня есть следующий код для открытия файла:

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\30. RFSectorial\RF Sectorial 2018-05\QryCECARFSECTORIAL0239_EVO1_PRO_20180508205535.csv")


End Sub

Я ожидал, что откроется файл, указанный в функции Obj.Opentextifle(), но код запускается и ничего не делает.

Может ли кто-нибудь объяснить мне, если я неправильно понимаю, как FileSystemObject работает?

Заранее спасибо

Answer 1

WB теперь является объектом TextStream. Вы можете делать вещи с этим как

Debug.print(WB.ReadAll())

Это напечатает все файлы в консоли.

Как написано, ваш код открывает файл и больше ничего, поскольку вы не просите его делать что-либо еще. Подробнее здесь о методе, который вы используете.