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

#1 Leonzio
01/11/2004 - 21:14 | Informe spam
Parece que lo que escribistes esta correcto... pero yo
mejor lo haria con un datatable.

Proba haciendo:

Dim table As New DataTable
...
conexion.Open()
adapta.Fill(table)
conexion.Close()

If table.Rows.Count > 0 Then
Return table.Rows(0).Item(0)
Else
Return Nothing
End If


Saludos
Leonzio
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





.

Respuesta Responder a este mensaje
#2 Líbero Gabriel Pizarro
01/11/2004 - 22:00 | Informe spam
proba en la ultima linea devolviendo

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

Suerte



"Fernando" escribió en el mensaje
news:326e01c4c04c$78049430$
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





Respuesta Responder a este mensaje
#3 Eduardo A. Morcillo [MS MVP VB]
02/11/2004 - 04:35 | Informe spam
No utilices un DataAdapter sino directamente el SqlCommand, usando su metodo
ExecuteScalar para ejecutar la consulta y obtener el valor.

Eduardo A. Morcillo [MS MVP VB]
http://www.mvps.org/emorcillo
Respuesta Responder a este mensaje
#4 Fernando
02/11/2004 - 13:34 | Informe spam
Un pequeño ejemplo por fa de el uso de este COmando.. :)
gracias..
No utilices un DataAdapter sino directamente el


SqlCommand, usando su metodo
ExecuteScalar para ejecutar la consulta y obtener el valor.

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


.

Respuesta Responder a este mensaje
#5 Eduardo A. Morcillo [MS MVP VB]
02/11/2004 - 16:22 | Informe spam
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
Ads by Google
Help Hacer una preguntaSiguiente Respuesta Tengo una respuesta
Search Busqueda sugerida