powered by simpleCommunicator - 2.0.53     © 2025 Programmizd 02
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Перенос имени файла в базу
6 сообщений из 6, страница 1 из 1
Перенос имени файла в базу
    #37481909
kaudilio
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Прошу прощения за возможно тупой вопрос

Нужно собрать кучу таблиц dbf в единую и переконвертить в xls
При этом нужно внести имя каждой таблицы в базу как имя поля - т.е. например имя файла 01.01.1990 - нужно чтобы в базе вида номер\имя\сумма\ появилось поле дата заполненая полями 01.01.1990.
Не может никто подсказать как имя файла запихать в таблицу?
...
Рейтинг: 0 / 0
Перенос имени файла в базу
    #37482007
Banditos
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
kaudilio,
Код: plaintext
1.
ADIR(aMyKuchaDBF, '*.DBF')
Получишь массив со списком твоих таблиц.
А дальше уже - ручками кодишь, что и куда тебе нужно записываешь...
...
Рейтинг: 0 / 0
Перенос имени файла в базу
    #37482321
SSn888
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Например,
INSERT INTO myTbl FROM ARRAY aMyKuchaDBF
;)
...
Рейтинг: 0 / 0
Перенос имени файла в базу
    #37482570
kaudilio
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
авторПолучишь массив со списком твоих таблиц.
А дальше уже - ручками кодишь, что и куда тебе нужно записываешь...
Banditos,

Спасибо

Смысл не в списке, имя таблицы нужно запихать в нее саму, заполнив весь столбец таблицы - т.е. одно имя 10.10.2010 - 1 таблица заполненая 10.10.2010, следующее имя 11.10.2010 еще один столбец в следующей таблице 11.10.2010...

Но смысл понятен. Попробую.
...
Рейтинг: 0 / 0
Перенос имени файла в базу
    #37482702
tanglir
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
kaudilioимя таблицы нужно запихать в нее саму
Код: plaintext
1.
2.
3.
4.
update table set name_column=juststem(dbf('table'))
--или
select table
repl all name_column with juststem(dbf('table'))
...
Рейтинг: 0 / 0
Перенос имени файла в базу
    #37482929
alextashk
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
kaudilio,

В общем то понятно -
ADIR - собираете название файлов

ALTER TABLE table1 ADD COLUMN lcNameField CHARACTER(25) - добавляете поле

SELECT table1
GOTO TOP
SELECT table2
SCAN
SELECT table1
REPLACE &lcNameField WITH table2.field
IF RECNO() = RECCOUNT() THEN
APPEND BLANK
ELSE
SKIP
ENDIF
SELECT table2
ENDSCAN
загоняем данные
...
Рейтинг: 0 / 0
6 сообщений из 6, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Перенос имени файла в базу
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]