使用ADODataSet讀入Excel卻無法編輯？     

if Curr = '' then
ADODataSet1.Edit;
ADODataSet1.Fields[0].AsString := up;
ADODataSet1.Post;
end; 

Post會出現DataSet not in edit or insert mode的錯誤訊息。 搜尋到的文章都說用ADO可以直接編輯內容，是我誤解還是我的方法錯誤，請各位大大幫忙？謝謝 發表人 - wwwbbs 於 2005/08/21 13:45:56

您好﹗    試試在設計時期不要將ADODataSet的Active屬性值設為True﹐如果有使用ADOConnection元件﹐亦不要將ADOConnection的Connected屬性值設為True﹒    ================================= 有空來瞅瞅我﹗因為我是您的朋友﹐有您真好﹗ ================================

------
忻晟

感謝版主大大 我是在Run Time時才把ADODataSet的Active設為True，不曉得是不是我的連線字串參數有誤，可否請各位前輩幫我看一下。     

ADODataSet1.Active := False;
if OpenDialog1.Execute then
fName := OpenDialog1.FileName;
ConnStr := ConnStr   'Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source=';
ConnStr := ConnStr   fName;
ConnStr := ConnStr   ';Mode=ReadWrite;Extended Properties=Excel 9.0;';
ConnStr := ConnStr   'Jet OLEDB:System database="";';
ConnStr := ConnStr   'Jet OLEDB:Registry Path="";';
ConnStr := ConnStr   'Jet OLEDB:Database Password="";';
ConnStr := ConnStr   'Jet OLEDB:Engine Type=35;';
ConnStr := ConnStr   'Jet OLEDB:Database Locking Mode=0;';
ConnStr := ConnStr   'Jet OLEDB:Global Partial Bulk Ops=2;';
ConnStr := ConnStr   'Jet OLEDB:Global Bulk Transactions=1;';
ConnStr := ConnStr   'Jet OLEDB:New Database Password="";';
ConnStr := ConnStr   'Jet OLEDB:Create System Database=False;';
ConnStr := ConnStr   'Jet OLEDB:Encrypt Database=False;';
ConnStr := ConnStr   'Jet OLEDB:Don''t Copy Locale on Compact=False;';
ConnStr := ConnStr   'Jet OLEDB:Compact Without Replica Repair=False;';
ConnStr := ConnStr   'Jet OLEDB:SFP=False';
ADODataSet1.ConnectionString := ConnStr;
ADODataSet1.CommandText := 'select * from [' Edit1.Text '$]';
ADODataSet1.Active := True; 

以上可以正常讀入到DBGrid，但就是沒辦法透過程式去修改內容。 發表人 - wwwbbs 於 2005/08/22 23:56:14

有哪位大大可以指導一下嗎？ 環境是win2000 office2000 Delphi 6.0(Update 2)