Hallo zusammen,
ich würde gerne eine weitere Spalte (E-Mail) an ein vorhandenes dBase-File(dbf4) hinzufügen.
Das vorhandene dBase-File sieht z.B. so aus. Wobei die Anzahl der Spalten Variieren kann.
Name |Adresse |Ort |Tel
Otto |Hauptstraße |Berlin |+49
Hans |Blumenweg |Bonn |+49
Leider kann ich keine weitere Spalte an mein vorhandenes dBase-File hinzufügen. Ich bekomme folgende Fehlehrmeldung:
„Die Operation wird für eine Tabelle mit Daten nicht unterstützt“
Aus der Fehlermeldung entnehme ich, dass ein neues dBase-File erstellt werden muss?
Falls ich ein neues dBase-File erstellen muss. Wäre es nett, wenn mir jemand zeigen könnte, wie ich ein neues dBase-File erstelle und den Inhalt vom vorhanden dBase-File in das neue dBase-File kopieren kann.
Danke schon mal im Voraus!!
Grüße
Dim conConnection As New ADODB.Connection
Dim cmdCommand As New ADODB.Command
conConnection.CursorLocation = adUseClient
conConnection.ConnectionString = „Provider=Microsoft.Jet.OLEDB.4.0;“ & _
„Data Source=C:\shape;“ & _
„Extended Properties=DBASE IV;Mode=Read|Write“
'Opening the connection
conConnection.Open
MsgBox „Verbindung ist hergestellt!“
With cmdCommand
.ActiveConnection = conConnection
.CommandText = „ALTER TABLE test.dbf ADD COLUMN email VARCHAR(10)“
.CommandType = adCmdText
.Execute adCmdText
End With
'Close the connection
conConnection.Close