Keskustelu: Ohjelmointikysymykset: VB.NET: vb.NET Listboxiin access tietokannan taulujen nimet

Millä tavalla pystyn lukemaan listboxiin access tietokannan taulujen nimet?
Listbox.Items.Add(dsRekisterit.Tables("Rekisterit").TableName) tulostaa vain Rekisterit tekstin eikä tietokannan taulujen nimiä. Mikä avuksi?

Moikka Rautakivi!
Sovella tuolta löytyvää kamaa...( For Each tdf In dbs.TableDefs)... https://www.ohjelmointiputka.net/keskustelu/11388-access-tietokannan-sisältä-sarakkeen-nimen-haku

Toivottavasti tästä on apua...

Kiitos, mutta eipä esimerkistä ollut apua

Moikka Rautakivi!

Aloin aivan tässä ihmettelemään, että missä tökkii...
Joten heitä sun formille ekaks Microsoftin Adodc datacontrolli ja pistä sen Visible arvoksi False. Sun ei tarvitse tehdä controllin ominaisuusasetuksiin mitään muita muutoksia. Älä kysy miksi, mutta jos sitä datacontrollia ei ole formilla niin VB ei tajua tota öDim dbs As Databaseö vaan ilmoittaa, että User-defined type not typed…

Ja sit testaa toi allaoleva kooodinpätkä:

Private Sub Form_Load()
 Dim dbs As Database
 Set dbs = OpenDatabase("polku\tiedosto.mdb")
 For Each tdf In dbs.TableDefs
  Combo1.AddItem tdf.Name 'Hae tässä toi tieto mihin controlliin itse tykkäät
 Next tdf
  Set dbs = Nothing
End Sub

Ota sen jälkeen se datacontrolli veks siitä formilta, käynnistä ohjelma…IHMETTELE ja kerro mulle, jos keksit vastauksen kysymykseen MIKSI?

PS. Toi palauttaa myös TableDefs kokoelman Systeemitalut (MSys*...) eli kehottaisin jättämään ne koskemattomiksi näin aluksi ja suotamaan ne pois sun listbox'sta yksinkertaisella ehtolauserakennelmalla!!!