Bonjour,
Pour simplifier, j'ai une classe avec plusieurs Property dedans :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6 Public Class BatchData ... Public Property MarkCorrection As Integer Public Property GridCorrection As String ... End Class
Dans mon code principal, j'instancie cette classe et je lui assigne ou non des valeurs :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2 Dim bd as new BatchData() bd.MarkCorrection = 1
Après j'ai une classe qui me permet de récupérer ces valeurs et les stocker dans une BDD mais la ça bloque :
Le problème c'est que je n'ai pas assignée de valeur à GridCorrection et il est nul. Du coup
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 Public Sub InsertBatchData(ByVal pExpID As Integer, ByRef pBatchData As BatchData) Try Dim insertBatchData As SqlCommand = New SqlCommand("InsertBatchData") With insertBatchData.Parameters .Add(New SqlParameter("@markCorrec", SqlDbType.Int)) .Add(New SqlParameter("@gridCorrec", SqlDbType.VarChar)) End With With insertBatchData .Parameters("@markCorrec").Value = IIf(pBatchData.NumberOfMarksNY.ToString Is Nothing, DBNull.Value, pBatchData.NumberOfMarksNY) .Parameters("@gridCorrec").Value = IIf(pBatchData.WaferGridCorrection.ToString Is Nothing, DBNull.Value, pBatchData.WaferGridCorrection.ToString) End With ExecuteRequest.NonQueryStoredProcedure(insertBatchData) Catch ex As Exception Console.WriteLine("Erreur Table Batch Data : " & ex.Message) End Try End Sub
lève l'exception :
Code : Sélectionner tout - Visualiser dans une fenêtre à part IIf(pBatchData.WaferGridCorrection.ToString Is Nothing, DBNull.Value, pBatchData.WaferGridCorrection.ToString)Ma question est : Comment je peux savoir si l'objet est instancié ?La référence d'objet n'est pas définie à une instance d'un objet
Merci d'avance
Jah
Partager