All Forums
 Категория Visio
 Форум Вопросы и ответы
 экспорт в .txt
Author Previous Topic Topic Next Topic  

Евгений

88 Posts
Posted - 02/17/2005 :  16:37:03
Надо записать данные, вытянутые из документа, в текстовый файл. Чем это делается?

Евгений

88 Posts
Posted - 02/17/2005 :  19:28:27
Нашел. Работать с файлами можно обычными средствами VBA:
Dim F1 as Integer
F1 = FreeFile
Open "C:/somefile.txt" For Output As F1
Print #F1, "first line"
Print #F1, "second line"
Close F1
Go to Top of Page

Tumanov

Russia
1198 Posts
Posted - 02/17/2005 :  20:09:05
Мне больше нравится FileSystemObject
Типа
Set fs = CreateObject("FileSystemObject")
Set fil = fs.CreateTextFile("c:\Myfile.txt",True)
fil.Write s
fil.Close
Set fs = Nothing
Go to Top of Page
  Previous Topic Topic Next Topic  
Данный сайт является архивом форума visio.artberg.ru, который был закрыт в связи с переходом на новую платформу visio.getbb.ru
Все материалы доступны только для чтения! Если у вас появились вопросы, или вы хотите что-то обсудить, связанное с Visio, обращайтесь на новый форум!
Архив был создан благодаря совместным усилиям Генадия Туманова @Tumanov (visio.artberg.ru), Александра ака @Surrogate (visio.getbb.ru), и Николая Белых @nbelyh (unmanagedvisio.com)