No funciona GROUP BY en un SELECT de un Dataset ??

OK, ahi va:

Dim oledbConnection As New
OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0; Data
Source=C:\MiDDBB.mdb")

Dim midataset As DataSet = New DataSet()

Dim OleDbDataAdapter1 As New OleDb.OleDbDataAdapter()

Dim query1 As String = "select year(fecha from MiTabla where (Loquesea)
GROUP BY Year(Fecha)"

oledbConnection.Open()

OleDbDataAdapter1.SelectCommand = New OleDb.OleDbCommand(query1,
oledbConnection)

.OleDbDataAdapter4.Fill(midataset, "MiTabla") -- AQUI FALLA

If (oledbConnection.State = ConnectionState.Open) Then

oledbConnection.Close()

End If



SI QUITO el GROUP BY , FUNCIONA



"Eduardo Robles" escribió en el mensaje
news:

Hola grupo:

En un query de un dataset la sentencia Select no funciona si añado un

GROUP

BY. Alguien sabe lo que ocurre ?

Gracias. y saludos.

OK, ahi va:
Dim oledbConnection As New
OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0; Data
Source=C:\MiDDBB.mdb")
Dim midataset As DataSet = New DataSet()
Dim OleDbDataAdapter1 As New OleDb.OleDbDataAdapter()
Dim query1 As String = "select year(fecha from MiTabla where (Loquesea)
GROUP BY Year(Fecha)"
oledbConnection.Open()
OleDbDataAdapter1.SelectCommand = New OleDb.OleDbCommand(query1,
oledbConnection)
.OleDbDataAdapter4.Fill(midataset, "MiTabla") -- AQUI FALLA
If (oledbConnection.State = ConnectionState.Open) Then
oledbConnection.Close()
End If

SI QUITO el GROUP BY , FUNCIONA

"SqlRanger" escribió en el mensaje
news:
No entiendo muy bien tu pregunta. Las sentencias Sql no se pueden ejecutar
contra un DataSet puesto que no disponen de motor sql. Sólo los sistemas de
bases de datos son capaces de ejecutar SQL.

¿Podrías dar más detalles? Sentencia SQL que estás usando y fragmento de
código.



Saludos:

Jesús López
MVP Microsoft .NET

"No darás tropezón ni desatino que no te haga adelantar camino"