Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > БД в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 26.03.2010, 07:25   #1
Liones
Пользователь
 
Аватар для Liones
 
Регистрация: 26.11.2008
Сообщений: 81
По умолчанию Перенос записей из db в dbf

Проблема такая: есть таблица paradox, из нее нужно перенести записи в dbase. При переносе вместо русских букв получается псевдографика. В BDE Administrator для DBASE установлен языковой драйвер dBASE RUS cp866. Программа для работы с dbf написана под dos, может в этом основная проблема. Как решить задачу переноса?
Liones вне форума Ответить с цитированием
Старый 26.03.2010, 08:34   #2
М_Виктор
Пользователь
 
Регистрация: 18.09.2009
Сообщений: 49
По умолчанию

Цитата:
Сообщение от Liones Посмотреть сообщение
Проблема такая: есть таблица paradox, из нее нужно перенести записи в dbase. При переносе вместо русских букв получается псевдографика. В BDE Administrator для DBASE установлен языковой драйвер dBASE RUS cp866. Программа для работы с dbf написана под dos, может в этом основная проблема. Как решить задачу переноса?
Мои настройки BDE.
Проверьте у себя значение LEVEL.
Кроме того, в ветке System\INIT проверьте DEFAULT DRIVER
Изображения
Тип файла: jpg bde1.jpg (24.2 Кб, 107 просмотров)
Тип файла: jpg bde2.jpg (28.3 Кб, 109 просмотров)
Тип файла: jpg bde3.jpg (32.5 Кб, 107 просмотров)
М_Виктор вне форума Ответить с цитированием
Старый 26.03.2010, 09:23   #3
Liones
Пользователь
 
Аватар для Liones
 
Регистрация: 26.11.2008
Сообщений: 81
По умолчанию

Не помогло((
Liones вне форума Ответить с цитированием
Старый 26.03.2010, 10:01   #4
artemavd
Старожил
 
Аватар для artemavd
 
Регистрация: 05.06.2008
Сообщений: 4,194
По умолчанию

Liones, попробуйте программку DataPump, которая входит в комплект поставки Delphi.
Вот тут инструкция: http://delphiworld.narod.ru/base/dbf_to_db.html
Не стоит смеяться над человеком делающим шаг назад, возможно он делает разбег.

Последний раз редактировалось artemavd; 26.03.2010 в 10:05.
artemavd вне форума Ответить с цитированием
Старый 26.03.2010, 10:17   #5
Liones
Пользователь
 
Аватар для Liones
 
Регистрация: 26.11.2008
Сообщений: 81
По умолчанию

Цитата:
Сообщение от artemavd Посмотреть сообщение
Liones, попробуйте программку DataPump, которая входит в комплект поставки Delphi.
Вот тут инструкция: http://delphiworld.narod.ru/base/dbf_to_db.html
Этим инструментом я пользовалась, но в данном конкретном случае не катит. Мне нужно из моей программульки перенести записи в программу ПФР
Liones вне форума Ответить с цитированием
Старый 26.03.2010, 10:50   #6
artemavd
Старожил
 
Аватар для artemavd
 
Регистрация: 05.06.2008
Сообщений: 4,194
По умолчанию

Цитата:
ПФР
Что это такое?
Не стоит смеяться над человеком делающим шаг назад, возможно он делает разбег.
artemavd вне форума Ответить с цитированием
Старый 26.03.2010, 10:54   #7
Liones
Пользователь
 
Аватар для Liones
 
Регистрация: 26.11.2008
Сообщений: 81
По умолчанию

программа для подготовки индивидуальных сведений в пенсионный фонд, не знаю как у вас, в нашей область программа оренбургская, написана под дос и в ближайшие года наш местный пфр не думает переходить на винду. Вот мне и надо перенести сведения о начисленных взносах из своей программы в эту программу.

Переношу по одной записи.
DM.TImport.FieldByName('FATHER').As String:=fio;
вот как раз фио и выходит псевдографикой.

Последний раз редактировалось Liones; 26.03.2010 в 10:57.
Liones вне форума Ответить с цитированием
Старый 26.03.2010, 14:45   #8
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,238
По умолчанию

1) для работы с DB были обалденные компоненты от компании (с) Degisy Software

degisydata.zip Degisy Data 1.01 Freeware

Бесплатная библиотека компонент прямого доступа
к таблицам Paradox, dBase, Clarion 2.1 и Degisy DA1.
Совместима со всеми Db Aware Controls
(все компоненты образованы от TDataSet).
Используется прямой доступ к данным (никаких DLL, BDE, ADO и т.п.)
(частично с исходными текстами)
(Delphi5, Delphi6, Delphi7)

Есть исходники примера использования (см. DEMO)

их главное преимущество было в том, что они работали БЕЗ BDE!!

2) я тут всем на форуме уже "прожужал" уши про маленький бесплатный компонент для работы с DBF
это TDBF.
Он работает напрямую с файлом без всяких борландовских уродцев... (ибо BDE по другому не назовёшь ;( )

3) попробуйте писать DBF файл через ADO

4) про кодовую страницу в заголовке DBF не забываете?
чему она у Вас там равна?

5) сделайте два небольших DBF файла (С ФИКТИВНЫМИ данными!!!!) в одном, в котором записи нормальные (ну, который ПФР у вас мог бы принять и один, который получается у Вас, с "как раз фио и выходит псевдографикой". файлы запакуйте и выложите сюда, на форум (ну или на файлобменник, а сюда ссылочку на скачку)..

дорогу осилит идущий...
Serge_Bliznykov вне форума Ответить с цитированием
Старый 29.03.2010, 08:16   #9
М_Виктор
Пользователь
 
Регистрация: 18.09.2009
Сообщений: 49
По умолчанию

Цитата:
Сообщение от Liones Посмотреть сообщение
Не помогло((
А Вы не могли бы выложить в сеть образец того оригинального файла *.dbf, в который осуществляете перенос (достаточно 2-3 записи, чтобы не раскрывать пенсионные секреты)? Тогда можно будет сказать что-то конкретное.
М_Виктор вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Как сделать автоматич. дату и перенос записей. Hito БД в Delphi 8 07.05.2009 13:58
Копирование записей между таблицами DBF ИВэТэшка Помощь студентам 4 22.03.2009 10:43
Копирование записей из одной DBF таблицы в другую ИВэТэшка БД в Delphi 0 20.03.2009 22:37
сохранение результата выборки из DBF файла в DBF файл с такой же структурой таблицы GazimagomedovM БД в Delphi 5 06.11.2007 17:58
Перенос записей между таблицами Македонский БД в Delphi 12 27.08.2007 09:41