none
IsDBNull RRS feed

  • Pergunta

  • Uma tabela do meu banco tem campos que podem estar com valores nulos, então eu tenho usado Try Catch End Try.

    A minha dúvida é se há com escrever menos código, pois para cada campo eu estou utilizando o método abaixo:

    If IsDBNull("nome_fantasia") Then
        a_nome_fantasia = ""
    End If

    quinta-feira, 20 de junho de 2013 16:40

Respostas

  • Existem varias opçoes:

    1 - Voce pode usar funcao isnull do SQL Server (caso esteja usando sql server como banco), deste jeito 

    select insull(campo1,'') as campo1, isnull(campo2,'') as campo2, isnull(campo3,0) as campo3 from tabela

    2- Definir suas variaveis para que elas aceitem nulos. Qualquer uma das linhas abaixo permitem que sua variavel aceito nulos:

    Dim ridesBusToWork1? As Boolean 
    Dim ridesBusToWork2 As Boolean?
    Dim ridesBusToWork3 As Nullable(Of Boolean)

    fonte: http://msdn.microsoft.com/en-us/library/ms235245.aspx

    3- Criar sua propria funcao isnull

    Public Function ConvertNullInteger(field As Object) As Integer
    
    If field = DBNull.Value Then
       ConvertNullInteger = 0
    Else
       ConvertNullInteger = CInt(field)
    End If
    
    End Function
    
    
    Public Function ConvertNullString(field As Object) As String
    
    If field = DBNull.Value Then
       ConvertNullString= ""
    Else
       ConvertNullInteger = field
    End If
    
    End Function

    Depois é só utilizar:

    a_nome_fantasia =ConvertNullString(campo)

    Att


    William John Adam Trindade
    Analyste-programmeur
    ----------------------------------------------------------

    Sogi informatique ltée

    sexta-feira, 5 de julho de 2013 17:03
    Moderador

Todas as Respostas

  • Ae pessoal! Alguém para dar um help?

    Att, Felipo Gonçalves | Microsoft Contingent Staff

    sexta-feira, 5 de julho de 2013 16:25
  • Existem varias opçoes:

    1 - Voce pode usar funcao isnull do SQL Server (caso esteja usando sql server como banco), deste jeito 

    select insull(campo1,'') as campo1, isnull(campo2,'') as campo2, isnull(campo3,0) as campo3 from tabela

    2- Definir suas variaveis para que elas aceitem nulos. Qualquer uma das linhas abaixo permitem que sua variavel aceito nulos:

    Dim ridesBusToWork1? As Boolean 
    Dim ridesBusToWork2 As Boolean?
    Dim ridesBusToWork3 As Nullable(Of Boolean)

    fonte: http://msdn.microsoft.com/en-us/library/ms235245.aspx

    3- Criar sua propria funcao isnull

    Public Function ConvertNullInteger(field As Object) As Integer
    
    If field = DBNull.Value Then
       ConvertNullInteger = 0
    Else
       ConvertNullInteger = CInt(field)
    End If
    
    End Function
    
    
    Public Function ConvertNullString(field As Object) As String
    
    If field = DBNull.Value Then
       ConvertNullString= ""
    Else
       ConvertNullInteger = field
    End If
    
    End Function

    Depois é só utilizar:

    a_nome_fantasia =ConvertNullString(campo)

    Att


    William John Adam Trindade
    Analyste-programmeur
    ----------------------------------------------------------

    Sogi informatique ltée

    sexta-feira, 5 de julho de 2013 17:03
    Moderador