vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
Top-Preis! AP-Access-Tools-CD Volume 1  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

VB & Datenbanken
Noch ein Kot 
Autor: Prian0815
Datum: 21.06.06 12:37

Den Code hab ich noch in meinem schlauen Access- Buch gefunden:
Sub FeldInfosAuslesen()
Dim ADOKAT As New ADOX.Catalog
Dim TabDef As ADOX.Table
Dim s_Beschr As String

ADOKAT.ActiveConnection = CurrentProject.Connection
Set TabDef = ADOKAT.Tables(“Artikel”)
With TabDef
For I = 0 To .Columns.Count – 1
Debug.Print .Columns(I).Name
Debug.Print .Columns(I).Properties(“Description”)
Debug.Print .Columns(I).DefinedSize
Debug.Print .Columns(I).Type
Debug.Print .Columns(I).NumericScale
Debug.Print .Columns(I).Precision
Debug.Print .Columns(I).Attributes
Next I
End With
Set ADOKAT = Nothing
EndSub

Gruß Armin

P.S.: always look on the bright side of Life!
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Spaltennamen einer Tabelle auslesen2.386AndiiiA21.06.06 11:01
Re: Spaltennamen einer Tabelle auslesen1.684Prian081521.06.06 12:05
Noch ein Kot1.516Prian081521.06.06 12:37
Re: Spaltennamen einer Tabelle auslesen1.747AndiiiA21.06.06 12:40

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2025 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel