🚀 go-pugleaf

> Kan je die kolom niet op kolombreedte 1 of 0 zetten ? Zo doe ik het in een 
> Flexgrid in vb 6...
>
> Bart

Ik heb uiteindelijk iets gevonden die het zou moeten kunnen maar...

sql = "select g.id as 'Id', c.omschrijving as 'Categorie', " _
      & "g.omschrijving as 'Genre', g.categorieId " _
      & "from tblGenre g " _
      & "left join tblCategorie c on " _
      & "g.categorieId = c.id " _
      & "order by g.omschrijving"

tabel = laadGegevens(sql).Tables("gegevens")
tabel.Columns(0).ColumnMapping = MappingType.Hidden
TdgGenres.DataSource = tabel

Die voorlaatste regel zou er dus moeten voor zorgen dat Column 0 (hier 
dus g.id as 'Id' verborgen wordt.

Ik kreeg echter een Exception: ArgumentOutOfRangeException...

Nogtans als ik msgbox(tabel.Columns(0).ColumnName) deed kreeg ik de 
juiste columnname terug... (Daar had hij dus geen problemen met de 
'range')

overigens doet die functie laadGegevens het volgende:

Public Function laadGegevens(ByVal s As String) As DataSet
   Dim cnn As New 
OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data    Source=" & 
vars.db)

   Dim socket As New OleDbDataAdapter(s, cnn)
   Dim ds As New DataSet

   socket.Fill(ds, "gegevens")
   cnn.Close()
   Return ds
End Function

Enige idee wat het probleem kan zijn?

-- 
Groeten,
StriKe

http://www.internetfreakz.be