Firestorm » 02.05.2003 (Пт) 13:29
через fso textstream (подключи filesystemobject в меню project->preferences, называется microsoft scripting runtime):
'публикуем
Dim fso As New FileSystemObject
Dim txt As TextStream
'дальше ,например, на кнопку
Set txt = fso.OpenTextFile("путь к файлу", ForReading, False) 'открываем
msgbox txt.ReadLine 'дальше можем делать действия...
'думаю сам разберешся
txt.Close 'и закрываем напоследок
...просто гламурный падонак...
_________________
reborn! v.2
_________________