Форум программистов, компьютерный форум, киберфорум
Delphi: Базы данных
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.64/11: Рейтинг темы: голосов - 11, средняя оценка - 4.64
 Аватар для Programmer1993
44 / 24 / 1
Регистрация: 22.05.2012
Сообщений: 669
MS Access

Результат работы SQL-запроса записать в файл

27.05.2014, 13:53. Показов 2159. Ответов 15
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
подскажите как результат sql запроса записать в файл через делфи
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
27.05.2014, 13:53
Ответы с готовыми решениями:

Записать результат SQL-запроса в файл
Здравствуйте уважаемые знатоки. Подскажите как присвоить переменной результат sql-запроса и записать его в файл. Делаю так: ...

Записать результат SQL запроса в переменную
Всем привет. Такой вопрос. К примеру Есть 2 таблицы в БД vks Таблица people |name| org | ------------ |boss | orp |

Как записать результат SQL-запроса в массив
Доброго времени суток уважаемые !! Подскажите пожалуйста как засунуть результат SQL запроса в массив в VBA работал через Recordset а...

15
 Аватар для Programmer1993
44 / 24 / 1
Регистрация: 22.05.2012
Сообщений: 669
01.07.2014, 11:28  [ТС]
Здравствуйте .... Есть база данных, нужно что бы результат sql запроса записывать в файл.... Я умею записывать только таблицу вот таким способом
Delphi
1
2
3
4
5
form15.ADOQuery1.SQL.Clear;
 form15.ADOQuery1.SQL.Add('SELECT Отчет.* FROM Отчет');
 form15.ADOQuery1.Active:=True;
 form15.quickrep1.ExportToFilter(TQRAsciiExportFilter.Create('1.txt'));
 form15.Close;
А как организовать чтобы результат sql запроса выводился в файл и не перезаписывался все время как у меня а ДОЗАПИСЫВАЛСЯ

Добавлено через 12 часов 29 минут
Лююююди
0
4217 / 3059 / 583
Регистрация: 21.01.2011
Сообщений: 13,203
01.07.2014, 11:57
Вообще-то в Delphi есть стандартный способ работы с файлами (и чтение, и запись) без всяких компонент типа quikrep. Ищи в Help-е команду AssignFile
0
 Аватар для Programmer1993
44 / 24 / 1
Регистрация: 22.05.2012
Сообщений: 669
01.07.2014, 13:05  [ТС]
Grossmeister, а без quikrep не получится результат запроса как либо вивести.... Вернее как то нще можно, но assignfil тут не помошник
0
4217 / 3059 / 583
Регистрация: 21.01.2011
Сообщений: 13,203
01.07.2014, 13:10
Цитата Сообщение от Programmer1993 Посмотреть сообщение
без quikrep не получится результат запроса как либо вивести
Это еще почему? Идешь в цикле по результату Query (по DataSet), формируешь строку как тебе угодно и пишешь в файл.
0
 Аватар для Programmer1993
44 / 24 / 1
Регистрация: 22.05.2012
Сообщений: 669
01.07.2014, 13:20  [ТС]
Grossmeister, там таблица должна формароваться как это по циклу
0
пофигист широкого профиля
4769 / 3204 / 862
Регистрация: 15.07.2013
Сообщений: 18,612
01.07.2014, 13:22
Цитата Сообщение от Programmer1993 Посмотреть сообщение
там таблица должна формароваться
Где там?
0
 Аватар для Programmer1993
44 / 24 / 1
Регистрация: 22.05.2012
Сообщений: 669
01.07.2014, 13:49  [ТС]
northener, там это по результату sql запроса
0
пофигист широкого профиля
4769 / 3204 / 862
Регистрация: 15.07.2013
Сообщений: 18,612
01.07.2014, 14:06
Я спрашивал где, а не как.
0
 Аватар для Programmer1993
44 / 24 / 1
Регистрация: 22.05.2012
Сообщений: 669
01.07.2014, 14:21  [ТС]
В памяти
0
пофигист широкого профиля
4769 / 3204 / 862
Регистрация: 15.07.2013
Сообщений: 18,612
01.07.2014, 14:33
Ну так результат запроса это и есть таблица в памяти. Пройдись в цикле по её строками (записям набора данных полученного в результате запроса) и записывай их в файл.
1
 Аватар для Programmer1993
44 / 24 / 1
Регистрация: 22.05.2012
Сообщений: 669
01.07.2014, 14:34  [ТС]
Знать бы как
0
пофигист широкого профиля
4769 / 3204 / 862
Регистрация: 15.07.2013
Сообщений: 18,612
01.07.2014, 14:41
Delphi
1
2
3
4
5
6
with MyQuery do begin
  First;
  while not Eof do begin 
      ....
      Next;
  end;
