Как Выгрузить данные с базы

Обсуждение программы xStarter
Ответить
MACTEP_XAPA6APgbI
Пассажир
Сообщения: 5
Зарегистрирован: Пт апр 25, 2014 2:28 pm
Благодарил (а): 0
Поблагодарили: 0

Как Выгрузить данные с базы

Сообщение MACTEP_XAPA6APgbI » Пн апр 28, 2014 12:36 pm

Здравствуйте, недавно начал использовать данную программу, очень удобно, круто, замечательно. Как говориться Спасибо )
Но есть один момент который не могу понять, как реализовать:
Есть ADO----, как через Xstarter выгрузить данные с базы и сохранить в EXCEL ?
Например вот такой скрипт : SELECT * FROM ANALYTICS.REPORT_OAZIS_WEEK WHERE CODE_SHOP=77
П.С. желательно как-то по шагово. Спасибо

MACTEP_XAPA6APgbI
Пассажир
Сообщения: 5
Зарегистрирован: Пт апр 25, 2014 2:28 pm
Благодарил (а): 0
Поблагодарили: 0

Re: Как Выгрузить данные с базы

Сообщение MACTEP_XAPA6APgbI » Ср июл 02, 2014 2:36 pm

Так что, нет вариантов ?

Simple
Ас
Сообщения: 117
Зарегистрирован: Пн янв 25, 2010 10:29 am
Благодарил (а): 3 раза
Поблагодарили: 11 раз

Re: Как Выгрузить данные с базы

Сообщение Simple » Пн июл 07, 2014 11:40 am

Конкретно в Excel выгружать не пробовал, а в .csv выгружается элементарно, как в обыкновенный .txt-файл через "Записать в лог-файл", а дальше он прекрасно открывается в Excel.

По порядку:
AdoConnect
If AdoConnect.Succecs then
AdoQuery
AdoQueryOperation "First"
While AdoQueryEof <> True Do
Установить переменную log=AdoQueryValue... [ENTER]
AdoQueryOperation "Next"
end While
AdoQueryOperation "Close"
Записать в лог-файл LogFilename="filename.csv", LogMessage=[log]
End If

MACTEP_XAPA6APgbI
Пассажир
Сообщения: 5
Зарегистрирован: Пт апр 25, 2014 2:28 pm
Благодарил (а): 0
Поблагодарили: 0

Re: Как Выгрузить данные с базы

Сообщение MACTEP_XAPA6APgbI » Ср июл 23, 2014 8:39 pm

Спасибо большое, попробую

zhigulinfamily
Пассажир
Сообщения: 7
Зарегистрирован: Чт окт 05, 2017 7:48 pm
Благодарил (а): 0
Поблагодарили: 0

Re: Как Выгрузить данные с базы

Сообщение zhigulinfamily » Пн авг 19, 2019 11:08 am

Simple писал(а):
Пн июл 07, 2014 11:40 am
Конкретно в Excel выгружать не пробовал, а в .csv выгружается элементарно, как в обыкновенный .txt-файл через "Записать в лог-файл", а дальше он прекрасно открывается в Excel.

По порядку:
AdoConnect
If AdoConnect.Succecs then
AdoQuery
AdoQueryOperation "First"
While AdoQueryEof <> True Do
Установить переменную log=AdoQueryValue... [ENTER]
AdoQueryOperation "Next"
end While
AdoQueryOperation "Close"
Записать в лог-файл LogFilename="filename.csv", LogMessage=[log]
End If
Добрый день. Можно более подробно расписать?

Ответить