Перенос большого количества данных из таблицы в текстовый документ

@sn_88 · Регистрация: 21.06.2011

Студворк — интернет-сервис помощи студентам

День добрый!

Подскажите, пожалуйста, как программно создать текстовый файл с данными из таблицы в определенной папке с определенным именем (в таблице больше 100000 строк). Вариант с экспортом не подходит, т. к. нужно нажимать некоторое количество кнопок.

Спасибо.

@Maxess · 23.08.2011, 18:50

Здравствуйте,

Можно так:
создайте где вам необходимо пустой текстовой файл и на кнопку повесьте код:

Visual Basic
1
DoCmd.OutputTo acOutputTable, "имя вашей таблицы", acFormatTXT, "путь к вашему файлу", True

@sn_88 · 24.08.2011, 17:07 **[ТС]**

В том то и дело что позволяет копировать данная команда около 65000, а больше - нет.

shanemac51 · 24.08.2011, 17:13

Сообщение от sn_88

В том то и дело что позволяет копировать данная команда около 65000, а больше - нет.

модуль 15-20 строк для формирования текстового файла

необходимо знать
-порядок полей
-разделитель
-требуемую кодировку(желательно 1251,с другими дополнительные хлопоты)
-можно контролировать на нежелательные символы в инфе(разделитель,кавычки)

@sn_88 · 24.08.2011, 17:14 **[ТС]**

Screen's

@sn_88 · 24.08.2011, 17:17 **[ТС]**

Сообщение от shanemac51

модуль 15-20 строк для формирования текстового файла

необходимо знать
-порядок полей
-разделитель
-требуемую кодировку(желательно 1251,с другими дополнительные хлопоты)
-можно контролировать на нежелательные символы в инфе(разделитель,кавычки)

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

shanemac51 · 24.08.2011, 17:23

Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Sub a110824_1717()
'' подгоните под ваши имена
Dim s1
Dim rst As DAO.Recordset
s1 = "select код as kd from fw1"
Open "c:\rab\a110824.txt" For Output As #1
Set rst = CurrentDb.OpenRecordset(s1)
Do While rst.EOF = False
Print #1, rst!kd
rst.MoveNext
Loop
rst.Close
Set rst = Nothing
Reset
End Sub

@sn_88 · 24.08.2011, 17:48 **[ТС]**

Спасибо большое. То, что нужно!

@ironegg · 24.08.2011, 17:51

еще такие варианты попробуйте http://social.msdn.microsoft.c... 7656970704

Новые блоги и статьи Все статьи Все блоги /
Семь CDC на одном интерфейсе: 5 U[S]ARTов, 1 CAN и 1 SSI Eddy_Em 18.02.2026 Постепенно допиливаю свою "многоинтерфейсную плату". Выглядит вот так: https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11617&stc=1&d=1771445347 Основана на STM32F303RBT6. На борту пять. . .	Символьное дифференцирование igorrr37 13.02.2026 / * Программа принимает математическое выражение в виде строки и выдаёт его производную в виде строки и вычисляет значение производной при заданном х Логарифм записывается как: (x-2)log(x^2+2) -. . .	Камера Toupcam IUA500KMA Eddy_Em 12.02.2026 Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .	И ясному Солнцу zbw 12.02.2026 И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.
«Знание-Сила» zbw 12.02.2026 «Знание-Сила» «Время-Деньги» «Деньги -Пуля»	SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров 8Observer8 12.02.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .	SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 11.02.2026 Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .	SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL3_image 8Observer8 10.02.2026 Содержание блога Библиотека SDL3_image содержит инструменты для расширенной работы с изображениями. Пошагово создадим проект для загрузки изображения формата PNG с альфа-каналом (с прозрачным. . .

@sn_88 65 / 65 / 4 Регистрация: 21.06.2011 Сообщений: 166

	Перенос большого количества данных из таблицы в текстовый документ 23.08.2011, 15:41. Показов 1640. Ответов 8 Метки нет (Все метки) День добрый! Подскажите, пожалуйста, как программно создать текстовый файл с данными из таблицы в определенной папке с определенным именем (в таблице больше 100000 строк). Вариант с экспортом не подходит, т. к. нужно нажимать некоторое количество кнопок. Спасибо. 0

@sn_88 65 / 65 / 4 Регистрация: 21.06.2011 Сообщений: 166
	24.08.2011, 17:07 [ТС]
	В том то и дело что позволяет копировать данная команда около 65000, а больше - нет. 0

@sn_88 65 / 65 / 4 Регистрация: 21.06.2011 Сообщений: 166
	24.08.2011, 17:14 [ТС]
	Screen's Миниатюры 0

@sn_88 65 / 65 / 4 Регистрация: 21.06.2011 Сообщений: 166
	24.08.2011, 17:48 [ТС]
	Спасибо большое. То, что нужно! 0

@ironegg 1905 / 782 / 31 Регистрация: 11.02.2010 Сообщений: 1,567
	24.08.2011, 17:51
	еще такие варианты попробуйте http://social.msdn.microsoft.c... 7656970704 0