CREATE TABLE Anweisung funktioniert nicht

Hallo zusammen,

ich möchte über VB eine Tabelle erstellen:

CREATE TABLE test (Sachnummer TEXT, Verkaufsnummer TEXT),
–> Dies funktionert.

Aber sobald ich versucht ein Hyperlink Feld miteinzufügen kommt eine Fehlermeldung

CREATE TABLE test (Sachnummer TEXT, Verkaufsnummer TEXT, Link HYPERLINK)
–> funktioniert nicht

Viele Grüsse
Johanna

Hallo,

CREATE TABLE test (Sachnummer TEXT, Verkaufsnummer TEXT, Link
HYPERLINK)
–> funktioniert nicht

geht auch nicht mit (Jet-)DDL.

Versuch es so:

Dim catDB As ADOX.Catalog 'Verweis auf MSADOX.DLL setzen!
Dim tbl As ADOX.Table
Set catDB = New ADOX.Catalog
catDB.ActiveConnection = CurrentProject.Connection
Set tbl = New ADOX.Table
With tbl
.Name = „Test“
Set .ParentCatalog = catDB
With .Columns
.Append „Sachnummer“, adVarWChar
.Append „Verkaufsnummer“, adVarWChar
.Append „Link“, adLongVarWChar
.Item(„Link“).Properties(„Jet OLEDB:Hyperlink“) = True
End With
End With

catDB.Tables.Append tbl
Set tbl = Nothing
Set catDB = Nothing

Allerdings ist:

– von Hyperlink-Feldern in einer Tabelle abzuraten,
– ein Primärschlüssel(feld) in jeder Tabelle anzuraten

Grüße
Franz, DF6GL

Allerdings ist:

– von Hyperlink-Feldern in einer Tabelle abzuraten,
– ein Primärschlüssel(feld) in jeder Tabelle anzuraten

— ein Feldname „LINK“ nicht anzuraten, da das Wort „Link“ ein geschützter Begriff in Access ist!

Grüße
Wolfgang
(Netwolf)