La référence d'objet n'est pas définie à une instance d'objet

**Crowww** · 28/05/2013, 14h06

Bonjour,

J'ai un petit problème sur la réalisation d'une commande d'enregistrement.
Voici 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
 
Private Sub XMLToolStripMenuItem_Click(sender As System.Object, e As System.EventArgs) Handles EnregistrerToolStripMenuItem.Click
        Dim ds As DataSet = dgvMainHiver.DataSource
        Try
            With SaveTab2()
                .Title = "Enregistrer"
                .InitialDirectory = "\\"
                .Filter = "Fichier XML (.xml)|*.xml|Tous les fichiers|*.*"
                .DefaultExt = "xml"
                .AddExtension = True
            End With
 
            If SaveTab2.ShowDialog = Windows.Forms.DialogResult.OK Then
                If SaveTab2.FileName.ToString <> "" Then
                    ds.WriteXml(SaveTab2.FileName, XmlWriteMode.IgnoreSchema)
                End If
            End If
        Catch ex As Exception
            MessageBox.Show(ex.Message)
        End Try
    End Sub

Le problème vient lorsque j'ai choisit l'emplacement de mon fichier ainsi que son nom. Lorsque je vais cliquer sur enregistrer une MessageBox me dit :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
La référence d'objet n'est pas définie à une instance d'objet

Je pense que l'erreur doit se situer dans cette zone là mais je n'arrive pas à l'identifier :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
If SaveTab2.FileName.ToString <> "" Then
               ds.WriteXml(SaveTab2.FileName, XmlWriteMode.IgnoreSchema)
End If

**_Ez3kiel** · 28/05/2013, 14h20

Un objet naît, vit et meurt.

Tu déclares un objet de type DataSet, mais tu ne le construis pas.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Dim ds As DataSet = dgvMainHiver.DataSource

Ainsi cela devient

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Dim ds As DataSet = New DataSet()
ds = dgvMainHiver.DataSource

**Crowww** · 28/05/2013, 14h24

Hélas, il doit y avoir une autre erreur car j'ai toujours le même problème

**_Ez3kiel** · 28/05/2013, 14h27

Tu as utilisé un constructeur pour SaveTab2 ?

Si c'est toujours un souci de référence d'objet non définie à une instance d'objet, à toi de voir toutes tes déclarations d'objet, si tu as bien le New correspondant.

**chaparo** · 28/05/2013, 14h30

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
Catch ex As Exception
       MessageBox.Show(ex.Message)
End Try

Personnellement je prefere

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
Catch ex As Exception
       MessageBox.Show(ex.toString)
End Try

Car il y a la ligne ou ça a planté

**Crowww** · 28/05/2013, 14h31

Pour le saveTab2 j'ai simplement créé en Winform un SaveFileDialog. Mais peut etre (même surement) me suis-je trompé dans son utilisation?

**_Ez3kiel** · 28/05/2013, 14h33

Envoyé par chaparo

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
Catch ex As Exception
       MessageBox.Show(ex.Message)
End Try

Personnellement je prefere

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
Catch ex As Exception
       MessageBox.Show(ex.toString)
End Try

Car il y a la ligne ou ça a planté

Oui aussi ...

@Crowww: Suis la méthode de chaparo pour voir dans la StackTrace de l'exception la ligne où l'objet n'a pas été construit.

**Crowww** · 28/05/2013, 14h35

Alors après avoir modifié le catch voilà le message d'erreur :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
System.NullRefenceException : La référence d'objet n'est pas définie à une instance d'un objet.
à WindowsApplication2.VisualiserHiver.XMLToolStripMenuItem_Clik(Object
sender, EventArgs e) dans D:\Visual Studio 2010\Projects\Main
Courante\WindowsApplication2\VisualiserHiver.vb:ligne 60

**_Ez3kiel** · 28/05/2013, 14h38

Envoyé par Crowww

