Hallo,
ich möchte eine Excel Datei öffnen, auslesen und ein Feld verändern und danach wieder speichern.
Das ganze versuche ich per TADODataSet, allerdings kann ich das Feld nicht editieren.
Bei DataSet.Edit tritt ein Fehler auf, lass ich diese Zeile weg, tritt der Fehler auf:
"Datenmenge weder im Editir- noch im EinfügeModus"
Ein zweites Problem wäre das beim Speichern des DataSets irgendwie nur Müll am Schluss
in Excel rauskommt (test.xls).
Desweiteren weiss ich leider nicht wie ich per Update
Query das lösen sollte...
Ich kann ja schlecht machen "update [mini0802$] set Field7 = 'X' where Field1 = '22022'".
bitte um Hilfe,
mfg
Moggy
Delphi-Quellcode:
DataSet.Connection := myConnection;
DataSet.CommandText := 'select * from [mini0802$]';
DataSet.Active := True;
while (DataSet.Eof = false) do
begin
if (DataSet.Fields[0].Text = '22022') then
begin
ShowMEssage(DataSet.Fields[0].Text + ' - ' + DataSet.Fields[6].Text);
DataSet.Edit;
DataSet.Fields[7].Text := 'X';
end;
DataSet.Next;
end;
DataSet.SaveToFile('test.xls');