Bonjour je suis débutante j essaye de connecter une base de donnée DB2 a une application vb.net mais a chaque fois le même problème :
une exception OLEDB n est pas géré : le serveur n existe pas s 'est produite a la ligne 17
par contre je suis sur du nom du serveur et mes tables tables de la bases sont présents sur le visual , s il vous plait aide moi ..voila mon code
Code : Sélectionner tout - Visualiser dans une fenêtre à part
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 Imports System Imports System.Data.OleDb Public Class Form1 Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click Dim cn As OleDbConnection = New OleDbConnection("Provider=SQLOLEDB;Data Source=PANTH02;" & _ "User ID=db2admin;Password=db2admin;" & _ "server=pantheraSRV.;") cn.Open() Dim dr As OleDbDataReader Dim cmd As OleDbCommand = New OleDbCommand("SELECT ID_UTTENTI,PASSWORD from THIP.UTTENTE where ID_UTTENTI='" & Me.TextBox1.Text & "' And PASSWORD = '" & Me.TextBox2.Text & "'", cn) Try dr = cmd.ExecuteReader() If Me.TextBox1 = dr.Item("ID_UTTENTE") & Me.TextBox2 = dr.Item("PASSWORD") Then Form2.Show() Else MessageBox.Show("message e Erreur", "Erreur") dr.Close() Catch ex As Exception Console.WriteLine(ex.Message.ToString()) Finally cn.Close() End Try End Sub End Class
Partager