Sujet Précédent Sujet Suivant

Problème de mise à jour d'un table d'un dataset

cs_lordko Messages postés 12 Date d'inscription samedi 18 septembre 2004 Statut Membre Dernière intervention 25 janvier 2006 - 12 mars 2005 à 12:47
adess00 Messages postés 261 Date d'inscription vendredi 4 mars 2005 Statut Membre Dernière intervention 27 septembre 2008 - 12 mars 2005 à 21:17
Voilà je lis une table d'une base de données sans aucun soucis, mais lorsque je veux ajouter un utilisateur dans cette table j'ai le message d'erreur suivant:

"La référence d'objet n'est pas définie à une instance d'objet"
Et la ligne qui pose problème est :

ObjetDataAdapter.Fill(ObjetDataSet, "TableUtilisateurs")

J'avoue que je sèche un peu...
Help plz ;)

Voici mon code:


Public ObjetConnection
As OleDbConnection



Public ObjetCommand
As OleDbCommand



Public ObjetDataAdapter
As OleDbDataAdapter



Public ObjetDataSet
As
New DataSet



Public strSql
As
String



Public ObjetDataTable
As DataTable



Public ObjetDataRow
As DataRow



Public RowNumber
As
Integer



Public strConn
As
String



Public ObjetCommandBuilder
As OleDbCommandBuilder


Private
Sub AjoutUtilisateur()



Try


ObjetDataRow = ObjetDataSet.Tables("TableUtilisateurs").NewRow()


ObjetDataRow("NumInt") = NumInt.Text


ObjetDataRow("NomUt") = NomUt.Text


ObjetDataRow("PrenomUt") = PrenomUt.Text


ObjetDataRow("AdresseUt") = AdresseUt.Text


ObjetDataRow("NumAdresseUt") = NumAdresseUt.Text


ObjetDataRow("CodePostUt") = CodePostUt.Text


ObjetDataRow("CommuneUt") = CommuneUt.Text


ObjetDataRow("TelFixUt") = TelFixUt.Text


ObjetDataRow("TelPorUt") = TelPorUt.Text


ObjetDataRow("EmailUt") = EmailUt.Text


ObjetDataRow("DateNaissUt") = DateNaissUt.Text


ObjetDataRow("PhotoUt") = OpenPhotoD.FileName


ObjetDataSet.Tables("TableUtilisateurs").Rows.Add(ObjetDataRow)


ObjetDataAdapter.Fill(ObjetDataSet, "TableUtilisateurs")


ObjetDataTable = ObjetDataSet.Tables("TableUtilisateurs")


ObjetDataAdapter.Update(ObjetDataSet, "TableUtilisateurs")


ObjetCommandBuilder =
New OleDbCommandBuilder(ObjetDataAdapter)



Call AffichageDesRecords()


MsgBox("Utilisateur correctement ajouté", MsgBoxStyle.OKOnly)



Catch ex
As Exception


ErreurPourLog = ex.Message


MsgBox(ex.StackTrace)



Call EcritureDansLogErreur(ErreurPourLog)



End
Try

1 réponse

Réponse 1 / 1
adess00 Messages postés 261 Date d'inscription vendredi 4 mars 2005 Statut Membre Dernière intervention 27 septembre 2008 1
12 mars 2005 à 21:17
Salut je comprend ta soufrance

j ai pas vraiment d idee mais bon vu que personne te repond je peux juste te suggerer de verifier les autorisations ou sinon la compatibilité du fournisseur a accepter plusieurs connections

Bonne chance
a+
0

Discussions similaires

Mise a jour DELPHI
jmj01 -
cantador -

4 réponses
L’opération doit utiliser une requête qui peut être mise à jour
cs_meryamaa -
meryamaa -

8 réponses
Installation Delphi
chrisix1 -
Francky23012301 -

13 réponses
L'opération doit utiliser une requête qui peut être mise..
Levotre123 -
jordane45 -

1 réponse
LOPERATION DOIT UTILISER UNE REQUETE QUI PEUT ETRE MISE A JOUR
cs_nawal59 -
tecman -

1 réponse
Rejoignez-nous