Форум программистов, компьютерный форум CyberForum.ru

Импорт из Excel - Delphi БД

Войти
Регистрация
Восстановить пароль
Другие темы раздела
Delphi БД DateTimePicker1.Date http://www.cyberforum.ru/delphi-database/thread385020.html
Помогите плиз. Я выбираю в таблице даты в диапазоне от DateTimePicker1 по DateTimePicker2. Мне необходимо если нет записи в этом диапазоне то выводило сообщение, сообщение выводит, но при этом таблица становится пустой. Подскажите как сделать, чтобы она не становилась пустой. Вот код в ADOQuery2. select * from читатели where between :Dat1 and :Dat2 Вот мой код под кнопкой. begin ...
Delphi БД Проблема с транзакцией MySql + dbExpress Доброго времени суток! В процессе разработки появилась потребность в использовании транзакции, выбрал явный метод. И все бы хорошо но код: SQLQuery1.Active := False; SQLQuery1.SQL.Clear; SQLQuery1.SQL.Add('любой SELECT-запрос'); SQLQuery1.Active := True; Завершает транзакцию. То есть если в теле транзакции я к примеру захочу проверить на в хождение моих данных в доступный интервал перед... http://www.cyberforum.ru/delphi-database/thread384951.html
Delphi БД База данных (визуальное программирование)
фирма СОЛО выпускает окна и двери необходимо написать такую программу чтобы она облегчала работу менеджерам этой фирмы СОЛО, считала счета, в какой срок будет готов заказ, имена заказчиков, скольк окон и дверей заказали, цена,общая цена,размер окон и дверей!!!!(вложения) С этим к фрилансерам, пж-та! Выдержу паузу и топик удалю!
База данных в DELPHI Delphi БД
в общем задание состоит из следущего условия!!! Фирма "Соло" выпускает окна и двери!нужно написать программу выводящую расчеты как позанно на изображениях!!!!НАРОД ПОМОГИТЕ ОЧЕНЬ НАДО!!!!
Delphi БД Восстановление таблиц paradox http://www.cyberforum.ru/delphi-database/thread384416.html
Возможно ли как нибудь восстановить данные таблици?
Delphi БД Как отловить ошибки, возникающие при работе с MySQL? возможно ли как нибудь из делфи отловить ошибки возникающие при работе с MYSQL, к примеру, при ошибке удаления/дампа, если сама работа выполняется из консоли mysql подробнее

Показать сообщение отдельно
zumer
0 / 0 / 0
Регистрация: 16.11.2011
Сообщений: 18
24.11.2011, 16:03  [ТС]     Импорт из Excel
Всем большое спасибо. После хождения по мукам решил пока остаться на Access (т.к. Access более-менее знаком). Импортирую всетаки с использованием вариантного массива, но столкнулся с проблемой при импорте: необходимо отловить исключение на вставку повторяющегося значения в индексируемом поле для обновления данных этой записи. Пробую следующим методом:
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
ADOQuery1.Insert;
    ADOQuery1.FieldByName('Поле1').AsString:=RangeMatrix[R,1];
    ADOQuery1.FieldByName('Поле2').AsDateTime := StrToDate(StringReplace(RangeMatrix[R,2], '''', '', [rfReplaceAll, rfIgnoreCase])); // замена апострофа
    ADOQuery1.FieldByName('Поле3').AsString:=RangeMatrix[R,3];
    ADOQuery1.FieldByName('ÑóììГ* äîëãГ*').AsCurrency :=StrToFloat(StringReplace(StringReplace(RangeMatrix[R,9], '''', '', [rfReplaceAll, rfIgnoreCase]), '.', ',', [rfReplaceAll])); // замена точки
    ADOQuery1.Active:= True;
    try                                     // пытаюсь отловить исключение
    AdoQuery1.Post;
      except
      on E : EDatabaseError
          do
          if E.Message = 'Key violation'
          then
          begin
 
          end;
          else Raise;
    end;
Подскажите пожалуйста как правильно отловить и каким образом обновить данные.
P.S. Прошу отнестись с пониманием т.к. это мой первый опыт работы с Delphi.
 Комментарий модератора 
Теги кода добавлены модератором. По правилам форума, код должен быть оформлен соответствующими тегами. Для оформления кода Delphi следует выделить этот код и на панели редактирования сообщения нажать кнопку: "DELPHI".
 
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru