Как я могу скопировать и вставить в файл, используя VBA и Access 97? - PullRequest
0 голосов
/ 16 августа 2011

Мне наконец-то удалось подключить VBA и telnet-подобный терминал. Теперь мне нужно скопировать некоторые экраны в файлы TXT. Проблема в том, что я не могу использовать код дополнения к файлу:

Dim inputString As String = "This is a test string."
My.Computer.FileSystem.WriteAllText _
("C://testfile.txt", inputString, True)

Это просто не работает на VBA с Access 97 - каждый раз, когда я сбрасываю код, который он запрашивает = или а), и это просто не имеет никакого смысла.

Я знаю, что можно отправить значения в таблицу и затем экспортировать их в виде файла TXT, вот как я сейчас и поступаю:

rsttbl1!line01 = .copy(5, 38, 43)
rsttbl1!line02 = .copy(6, 38, 43)
rsttbl1!line03 = .copy(7, 38, 43)
rsttbl1!line04 = .copy(8, 38, 43)
rsttbl1!line05 = .copy(9, 38, 43)

Но это слишком много времени. Я почти уверен, что это возможно, но я не могу найти ссылку на это. И все, что я могу найти @ microsoft.com, похоже, не работает.

1 Ответ

1 голос
/ 17 августа 2011

Я немного запутался, вы цитируете функцию .NET и говорите о VBA для Access '97.

Однако в .NET добавить файл:

Imports System.IO 'Add to Imports section, can call it explicit if you'd like. System.IO.StreamWriter

    Dim writer As New StreamWriter("C:\test.txt", True)
    writer.WriteLine("Testing...")
    writer.Close()

Как и в случае Classic VBA:

Open "C:\test.txt" For Append As #1
    Print #1, "Testing..."
Close #1
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...