PDA

Vollständige Version anzeigen : Feststellen ob Feld in Tabelle schon vorhanden


mxs
18.06.2001, 13:18
Hallo,

Kann mir jamand sagen wie man mittels VBA feststellen kann ob ein Feld in einer tabelle schon vorhanden ist

bzw wie fange ich den fehler ab wenn ich einfach versuche ein recordset aufzumachen und dabei die gesuchten felder abfrage

dank

mxs

Morli
18.06.2001, 13:30
Hallo mxs,

also im Access97:

for i= 1 to rst.fields.count-1
if rst.fields(i).name="xxx" then
msgbox "feld vorhanden"
endif
next i


Gruß

Rainer :)

Stema
18.06.2001, 13:38
Hallo mxs,

mit folgender Routine kannst Du alle Felder einer Tabelle abfragen:
Dim DB As Database
Dim R As TableDef
Dim Feld As Field

Set DB = CurrentDb
Set R = DB.TableDefs("Table1")
For Each Feld In R.Fields
MsgBox Feld.Name
Next