Найти все имена баз данных на сервере Netezza - PullRequest
Новая
       43

Найти все имена баз данных на сервере Netezza

0 голосов
/ 21 января 2019

Я хочу узнать имена всех экземпляров БД на сервере БД Netezza.Я использую следующий код: 

Set objConn = CreateObject("ADODB.Connection")
Set objRec = CreateObject("ADODB.Recordset")

objConn.open "Driver={NetezzaSQL};servername=xx.xx.xx.xx;port=5480;database=_v_database;username=pankaj;password=xxx_333"
sqlQuery="select database from _v_database"
objRec.open sqlQuery, objConn

value = objRec.fields.item(0)
msgbox Value

Я могу подключиться к отдельным БД и получить данные.Однако, когда я пытаюсь запустить приведенный выше код, я получаю сообщение об ошибке «База данных _V_DATABASE не существует».Может ли кто-нибудь помочь мне найти все экземпляры на конкретном сервере - не обязательно строго в VBA.

1 Ответ

0 голосов
/ 21 января 2019

Нашел решение - я использовал database=SYSTEM вместо database=_v_database в строке подключения. 

Set objConn = CreateObject("ADODB.Connection")
Set objRec = CreateObject("ADODB.Recordset")

objConn.open "Driver={NetezzaSQL};servername=xx.xx.xx.xx;port=5480;database=SYSTEM;username=pankaj;password=xxx_333"
sqlQuery="select database from _v_database"
objRec.open sqlQuery, objConn

value = objRec.fields.item(0)
msgbox Value
...