Visual Basic.NET - Dato devuelto por COUNT

 
Vista:

Dato devuelto por COUNT

Publicado por Alejandro (4 intervenciones) el 10/04/2012 23:15:36
Hola.

Tengo el siguiente código en el programa y no se como recuperar el dato:

' VER CUANTOS REGISTROS HAY
Contador = 0
cSQL = "SELECT COUNT(T02SECUEN) FROM TAB02_ESP_ING "
Orden = New OleDbCommand(cSQL, MDB)
SPS = Orden.ExecuteReader()

If SPS.HasRows Then
Contador = SPS("T02SECUEN") ' Aquí me da el error.
End If
SPS.Close()

Un saludo
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

Dato devuelto por COUNT

Publicado por David (46 intervenciones) el 11/04/2012 21:09:18
Hola Alejandro, podrias probar con ponerle un alias a el resultado como:
cSQL = "SELECT COUNT(T02SECUEN) as Resultado FROM TAB02_ESP_ING "

o probar con llevarlo a una tabla algo asi:

Contador = 0
cSQL = "SELECT COUNT(T02SECUEN) FROM TAB02_ESP_ING "
Orden = New OleDbCommand(cSQL, MDB)
Dim oAdapter As New OleDbDataAdapter(Orden)
Dim oData As New DataTable
oAdapter.Fill(oData)
If oData.Rows.Count > 0 Then
Contador = oData.Rows(0).Item("Resultado") ' el nombre del alias.
End If

espero que te sirva saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Dato devuelto por COUNT

Publicado por ros (21 intervenciones) el 12/04/2012 18:33:23
Prueba de esta manera lo mismo te funciona.

Contador = SPS(0)

Pero si te gustan los nombres
Contador = VAL(SPS(SPS.GetOrdinal("NOMBRE CAMPO DEL FICHERO")).ToString)
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Dato devuelto por COUNT

Publicado por Alejandro (4 intervenciones) el 14/04/2012 12:04:04
Al final lo he resuelto así:

cSQL = "SELECT COUNT(T02SECUEN) FROM TAB02_ESP_ING "
Orden = New OleDbCommand(cSQL, MDB)
SPS = Orden.ExecuteReader()

If SPS.HasRows Then
SPS.Close()
Contador = Orden.ExecuteScalar()
else
SPS.Close()
End If

no se si será correcto, pero a mi me funciona.

Un saludo y gracias por ayudarme.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar