Message d'avertissement reçu la je vois pas

Un petit coup de main

Avertissement:La fonction 'LoadFullNameDisk' ne retourne pas une valeur pour tous les chemins de code. Une exception de référence null peut se produire au moment de l'exécution lorsque le résultat est utilisé.


Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
   CnxStaging.Open() ' Ouvre la connexion
        Dim StringSqlPartition As String = "SELECT * FROM TblDiskPartition WHERE OnUse='True' AND IdDiskPartition=" & IdDisk
        Dim CmdDiskPartition As New SqlCommand(StringSqlPartition, CnxStaging)
        Dim DrPartition As SqlDataReader = CmdDiskPartition.ExecuteReader
 
        If DrPartition.Read Then
            LoadFullNameDisk = DrPartition("DiskPartition").ToString() ' Retourne le nom complet de la partition
        End If
        DrPartition.Close() ' Ferme le DataReader
        CnxStaging.Close() ' Ferme la connexion
 
    End Function