2015-07-23 2 views
-1

Мы используем решение IBM для резервного копирования под названием tivoli storage manager. Сообщает всем своим губбинам базу данных DB2.Ищите примеры подключения к DB2 из VB

Я хочу иметь возможность взаимодействовать с этой базой данных от VB, чтобы я мог автоматизировать некоторые функции отчетности.

Только проблема в том, что я понятия не имею, как это сделать.

Есть ли у кого-нибудь примеры этого, которые могли бы указать мне в правильном направлении?

Заранее благодарен!

+0

You необходимо сообщить нам, на какой платформе работает ваш сервер DB2: z/OS, LUW (linux, Unix, Wndow s) или IBM i (fka iSeries, AS/400). IBM i использует другой драйвер. – WarrenT

+0

Его сервер Windows 2003 (yuck!) С управляемым менеджером хранилища IBM Tivoli, работающим на нем – John

ответ

1
Imports System.Data 
Imports IBM.Data.DB2 


Dim cn As DB2Connection 
cn = New DB2Connection("Server=myAddress:myPortNumber;Database=myDataBase;" & _ 
      "UID=myUsername;PWD=myPassword;") 
Try 
    cn.Open() 
    MsgBox("Connected") 
    cn.Close() 

Catch ex As Exception 

     MsgBox(ex.Message) 

End Try  
+0

Спасибо equisde. Это выглядит чрезвычайно упрощенным, что является удивительным, но это не работает для меня сразу. Я вижу ... Ошибка Тип 'DB2Connection' не определен. \t и Предупреждение \t \t 1 Пространство имен или тип, указанный в «IBM.Data.DB2» импорта не содержит открытый член или не может быть найден. Убедитесь, что пространство имен или тип определено и содержит хотя бы один открытый элемент. Убедитесь, что имя импортированного элемента не использует никаких псевдонимов. Нужно ли мне действительно добавлять ссылку, прежде чем я смогу использовать этот импорт? Если да, то в какой файл? – John

+0

У вас на самом деле установлен клиент DB2? Если нет, вы должны. – mustaccio

+0

Библиотека классов платформы .NET Framework IBM.Data.DB2 предоставляется [** IBM **] (http://www-01.ibm.com/support/docview.wss?uid=swg21385217). Библиотека классов содержится в файле 'IBM.Data.DB2.dll'. – equisde

1

При условии, что вы собрали правильную строку соединения, это следует сделать трюк:

Imports System.Data.OleDb 

и (с примером строки подключения):

Dim dbConnectString As String = "Provider=IBMDA400.1;Data Source=10.10.10.10;User ID=myusername;Password=userpassword" 

Using cn As New OleDbConnection(dbConnectString) 
    cn.Open() 
End Using 

https://www.connectionstrings.com/ibm-db2/

+0

Это относится к драйверу DB2 в IBM i. Не рекомендуется использовать DB2 for z/OS или LUW. – WarrenT