Resultado de Consulta

01/11/2004 - 20:53 por Fernando | Informe spam
Amigos hago una consulta a una tabla bien restringida que
me devuelve un solo dato.. de todo el conjunto de datos que
hay en la tabla pero no se como lo puedo recupar ?
y cuando lo hago con un DataSet me sale error.. lo recupero
asi. :
Public Funtion get_code() As Integer
Dim comando as New SqlCommand("select codigo from producto
where ..<aqui estan las condiciones>...",conexion)
Dim oset As New DataSet()
Dim adapta as New SqlDataAdapter()
adapta.SelectCommand=comando
conexion.Open()
adapta.Fill(oset,"producto")
conexion.Close()

Return oset.Tables("producto").Rows(0).Item(0)

Obviamente solo quiero retornar ese dato.. :) espero que
alguien me pueda orientar .. :) gracias.. :P

Preguntas similare

Leer las respuestas

#6 Henry.Net
02/11/2004 - 20:33 | Informe spam
Esto es lo mas optimo

Saludos.

"Eduardo A. Morcillo [MS MVP VB]" <emorcilloATmvps.org> escribió en el
mensaje news:Os6CN$
Un pequeño ejemplo por fa de el uso de este COmando.. :)
gracias..



Public Function get_code() As Integer

Dim comando As New SqlCommand("select codigo from producto where
..<aqui estan las condiciones>...", conexion)

Try

conexion.Open()

Return CType(comando.ExecuteScalar(), Integer)

Finally

conexion.Close()

End Try

End Function

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


Respuesta Responder a este mensaje
#7 Fernando
02/11/2004 - 21:09 | Informe spam
esta es al funcion pero me sale un error en el Ctype. por
que... ?


Private Function get_c_med() As Integer
Dim com As New SqlCommand("select cod_medida from medida" _
"where nombre=@n_cor", conexion)
com.Parameters.Add(New
SqlParameter("@n_cor",SqlDbType.NVarChar))
com.Parameters("@n_cor").Value = Me.ComboBox5.Text
Try
conexion.Open()
Return CType(com.ExecuteScalar(), Integer)
Finally
conexion.Close()
End Try
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una pregunta AnteriorRespuesta Tengo una respuesta
Search Busqueda sugerida