|
Простейшая задача, раньше делал, но забыл, выдача из DBF файла
|
|||
---|---|---|---|
#18+
Имеется в наличии DBF файл всего с ОДНИМ полем, примерно такой структуры, с несколькими записями упорядоченными(отсортированными): imja ---- саша саша саша иван иван иван иван федор федор федор ольга ольга ольга Стоит задача: выдать все одинаковые строки(записи) в цикле из этого DBF файла в файлы EXCEL Это будет небольшая программа около 10 строк примерно такой структуры с циклом: do while !eof() ... export to &имя all for имя=file.imja ... enddo Раньше я точно такое делал, но забыл, не могу вспомнить, нужен пример. Заранее благодарен. ... |
|||
:
Нравится:
Не нравится:
|
|||
24.06.2016, 07:26 |
|
Простейшая задача, раньше делал, но забыл, выдача из DBF файла
|
|||
---|---|---|---|
#18+
p672, SET TALK OFF SET SAFETY OFF SET ENGINEBEHAVIOR 70 SELECT imja,COUNT(*) as cnt FROM table1 GROUP BY 1 ORDER BY 1 INTO CURSOR tmp_name SELECT TMP_NAME GO TOP SCAN SCATTER MEMVAR WAIT WINDOW imja +STR(m.cnt) NOWAIT SELECT TABLE1 ON ERROR WAIT WINDOW "ERROR EXPORT : "+imja timeout 3 EXPORT TO ALLTRIM(m.imja)+'.XLS' TYPE XLS FOR ALLTRIM(imja)==ALLTRIM(m.imja) ON ERROR SELECT TMP_NAME ENDSCAN WAIT clear CLOSE TABLES Вот только создвать таблицы с одним полем не солидно. Нужен еще хотя бы идентификатор. ... |
|||
:
Нравится:
Не нравится:
|
|||
26.06.2016, 18:41 |
|
Простейшая задача, раньше делал, но забыл, выдача из DBF файла
|
|||
---|---|---|---|
#18+
psj69SELECT imja,COUNT(*) as cnt FROM table1 GROUP BY 1 ORDER BY 1 INTO CURSOR tmp_nameа distinct чем плох? ... |
|||
:
Нравится:
Не нравится:
|
|||
28.06.2016, 11:42 |
|
Простейшая задача, раньше делал, но забыл, выдача из DBF файла
|
|||
---|---|---|---|
#18+
tanglir, Не плох.Но мне хотелось посмотреть сколько по каждому имени записей. ... |
|||
:
Нравится:
Не нравится:
|
|||
29.06.2016, 21:04 |
|
Простейшая задача, раньше делал, но забыл, выдача из DBF файла
|
|||
---|---|---|---|
#18+
psj69 Всё получилось как надо, я удовлетворён, БЛАГОДАРЮ, вы очень помогли. Ваш код написан не зря, востребован и пригодится еще. Примерно подобную программу можно сделать еще меньшим объёмом , я делал точно , но забыл как. Помню только что через конструкцию DO WHILE !EOF() ENDDO и намного проще. Там совсем маленькая программа получается. ... |
|||
:
Нравится:
Не нравится:
|
|||
30.06.2016, 15:32 |
|
Простейшая задача, раньше делал, но забыл, выдача из DBF файла
|
|||
---|---|---|---|
#18+
На самом деле в DBF файле несколько полей но по существу программой используется только одно поле. ... |
|||
:
Нравится:
Не нравится:
|
|||
30.06.2016, 15:38 |
|
Простейшая задача, раньше делал, но забыл, выдача из DBF файла
|
|||
---|---|---|---|
#18+
Я собирался примерно вот в таком виде программу сделать, но где-то есть ошибка: fin - таблица zakaz - поле текст программы (НЕ работает) что-то в этом роде: USE fin IN 0 GO top a=fin.zakaz b=0 DO WHILE !EOF() IF b=0 EXPORT TO &a XLS ALL FOR a=fin.zakaz b=1 endif skip IF a#fin.zakaz a=fin.zakaz b=0 ENDIF ENDDO ... |
|||
:
Нравится:
Не нравится:
|
|||
30.06.2016, 15:57 |
|
Простейшая задача, раньше делал, но забыл, выдача из DBF файла
|
|||
---|---|---|---|
#18+
Код: sql 1. 2. 3. 4. 5. 6. 7. 8.
безо всяких а, бэ, ифов, дуев и гоутопов ... |
|||
:
Нравится:
Не нравится:
|
|||
01.07.2016, 06:05 |
|
Простейшая задача, раньше делал, но забыл, выдача из DBF файла
|
|||
---|---|---|---|
#18+
Если таблица отсортирована, то так Код: sql 1. 2. 3. 4. 5. 6. 7.
... |
|||
:
Нравится:
Не нравится:
|
|||
01.07.2016, 07:23 |
|
Простейшая задача, раньше делал, но забыл, выдача из DBF файла
|
|||
---|---|---|---|
#18+
Спасибо большое за примеры. Циклом scan endscan не пользовался, но теперь буду знать как проще такие задачи решать. Тяжело мне, запутался в трёх соснах, голова не варит последнее время, хотя на VFP давно пишу. Большое спасибо всем. И если есть еще варианты как решить такую задачу то приму и буду рад. ... |
|||
:
Нравится:
Не нравится:
|
|||
02.07.2016, 21:20 |
|
Простейшая задача, раньше делал, но забыл, выдача из DBF файла
|
|||
---|---|---|---|
#18+
не понял - а зачем тут цикл? Запросом всё гораздо быстрее и проще. ... |
|||
:
Нравится:
Не нравится:
|
|||
06.07.2016, 02:57 |
|
Простейшая задача, раньше делал, но забыл, выдача из DBF файла
|
|||
---|---|---|---|
#18+
982183, ну давай, создай в запросе энное количество йоксель-файлов... ... |
|||
:
Нравится:
Не нравится:
|
|||
07.07.2016, 06:16 |
|
Простейшая задача, раньше делал, но забыл, выдача из DBF файла
|
|||
---|---|---|---|
#18+
Подразумевалось, что запросом в данном случае гораздо удобнее выбрать нужные строки, чем циклом. ... |
|||
:
Нравится:
Не нравится:
|
|||
08.07.2016, 02:19 |
|
Простейшая задача, раньше делал, но забыл, выдача из DBF файла
|
|||
---|---|---|---|
#18+
982183, а файлы, файлы-то как потом создавать? ... |
|||
:
Нравится:
Не нравится:
|
|||
08.07.2016, 09:47 |
|
Простейшая задача, раньше делал, но забыл, выдача из DBF файла
|
|||
---|---|---|---|
#18+
EXPORT TO ... |
|||
:
Нравится:
Не нравится:
|
|||
11.07.2016, 03:41 |
|
Простейшая задача, раньше делал, но забыл, выдача из DBF файла
|
|||
---|---|---|---|
#18+
982183EXPORT TOв запросе? ... |
|||
:
Нравится:
Не нравится:
|
|||
11.07.2016, 07:45 |
|
Простейшая задача, раньше делал, но забыл, выдача из DBF файла
|
|||
---|---|---|---|
#18+
после запроса ... |
|||
:
Нравится:
Не нравится:
|
|||
11.07.2016, 09:19 |
|
Простейшая задача, раньше делал, но забыл, выдача из DBF файла
|
|||
---|---|---|---|
#18+
982183после запроса а теперь смотрим сюда 19357714 а потом сюда 19373430 и задаёмся вопросом - зачем давать туманный совет, если уже есть рабочий код? ... |
|||
:
Нравится:
Не нравится:
|
|||
11.07.2016, 11:51 |
|
Простейшая задача, раньше делал, но забыл, выдача из DBF файла
|
|||
---|---|---|---|
#18+
Именно об этом и говорю. От SCAN надо отходить. ... |
|||
:
Нравится:
Не нравится:
|
|||
12.07.2016, 02:09 |
|
Простейшая задача, раньше делал, но забыл, выдача из DBF файла
|
|||
---|---|---|---|
#18+
982183От SCAN надо отходитьТогда опять встаёт вопрос - как будем создавать энное количество эксель-файлов? Что "запросом" их не создать, вроде уже выяснили. ... |
|||
:
Нравится:
Не нравится:
|
|||
12.07.2016, 06:02 |
|
Простейшая задача, раньше делал, но забыл, выдача из DBF файла
|
|||
---|---|---|---|
#18+
tanglir982183От SCAN надо отходитьТогда опять встаёт вопрос - как будем создавать энное количество эксель-файлов? Что "запросом" их не создать, вроде уже выяснили.В общем-то, если вы не в курсе, фокс поддерживает в списке выбора команды Select sql юзерские функции, в которых, как ни странно, можно и файлики создавать. :) ... |
|||
:
Нравится:
Не нравится:
|
|||
12.07.2016, 14:18 |
|
Простейшая задача, раньше делал, но забыл, выдача из DBF файла
|
|||
---|---|---|---|
#18+
Пускай он поддерживает всё что угодно. Но если человек хочет дальше развиваться, переходить на другие платформы, то SQL - это более удобная/стандартная/масштабируемая вещь ... |
|||
:
Нравится:
Не нравится:
|
|||
13.07.2016, 02:09 |
|
Простейшая задача, раньше делал, но забыл, выдача из DBF файла
|
|||
---|---|---|---|
#18+
правильный проходящий., я в курсе, но такое знатное извращение мне в голову просто не приходило :) ... |
|||
:
Нравится:
Не нравится:
|
|||
13.07.2016, 07:21 |
|
Простейшая задача, раньше делал, но забыл, выдача из DBF файла
|
|||
---|---|---|---|
#18+
Извращение конечно чудное, но иногда необходимое. Но крайне редко. ... |
|||
:
Нравится:
Не нравится:
|
|||
14.07.2016, 02:38 |
|
|
start [/forum/topic.php?fid=41&msg=39266012&tid=1582083]: |
0ms |
get settings: |
11ms |
get forum list: |
10ms |
check forum access: |
4ms |
check topic access: |
4ms |
track hit: |
58ms |
get topic data: |
9ms |
get forum data: |
3ms |
get page messages: |
54ms |
get tp. blocked users: |
1ms |
others: | 14ms |
total: | 168ms |
0 / 0 |