ExecuteScalar error

Seguramente el campo contiene un NULL, el cual no puede convertirse a entero.
Para solucionarlo guarda el resultado en una variable declarada como Object y
comprueba si es nulo o no antes de convertirlo y devolverlo. Por ejemplo:

Dim valor As Object

valor = cmd.ExecuteScalar()

If valor Is DBNull.Value Then
Return 0 ' 0 o cualquier otro valor por defecto
Else
Return CType(obj, Integer)
End If

Eduardo A. Morcillo [MS MVP VB]
http://www.mvps.org/emorcillo

Private Function get_ti_ingre() As Integer
Dim comand As New SqlCommand("select cod_tipo_compra from
tipo_ingreso where nombre_tipo_ingreso=@n_t_in", conexion)
comand.Parameters.Add(New SqlParameter("@n_t_in",
SqlDbType.NVarChar))
comand.Parameters("@n_t_in").Value = Me.ComboBox1.Text
Try
conexion.Open()
Dim valor As Object
valor = comand.ExecuteScalar << aca reporta error
If (valor Is DBNull.Value) Then
Return 0
Else
Return CType(valor, Integer)
End If
Return CType(comand.ExecuteScalar, Integer)
Finally
conexion.Close()
End Try
End Function

Bueno creo que definitivamente es por el parametro.. :P
una orientada de como puedo mostrar solo ese resultado..
gracias.

valor = comand.ExecuteScalar << aca reporta error

¿Cual es el error?

Eduardo A. Morcillo [MS MVP VB]
http://www.mvps.org/emorcillo

algo de excepcion con sqlclient o algo asi... lo borre y
estoy trabajando de otra manera para obtener ese dato...

valor = comand.ExecuteScalar << aca reporta error

¿Cual es el error?

Eduardo A. Morcillo [MS MVP VB]
http://www.mvps.org/emorcillo


.