Wie füge ich zur Laufzeit ein Feld in eine Accesstabelle ein

[niao]

Hi,

vielen Dank für die rasche Antwort, aber funcioniert nicht.

Procedure SetNewFiled(aConnection: TADOConnection; TableName, FieldName: String);
begin
ADOQuery.Connection := aConnection;
ADOQuery.SQL.Text := 'ALTER TABLE ' + TableName + 'ADD COLUMN ' + FieldName +' varchar(200)';
ADOQuery.ExecSQL;
end;

Bei ExecSQL kommmt folgender Fehler: Exception EOleException: Syntaxfehler in ALTER TABLE-Anweisung

Wer kann bitte helfen!