probleme avec combobox

Version imprimable

bonsoir à tous
voila je debute en vb.net, j'ai une base access avec 2 table Epouse et Enfant que j'essais d'alimenter via vb.net
avec la table Epouse je n'ai pas de probleme
pour alimenter la table Enfant j'ai utilisé un combobox qui me permet de recuperer le numero Epouse qui est une clé etrangére pour la table Enfant.
pour charger le combobox j'utilise ce code
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 Dim chaineSql As String chaineSql = "SELECT NumEpouse FROM Epouse objetCommand.CommandText = chaineSql objetCommand.CommandType = CommandType.Text 'objetConnection.ConnectionString = StrConn Dim reader As System.Data.OleDb.OleDbDataReader reader = objetCommand.ExecuteReader CbEpouse.Items.Clear() If reader.HasRows Then While reader.Read() CbEpouse.Items.Add(reader.GetValue(0)) End While End If
tout se passe comme prevu
Mais quand j'essai d'ajouter un nouvel Enfant tout en choisissant un element du combobox comme numero Epouse, voici message d'erreur que vb me retourne:

Citation:

Le champ 'NomEpouse ne peut pas contenir une valeur null car la propriete required pour ce champ est true. Saisissez une valeur dans ce champ.

je me sens perdu, s'il vous plais si quelqu'un a une idee

01/02/2011, 17h06
WOLO Laurent

probleme avec combobox

Oui, mais tu ne montres que la façon dont tu charges ta combo mais pas comment tu fais ton insert dans la table enfant.

Voici le code que j'utilise pour alimenter la table Enfant

Code:

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
30
Private Sub BtnValider_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnValider.Click
        objetDataRow = objetDataSet.Tables("Enfant").NewRow
        objetDataRow("NumEnfant") = Me.TxtNumEnfant.Text
        objetDataRow("Nom") = Me.TxNomt.Text
        objetDataRow("Prenom") = Me.TxtPrenom.Text
        objetDataRow("DateNaissance") = Me.TxtDateNaiss.Text
        objetDataRow("LieuNaissance") = Me.TxtLieuNaissance.Text
        objetDataRow("NumEpouse") = Me.CbEpouse.Text
        objetDataSet.Tables("Enfant").Rows.Add(objetDataRow)
        'pr modifier les valeurs changer ds le dataAdapter
        cmdb = New OleDbCommandBuilder(objetDataAdapter)
        'Mise a jour
        Try
            objetDataAdapter.Update(objetDataSet, "Enfant")
            'on vide le dataset
            objetDataSet.Clear()
            'on le recharge de nouveau
            objetDataAdapter.Fill(objetDataSet, "Enfant")
            objetDataTable = objetDataSet.Tables("Enfant")
 
        Catch ex As Exception
            MessageBox.Show(ex.Message, "erreur", MessageBoxButtons.OK, MessageBoxIcon.Error)
        End Try
 
 
    End Sub
 
    Private Sub TxtNumEpoused_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs)
 
    End Sub

je me sens perdu, s'il vous plais si quelqu'un a une idee

02/02/2011, 14h17
alex61

si j'ai bien compris tu veut que tout les occurrence de tes table soit placer dans tes combobox ?

si c'est le ca , il te sufift de lié une source donné sur ta combobox

c'est la solution la plus simple a mettre en place