Alors après avoir modifié le catch voilà le message d'erreur :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
System.NullRefenceException : La référence d'objet n'est pas définie à une instance d'un objet.
à WindowsApplication2.VisualiserHiver.XMLToolStripMenuItem_Clik(Object
sender, EventArgs e) dans D:\Visual Studio 2010\Projects\Main
Courante\WindowsApplication2\VisualiserHiver.vb:ligne 60

... Et qu'as-tu à la ligne 60 de VisualiserHiver ... ?

**Crowww** · 28/05/2013, 14h40

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

 ds.WriteXml(SaveTab2.FileName, XmlWriteMode.IgnoreSchema)

**chaparo** · 28/05/2013, 14h47

Du coup si tu passe en pas a pas tu verras surement voir nothing sur ton SaveTab2()

du coup il faut que tu fasse un

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
 
 SaveTab2 = New ... With {
                Title = "Enregistrer",
                InitialDirectory = "\\",
                Filter = "Fichier XML (.xml)|*.xml|Tous les fichiers|*.*",
                DefaultExt = "xml",
                AddExtension = True,
            }

Un truc du style

**_Ez3kiel** · 28/05/2013, 14h50

Bien, donc tu as une exception qui te dit qu'un objet n'est pas instancié, qui te donne la ligne où il est, à cette ligne il y a 3 objets, donc 1 chance sur 3, sachant que quelques posts plus haut on a instancié ds, 1 chance sur 2, sachant que ton SaveTab( de type SaveFileDialog) est -en théorie- instancié par ton designer (si j'ai bien tout suivi), il ne nous reste qu'une possibilité ... OuiOuiOui tout à fait le XmlWriteMode !

A toi de rajouter un

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Dim mode as XmlWriteMode = New XmlWriteMode()

Afin de pouvoir faire

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ds.WriteXml(SaveTab2.FileName, mode.IgnoreSchema)

Car non, tu ne peux pas utiliser directement XmlWriteMode dans ta méthode WriteXML, l'objet c'est rigoureux, et ça suit un cycle, on instancie l'objet, on s'en sert, on le dispose. (Naissance/Vie/Mort)

**Crowww** · 28/05/2013, 14h52

Euh, je vais surement paraître con mais j'ai pas compris ce que je dois mettre entre le New et With

**Crowww** · 28/05/2013, 14h56

Lorsque je tente de faire comme tu dit Ez3Kiel, il ne veut pas du Mode et veut le remplacer par XmlWriteMode, même instancier

**chaparo** · 28/05/2013, 14h58

Chez moi XmlWriteMode est un Enum.
On est pas obliger d'instancier un enum normalement.

Euh, je vais surement paraître con mais j'ai pas compris ce que je dois mettre entre le New et With

Qu'elle est ton type pour SaveTab2 ?

**Crowww** · 28/05/2013, 15h02

Et bien je ne sais pas vu que je l'ai créer via le WinForm. Je ne l'ai pas créer par code. :s Je suis vraiment désolé de compliquer je suis un petit débutant en programmation

**_Ez3kiel** · 28/05/2013, 15h06

Au temps pour moi et merci de la précision Chaparo ... Je ne fais pas d'XML, maintenant je saurais.

Si j'ai bien compris SaveTab2 est un control SaveFileDialog, mais s'il est créé par le Designer, alors le Designer l'a instancié en théorie ...

**Crowww** · 28/05/2013, 15h08

Oui c'est cela Ez3Kiel, mais il est vide :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
Private Sub SaveTab2_FileOk(sender As System.Object, e As System.ComponentModel.CancelEventArgs) Handles SaveTab2.FileOk
 
    End Sub

**chaparo** · 28/05/2013, 15h10

Arrete toi en pas à pas sur la ligne 60 et sort les espion pour voir quel variable est à nothing.

**Crowww** · 28/05/2013, 15h13

Je n'avais jamais utilisé l'espion jusqu’à maintenant mais si j'ai bien vu le ds est a nothing.

La référence d'objet n'est pas définie à une instance d'objet

VB.NET

Discussions similaires

Partager

Partager