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