ich habe doch noch ein Problem...
und zwar schreibt er nur einen Datensatz im Programmablauf in die Excel Datei...
alle darauffolgenden gehen verloren... wieso ist das so ?
ist die Datei beim zweiten mal schreibgeschützt ?
Die nachfolgenden Zeilen können mehrmals während des Programmablaufs ausgeführt werden...
ConnectionString:
Delphi-Quellcode:
myConnection := TADOConnection.Create(nil);
DataSet := TADODataSet.Create(nil);
myConnection.ConnectionString := 'Provider=Microsoft.Jet.OLEDB.4.0;'
+ 'Data Source=' + sPath + 'test.xls;'
+ 'Mode=ReadWrite;'
+ 'Extended Properties="Excel 8.0;HDR=Yes";'
+ 'Persist Security Info=False';
[/delphi]
Delphi-Quellcode:
DataSet.Connection := myConnection;
DataSet.CommandText := 'SELECT * FROM [test$]';
DataSet.Open;
DataSet.First;
while (DataSet.Eof = false) do
begin
if (DataSet.Fields[0].Text = txtPErsonalNummer.Text) then
begin
DataSet.Edit;
DataSet.Fields[7].Text := 'X';
DataSet.Post;
end;
DataSet.Next;
end;
DataSet.Close;
myConnection.Close;