title image


Smiley Re: Mit ADO Tabellen in ACCESS-DB erstellen
hi,



du hast 2 möglichkeiten, entweder du benutzt



SQL:

deineConnection.Execute "CREATE TABLE deineTabelle"



oder du verwendest ADOX



Dim cat As New ADOX.Catalog

Dim tbl As New Table

Dim clm As New Column

Dim idx As New Index





cat.Create "Provider=Microsoft.Jet.OLEDB.4.0;" & _

"Data Source=C:\test.mdb" 'datenbank erstellen





tbl.Name = "TestTable"

cat.Tables.Append tbl 'tabelle erstellen



clm.Name = "col1" '

clm.Type = adDouble

tbl.Columns.Append clm 'column erstellen



'index erstellen

idx.Name = "PrimaryKey"

idx.PrimaryKey = True

idx.Columns.Append "col1"

tbl.Indexes.Append idx

Set cat = Nothing



bei adox verweis zu MS ADO Ext.2x for Dll and Security setzten
acc akut


geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: