Hallo Liste,
wir erstellen mit ADOX wunderbare Tabellen. Allerdings soll bei den
Textfeldern die die L�nge "Null" erlaubt sein.
Wir kriegen das nicht hin.
Die Fehlermeldung:
"Ein Objekt, das dem angeforderten Namen oder dem Ordinalverweis entspricht,
kann nicht gefunden werden. "
erhalten wir bei folgendem Script:
For i = 0 to feldermax - 1
select case trim(typliste(i))
case "Zahl"
tbl.Columns.Append trim(feldliste(i)),
adInteger , laengeliste(i)
case "Auto"
Set col = CreateObject("ADOX.Column")
With col
.Name = trim(feldliste(i))
.Type = adInteger
End With
Set col.ParentCatalog = cat
col.Properties("Autoincrement") = True
tbl.Columns.Append col
case "Ja/Nein"
tbl.Columns.Append trim(feldliste(i)),
adBoolean , laengeliste(i)
case "Datum"
tbl.Columns.Append trim(feldliste(i)),
adDate , laengeliste(i)
case "Memo"
tbl.Columns.Append trim(feldliste(i)),
adLongVarWChar , laengeliste(i)
case else
col.Properties("Allow Zero Length") =
True ''HIER KOMMT DIE
FEHLERMELDUNG !!!!!!!!!!
tbl.Columns.Append trim(feldliste(i)),
, laengeliste(i)
end select
next
Die Variable feldliste(i) hat an der Stelle, an der der Fehler auftritt, den
Wert "ID" , was dem Feldnamen entsprechen soll.
weis jemand Rat?
Gruss
Michael Kothe
| [aspdedatabase] als [email protected] subscribed
| http://www.aspgerman.com/archiv/aspdedatabase/ = Listenarchiv
| Sie k�nnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdedatabase.asp