1
 Аватар для Programmer1993
44 / 24 / 1
Регистрация: 22.05.2012
Сообщений: 669
01.07.2014, 14:43  [ТС]
А заместо точек типо запрос
0
4217 / 3059 / 583
Регистрация: 21.01.2011
Сообщений: 13,203
01.07.2014, 14:55
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
   OracleDS: TOracleDataSet;
 
   { здесь наполняем DataSet результатами запроса}
   with OracleDS do begin
      Active:= False;
      SQL.Clear;
      SQL.Add('SELECT * FROM ' + TableName);
      Active:=True;
   end;
 
   { здесь бежим по полученным строкам и делаем из них то, что нужно}
   with OracleDS do begin
     First;
 
     while not Eof do begin
       
       { в моей программе здесь формирование INSERT для вставки в базу MySQL }
 
       { в твоей здесь будет формирование строки и запись ее в файл }
 
       Next;
     end;
   end;
0
пофигист широкого профиля
4769 / 3204 / 862
Регистрация: 15.07.2013
Сообщений: 18,612
01.07.2014, 15:00
Цитата Сообщение от Programmer1993 Посмотреть сообщение
А заместо точек
Не запрос, а его результаты (поля) TDataSet.Fields
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
01.07.2014, 15:00
Помогаю со студенческими работами здесь

Записать результат запроса в файл
Добрый день! Подскажите новичку, как сделать, чтоб запрос записывался в файл? Вот смотрите у меня есть на сайт на нем у меня форма поиска и...

Как записать в файл результат запроса
Добрый день. Подскажите пожалуйста, как записать в файл результат запроса using System; using System.Collections.Generic; using...

Записать в файл результат работы функции
Можно ли вообще след. программу записать в файл ? Для этой проги ничего на форуме не нашел, а что нашел, не подходит особо ( ...

Записать результат работы программы в текстовый файл
uses crt; const max=30; type TStud=record fam:string; oc:arrayof byte; sr:real; ...

Записать результат работы утилиты netsh в файл
В общем не могу результат в файл отправить. Вот пишу: Dim pr as process = process.start("netsh", "wlan show interfaces...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
16
Ответ Создать тему
Новые блоги и статьи
Модульная разработка через nuget packages
DevAlt 07.03.2026
Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .
Модульный подход на примере F#
DevAlt 06.03.2026
В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .
Управление камерой с помощью скрипта OrbitControls.js на Three.js: Вращение, зум и панорамирование
8Observer8 05.03.2026
Содержание блога Финальная демка в браузере работает на Desktop и мобильных браузерах. Итоговый код: orbit-controls-threejs-js. zip. Сканируйте QR-код на мобильном. Вращайте камеру одним пальцем,. . .
SDL3 для Web (WebAssembly): Синхронизация спрайтов SDL3 и тел Box2D
8Observer8 04.03.2026
Содержание блога Финальная демка в браузере. Итоговый код: finish-sync-physics-sprites-sdl3-c. zip На первой гифке отладочные линии отключены, а на второй включены:. . .
SDL3 для Web (WebAssembly): Идентификация объектов на Box2D v3 - использование userData и событий коллизий
8Observer8 02.03.2026
Содержание блога Финальная демка в браузере. Итоговый код: finish-collision-events-sdl3-c. zip Сканируйте QR-код на мобильном и вы увидите, что появится джойстик для управления главным героем. . . .
Реалии
Hrethgir 01.03.2026
Нет, я не закончил до сих пор симулятор. Эта задача сложнее. Не получилось уйти в плавсостав, но оно и к лучшему, возможно. Точнее получалось - но сварщиком в палубную команду, а это значит, в моём. . .
Ритм жизни
kumehtar 27.02.2026
Иногда приходится жить в ритме, где дел становится всё больше, а вовлечения в происходящее — всё меньше. Плотный график не даёт вниманию закрепиться ни на одном событии. Утро начинается с быстрых,. . .
SDL3 для Web (WebAssembly): Сборка библиотек: SDL3, Box2D, FreeType, SDL3_ttf, SDL3_mixer и SDL3_image из исходников с помощью CMake и Emscripten
8Observer8 27.02.2026
Недавно вышла версия 3. 4. 2 библиотеки SDL3. На странице официальной релиза доступны исходники, готовые DLL (для x86, x64, arm64), а также библиотеки для разработки под Android, MinGW и Visual Studio. . . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru