Модераторы: Akina
  

Поиск:

Закрытая темаСоздание новой темы Создание опроса
> Выбор записей из таблицы Access 
:(
    Опции темы
DDT
Дата 16.2.2004, 11:37 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 34
Регистрация: 16.2.2004

Репутация: нет
Всего: нет



Есть БД access 2002. Нужно экспортировать таблицу в текстовый файл-дамп для последующей загрузки на сервер.

В БД создаю модуль с функцией экспорта, которую планирую запускать из формы.

Вопрос:
как в этом модуле можно открыть таблицу и все ее записи переписать поочередно в текстовый файл?
PM MAIL   Вверх
AntonSaburov
Дата 16.2.2004, 15:36 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Штурман
****


Профиль
Группа: Модератор
Сообщений: 5658
Регистрация: 2.7.2002
Где: Санкт-Петербург

Репутация: нет
Всего: 118



Запустить цикл и вытаскивать построчно. Открыть файл и писать.
PM MAIL WWW ICQ   Вверх
Unregistered
Дата 17.2.2004, 07:21 (ссылка)    |    (голосов: 0) Загрузка ... Загрузка ... Быстрая цитата Цитата


Unregistered











Слушай, ты всегда такие советы даешь? А? smile.gif
Ясен пень, что в цикле !!!

_КАК_ из таблицы прочитать строку. Уж как записать ее файл я знаю. :\


Какими операторами confused.gif smile.gif
  Вверх
shilnik
Дата 17.2.2004, 07:57 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 377
Регистрация: 22.12.2003

Репутация: 1
Всего: 1



Создаешь recordset

dim rs as recordset

set rs currentdb.openrecordset("имя таблицы")

и проходишь по всему рекордсету

rs.MoveFirst
While not rs.EOF
...
rs.MoveNext
Wend


--------------------
каталог товаров qp1
PM MAIL WWW   Вверх
DDT
Дата 17.2.2004, 11:34 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 34
Регистрация: 16.2.2004

Репутация: нет
Всего: нет



set rs currentdb.openrecordset("имя таблицы")

На это он ругается: ошибка синтаксиса.
PM MAIL   Вверх
AntonSaburov
Дата 17.2.2004, 12:31 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Штурман
****


Профиль
Группа: Модератор
Сообщений: 5658
Регистрация: 2.7.2002
Где: Санкт-Петербург

Репутация: нет
Всего: 118



Set rs = CurrentDb.OpenRecordset("ASSA")

rs.MoveFirst
While Not rs.EOF
rs.MoveNext
Wend

PM MAIL WWW ICQ   Вверх
shilnik
Дата 17.2.2004, 12:58 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 377
Регистрация: 22.12.2003

Репутация: 1
Всего: 1



Да, I'm sorry, описался


--------------------
каталог товаров qp1
PM MAIL WWW   Вверх
nicka
Дата 17.2.2004, 14:49 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 378
Регистрация: 11.6.2003

Репутация: нет
Всего: 1



Извините, а как записать в файлconfused.gif
PM MAIL   Вверх
  
Закрытая темаСоздание новой темы Создание опроса
Правила форума "MS Access"
Akina
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • Используйте теги [code=vb][/code] и [code=sql][/code] для подсветки кода. Используйтe чекбокс "транслит" (возле кнопок кодов) если у Вас нет русских шрифтов.

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Akina.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | MS Access | Следующая тема »


 




[ Время генерации скрипта: 0.0495 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.