Вопрос № 46176: Здравствуйте!!!
Подскажите как написать на Delphi6 екзешник или какую-нибудь програмку, которая бы загружала на сервер табличку из Excel. Если можно, то с примером кода программы. Спасибо.
Сервер W2000 serv
База Oracle 8.1.7...
Вопрос № 46.176
Здравствуйте!!!
Подскажите как написать на Delphi6 екзешник или какую-нибудь програмку, которая бы загружала на сервер табличку из Excel. Если можно, то с примером кода программы. Спасибо.
Сервер W2000 serv
База Oracle 8.1.7
Отправлен: 14.06.2006, 10:14
Вопрос задала: Leka (статус: Посетитель)
Всего ответов: 1 Мини-форум вопроса >>> (сообщений: 9)
Отвечает: sir henry
Здравствуйте, Leka!
Попробуйте сделать так:
1. Откройте DBF-файл с помощью TTable. В его свойстве TableName содержиться имя таблицы.
2. В его свойстве Fields содержаться список всех полей с нужными для создания параметрами. Доступ к каждому полю осуществляется по индексу:
For i:=0 To TTable.Fields.Count-1 Do
...
FieldNmae - имя поля.
DataType - тип поля (выбирается из TFieldType, здесь придется делать таблицу соответствия типам поля Oracle)
Size - размер поля.
3. На основе этого списка генерируете SQL скрипт для создания таблицы в Oracle и посылаете его на выполнение. Как конкретно это выглядит я Вам не скажу, т.к. не знаю, какими компонентми Вы пользуетесь для связи с Oracle.
4. После этого генерируете SQL скрипт на добавление записей:
INSERT INTO MyTableFromDBF SELECT * FROM OldTableDBF
и посылаете его на выполнение серверу.
Я могу ошибаться, но по-моему Oracle допускает копирование данных из DBF.
Ответ отправил: sir henry (статус: Академик) Россия, Красноярск ---- Ответ отправлен: 14.06.2006, 13:12