powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Как определить ошибку от ODBC
9 сообщений из 9, страница 1 из 1
Как определить ошибку от ODBC
    #33604517
DDT
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Привет.

Пытаюсь соеденить с БД PostgreSQL через ODBC:
CREATE CONNECTION datacon USERID user PASSWORD password

Получаю ошибку:
No databases is open or set as the current database.

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

Спасибо.
...
Рейтинг: 0 / 0
Как определить ошибку от ODBC
    #33604890
Мутабор
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Errors колекция
...
Рейтинг: 0 / 0
Как определить ошибку от ODBC
    #33605069
DDT
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
у меня фокс 7.0

Такой коллекции я не нашел :(
...
Рейтинг: 0 / 0
Как определить ошибку от ODBC
    #33605084
Мутабор
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ADODB.Connection
...
Рейтинг: 0 / 0
Как определить ошибку от ODBC
    #33605135
PaulWist
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
При неудачной попытке установки соединения используйте AERROR(Array), детальная инфа в массиве Array
...
Рейтинг: 0 / 0
Как определить ошибку от ODBC
    #33605576
AKI
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
DDTПривет.

Пытаюсь соеденить с БД PostgreSQL через ODBC:
CREATE CONNECTION datacon USERID user PASSWORD password

Получаю ошибку:
No databases is open or set as the current database.

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

Спасибо.

если сделать так:
Код: plaintext
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.
= Con2PgSQL('Ждемс!')

**************************************
*
*  Connect to PostgreSQL 
*
**************************************
PROCEDURE Con2PgSQL
Parameters cWaitMessage
gnConnHandle =  0 

WAIT WINDOW  cWaitMessage  AT  25 ,  80  NOWAIT

lcDSNLess="DRIVER=PostgreSQL ANSI;" ; 
+ "SERVER=127.0.0.1;" ;
+ "UID=PgSQLUser;" ;
+ "PWD=PasswordForPgSQLUser;" ;
+ "DATABASE=YourDatabaseName" 

gnConnHandle = sqlstringconnect(m.lcDSNLess)

nIsConnected = gnConnHandle

RETURN gnConnHandle

**************************************
*
*  End of procedure Connect to PostgreSQL 
*
**************************************

то ничего этого Вы не получите (ну или класс опишите)
...
Рейтинг: 0 / 0
Как определить ошибку от ODBC
    #33605781
DDT
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Спасибо за советы.
...
Рейтинг: 0 / 0
Как определить ошибку от ODBC
    #33605799
PaulWist
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Обратите анимание, что в скрипте Aki не обрабатавается ошибка создания соединения, те вам придется это сделать самостоятельно.
...
Рейтинг: 0 / 0
Как определить ошибку от ODBC
    #33606101
AKI
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
PaulWistОбратите анимание, что в скрипте Aki не обрабатавается ошибка создания соединения, те вам придется это сделать самостоятельно.

спасибо за поправку - поправляем

(может когда-нибудь и класс под это дело напишу.. все руки не доходят)

Код: plaintext
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.
PUBLIC gnConnHandle

= Con2PgSQL('Ждемс....')

IF gnConnHandle <=  0 
   = MESSAGEBOX('Cannot make connection',  16 , 'PostgreSQL Connect Error')
 =AERROR(lAerror)
= MESSAGEBOX('Елки-палки' + CHR( 13 ) + ;
				'ERROR № ' + TRANSFORM(lAerror( 1 ) + CHR( 13 ) + ;
'Описание: [' + lAerror( 2 ) + ']',  16 , 'Ошибочка SQL Connect')

  
ELSE
   = MESSAGEBOX('Connection made',  48 , 'PostgreSQL Connect Message')
   
   
   = SQLDISCONNECT(gnConnHandle)
ENDIF

**************************************
*
*  Connect to PostgreSQL 
*
**************************************
PROCEDURE Con2PgSQL
Parameters cWaitMessage
gnConnHandle =  0 

WAIT WINDOW  cWaitMessage  AT  25 ,  80  NOWAIT

lcDSNLess="DRIVER=PostgreSQL ANSI;" ; 
+ "SERVER=10.107.1.206;" ;
+ "UID=Kozak;" ;
+ "PWD=fm32yo;" ;
+ "DATABASE=postgres" 

gnConnHandle = sqlstringconnect(m.lcDSNLess)

nIsConnected = gnConnHandle

RETURN gnConnHandle

**************************************
*
*  End of procedure Connect to PostgreSQL 
*
**************************************


...
Рейтинг: 0 / 0
9 сообщений из 9, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Как определить ошибку от ODBC
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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