Экспертная система Delphi.int.ru

Сообщество программистов
Общение, помощь, обмен опытом

Логин:
Пароль:
Регистрация | Забыли пароль?

Delphi.int.ru Expert

Другие разделы портала

Переход к вопросу:

#   

Статистика за сегодня:  


Лучшие эксперты

Подробнее »



Вопрос # 1 653

/ вопрос открыт /

Здравствуте, уважаемые эксперты!
Вопрос про DBExpress(в связке Oracle). До последнего бился, и всё таки решил обратиться к Вам!
Суть вопроса: Каким образом настроить подключению к удалённому серверу Oracle через DBExpress?

Клиент Oracle, файл tnsnames.ora(на моей машине) настроен верно, подключение с командой строки и с PL/SQL проходит(удалённый сервер отвечает). Когда я подключаюсь же из Делфи, используя те же параметры Oralce выдаёт ошибку "ORA-12154: TNS: Невозможно разрешить имя службы" - что значит что настройка удалённого доступа кривая

В SQLConnections указываю Database, User_Name, Password. Спасибо!

Приложение:
  1.  


RedMask Вопрос ожидает решения (принимаются ответы, доступен мини-форум)

Вопрос задал: RedMask (статус: Посетитель)
Вопрос отправлен: 4 июня 2008, 08:45
Состояние вопроса: открыт, ответов: 1.

Ответ #1. Отвечает эксперт: Feniks

Здравствуйте, RedMask!
Смотрите в Приложении несколько статьтей на тему dbExpress.
Желаю удачи...

Приложение:
  1.  
  2.  
  3.  
  4.  
  5.  
  6.  
  7.  
  8.  
  9.  
  10.  
  11.  
  12.  
  13.  
  14.  
  15.  
  16.  
  17.  
  18.  
  19.  
  20.  
  21.  
  22.  
  23.  
  24.  
  25.  
  26.  
  27.  
  28.  
  29.  
  30.  
  31.  
  32.  
  33.  
  34.  
  35.  
  36.  
  37.  
  38.  
  39.  
  40.  
  41.  
  42.  
  43.  
  44.  
  45.  
  46.  
  47.  
  48.  
  49.  
  50.  
  51.  
  52.  
  53.  
  54.  
  55.  
  56.  
  57. Midas.dll - 293888
  58.  
  59.  
  60.  
  61.  
  62.  
  63.  
  64.  
  65.  
  66.  
  67.  
  68.  
  69.  
  70.  
  71.  
  72.  
  73.  
  74.  
  75.  
  76.  
  77.  
  78.  
  79.  
  80.  
  81. property ConnectionName: string;
  82.  
  83.  
  84.  
  85.  
  86.  
  87.  
  88.  
  89.  
  90.  
  91.  
  92.  
  93.  
  94.  
  95.  
  96.  
  97.  
  98.  
  99.  
  100.  
  101.  
  102.  
  103.  
  104.  
  105.  
  106.  
  107.  
  108.  
  109.  
  110.  
  111.  
  112.  
  113.  
  114.  
  115.  
  116.  
  117.  
  118. DB2
  119.  
  120.  
  121.  
  122. Informix
  123.  
  124.  
  125.  
  126.  
  127. Interbase
  128.  
  129.  
  130.  
  131.  
  132.  
  133.  
  134.  
  135.  
  136. Microsoft SQL Server 2000
  137.  
  138.  
  139.  
  140.  
  141.  
  142. MySQL
  143.  
  144.  
  145.  
  146. Oracle
  147.  
  148.  
  149.  
  150.  
  151.  
  152.  
  153.  
  154.  
  155.  
  156.  
  157.  
  158. property Connected: Boolean;
  159.  
  160.  
  161.  
  162. procedure Open;
  163.  
  164.  
  165.  
  166.  
  167.  
  168. procedure Close;
  169.  
  170.  
  171.  
  172. property BeforeConnect: TNotifyEvent;
  173. property AfterConnect: TNotifyEvent;
  174. property BeforeDisconnect: TNotifyEvent;
  175. property AfterDisconnect: TNotifyEvent;
  176.  
  177.  
  178.  
  179. procedure TForml.MyConnectionBeforeConnect(Sender: TObject);
  180. begin
  181. if MyConnection.Params.Values['User_Name']) <> DefaultUser then
  182. begin
  183. MessageDlg('Wrong user name', mtError, [mbOK], 0);
  184. Abort;
  185. end;
  186. end;
  187.  
  188.  
  189.  
  190. property LoginPrompt: Boolean;
  191.  
  192.  
  193.  
  194.  
  195.  
  196. TConnectionState = (csStateClosed, csStateOpen, csStateConnecting, csStateExecuting, csStateFetching, csStateDisconnecting);
  197.  
  198. property ConnectionState: TConnectionState;
  199.  
  200.  
  201.  
  202. procedure LoadParamsFromlniFile(AFileName : String = '');
  203.  
  204.  
  205.  
  206. property Params Loaded: Boolean;
  207.  
  208.  
  209.  
  210. procedure TForml.StartBtnClickfSender: TObject);
  211. begin
  212. if MyConnection.Params.Values['DriverName'] = " then
  213. MyConnection.LoadParamsFromlniFile('c:Tempdbxalarmconnections.ini');
  214. if MyConnection.ParamsLoaded then
  215. try
  216. MyConnection.Open;
  217. except
  218. MessageDlgt'Database connection error', mtError, [mbOK], 0);
  219. end;
  220. end;
  221.  
  222.  
  223.  
  224.  
  225.  
  226.  
  227.  
  228.  
  229.  
  230.  
  231. DB2 Dbexpdb2.dll Db2cli.dll
  232. InterBase Dbexpint.dll GDS32.DLL
  233. Informix Dbexpinf.dll Isqlb09a.dll
  234. MS SQL Server Dbexpmss.dll OLE DB
  235. MySQL Dbexpmys.dll LIBMYSQL.DLL
  236. Oracle Dbexpora.dll OCI.DLL
  237.  
  238.  
  239.  
  240.  
  241.  
  242.  
  243.  
  244.  
  245.  


Ответ отправил: Feniks (статус: Бакалавр)
Время отправки: 4 июня 2008, 12:08
Оценка за ответ: 5

Комментарий к оценке:   Спасибо, ваши сведения мне очень помогли! Я установил связь с сервером, но почему то он выдаёт при первом подключении, что ошибка(Не верные логин или пароль), а во второй раз тыкаю - всё впорядке. если есть мысли, поделитесь пожалуйста! Спасибо :-)

Мини-форум вопроса

Мини-форум пуст.

Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.

Версия движка: 2.6+ (26.01.2011)
Текущее время: 27 марта 2023, 13:28
Выполнено за 0.02 сек.
Рейтинг@Mail.ru