請教前輩,小弟如何多筆資料做Update |
|
答題得分者是：andersonhsieh
|
|
Ethan
版主   發表：101 回覆：170 積分：78 註冊：2006-07-05 發送簡訊給我 |
現在小弟的table裡有300筆資料,然後ID是從1~300,現在我要把每一筆的ID改成20020001~20020300,我底下這樣寫好像不對...請前輩指導,謝謝!! procedure TForm1.Button2Click(Sender: TObject);
var
i:integer;
begin
query1.Close;
for i:=1 to 300 do
begin ListBox1.Items.Add(inttostr(20020001 i));
ListBox2.Items.Add(inttostr(i));
query1.SQL.Add('UPDATE cus_basic_c SET id=:ID1 WHERE id=:ID2');
query1.paramByName('ID1').AsInteger:=20020001 i;
query1.paramByName('ID2').asinteger:=i; end;
Query1.Open;
end;
|
|
andersonhsieh
版主 發表：33 回覆：531 積分：439 註冊：2002-06-10 發送簡訊給我 |
引言: 現在小弟的table裡有300筆資料,然後ID是從1~300,現在我要把每一筆的ID改成20020001~20020300,我底下這樣寫好像不對...請前輩指導,謝謝!! procedure TForm1.Button2Click(Sender: TObject); var i:integer; begin query1.Close; for i:=1 to 300 do begin Query1.SQL.CLEAR;//加入這一行 ListBox1.Items.Add(inttostr(20020001 i)); ListBox2.Items.Add(inttostr(i)); query1.SQL.Add('UPDATE cus_basic_c SET id=:ID1 WHERE id=:ID2'); query1.paramByName('ID1').AsInteger:=20020001 i; query1.paramByName('ID2').asinteger:=i; Query1.execsql;//加入這一行,這才是正確的用法 end; Query1.Open;//這行不需要,而且用法錯誤 end;@@~~飛翔在天際的精靈~~@@
------
@@~~飛翔在天際的精靈~~@@ |
|
kadee
高階會員 發表：11 回覆：141 積分：165 註冊：2002-03-20 發送簡訊給我 |
發表時間：2002-09-24 11:14:38
IP:61.218.xxx.xxx 未訂閱
系統時間：2024-04-29 13:09:29
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |