Message affiché
marwa580
Messages postés
162
Date d'inscription
Statut
Membre
Dernière intervention
-
marwa580 Messages postés 162 Date d'inscription Statut Membre Dernière intervention -
marwa580 Messages postés 162 Date d'inscription Statut Membre Dernière intervention -
Bonjour
Lors de l'exécution de mon application (en vb.net) , un message est affiché :"La référence d'objet n'est pas définie à une instance d'un objet"
je ferais quoi SVP?
Lors de l'exécution de mon application (en vb.net) , un message est affiché :"La référence d'objet n'est pas définie à une instance d'un objet"
je ferais quoi SVP?
A voir également:
- Message affiché
- Recuperer message whatsapp supprimé - Guide
- Message absence thunderbird - Guide
- Voir message supprimé whatsapp - Guide
- Epingler un message whatsapp - Accueil - Messagerie instantanée
- Message non envoyé - Forum Mobile
2 réponses
==>c'était au niveau de cette ligne :
ObjDataRow = ObjDataSet.Tables("Fournisseur").NewRow()
==> tout le code :
Imports System.Data
Imports System.Data.SqlClient
Public Class Ajout
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim ObjDataRow As DataRow
Dim ObjCommandBuilder As SqlCommandBuilder
Dim ObjDataAdapter As SqlDataAdapter
Dim ObjDataSet As New DataSet()
ObjDataRow = ObjDataSet.Tables("Fournisseur").NewRow()
ObjDataRow("Code") = Me.TextCode.Text
ObjDataRow("Nom") = Me.TextNom.Text
ObjDataRow("Adresse") = Me.TextAdresse.Text
ObjDataRow("Ville") = Me.TextVille.Text
ObjDataSet.Tables("Fournisseur").Rows.Add(ObjDataRow)
'Pour modifier les valeurs changées dans le DataAdapter
ObjCommandBuilder = New SqlCommandBuilder(ObjDataAdapter)
'Mise à jour
ObjDataAdapter.Update(ObjDataSet, "Fournisseur")
'On vide le DataSet et on le 'recharge' de nouveau.
ObjDataSet.Clear()
ObjDataAdapter.Fill(ObjDataSet, "Fournisseur")
End Sub
End Class
ObjDataRow = ObjDataSet.Tables("Fournisseur").NewRow()
==> tout le code :
Imports System.Data
Imports System.Data.SqlClient
Public Class Ajout
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim ObjDataRow As DataRow
Dim ObjCommandBuilder As SqlCommandBuilder
Dim ObjDataAdapter As SqlDataAdapter
Dim ObjDataSet As New DataSet()
ObjDataRow = ObjDataSet.Tables("Fournisseur").NewRow()
ObjDataRow("Code") = Me.TextCode.Text
ObjDataRow("Nom") = Me.TextNom.Text
ObjDataRow("Adresse") = Me.TextAdresse.Text
ObjDataRow("Ville") = Me.TextVille.Text
ObjDataSet.Tables("Fournisseur").Rows.Add(ObjDataRow)
'Pour modifier les valeurs changées dans le DataAdapter
ObjCommandBuilder = New SqlCommandBuilder(ObjDataAdapter)
'Mise à jour
ObjDataAdapter.Update(ObjDataSet, "Fournisseur")
'On vide le DataSet et on le 'recharge' de nouveau.
ObjDataSet.Clear()
ObjDataAdapter.Fill(ObjDataSet, "Fournisseur")
End Sub
End Class
