Discussion :

[Alex35]

Bonjour,voila j'ai créé une base avec postgresql et je tente de mettre en place une interface a&vec vb.net.
pour l'instant j'en suis juste au début et les problémes commencent déja!
mon code étant:

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
28
29
Private Sub btnCnx_Click(ByVal sender As System.Object, ByVal e As
 System.EventArgs) Handles btnCnx.Click
        Dim strCnx As String
 
        Dim cmd As NpgsqlCommand
        Dim sql As String
 
        strCnx = "Server=127.0.0.1;User
 Id=postgres;Password=postgres;Database=contact"
        cnx = New NpgsqlConnection(strCnx)
        cmd = New NpgsqlCommand
        cnx.Open()
        MsgBox("connection completed")
        sql = "SELECT emp_nom FROM employe"
        cmd.CommandText = sql
        cmd.ExecuteReader()
        While cmd.ExecuteReader.Read
            cmbNom.Items.Add(cmd.GetType)
            cmd.ExecuteReader.NextResult()
        End While
    End Sub
 
    Private Sub btnClose_Click(ByVal sender As System.Object, ByVal e As
 System.EventArgs) Handles btnClose.Click
        cnx.Close()
        MsgBox("connection closed")
    End Sub
End Class

A la ligne en gras on me dit "Une exception non gérée du type 'System.InvalidOperationException' s'est produite dans npgsql.dll

Informations supplémentaires*: The Connection is not open.
" est ce que quelqu'un saurait pourquoi??

[neguib]

Essayes

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
 
Dim strCnx As String = "Server=127.0.0.1;User
 Id=postgres;Password=postgres;Database=contact"
Dim sql As String = "SELECT emp_nom FROM employe"
Dim cmd As NpgsqlCommand = Nothing
Dim lecteur As NpgsqlDataReader  = Nothing
Try
   cnx = New NpgsqlConnection(strCnx) 
   cmd = New NpgsqlCommand(sql, cnx)
   cnx.Open() 
   MsgBox("connection completed") 
   lecteur = cmd.ExecuteReader() 
   While lecteur.Read 
      cmbNom.Items.Add(lecteur.GetValue(0)) 
   End While
Catch ex As Exception 
   MsgBox(ex.Message) 
End Try

L'ideal serait tout de même que tu fasses un debug pas à pas pour verifier chacune des valeurs espionnable et repéré si une valeur apparait incongrue dans le contexte

Je me suis permis d'imaginer qu'il existait dans ta dll Npgsql (enfin j'espère pour toi) le DataReader c'est un objet qui normalement devrait être renvoyé par cmd.ExecuteReader
Tu as dû remarquer aussi l'utilisation directe d'une surcharge du constructeur NpgsqlCommand (j'ai fait au pif, mais c'est ainsi pour sql,oledb,odbc,oracle,mysql...)

[Alex35]

MERCI neguib mERCI mERCI
Cela marche parfaitement!
ce forum marche vraiment trés bien!