資料更新如何用 SQL 指令做到
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('UPDATE 訂單 SET 序號=RecNo');
ADOQuery1.ExecSQL;
SQL 指令的 UPDATE 資料表 SET 欄位名=設定值
其設定值能否抓取資料指標呢？(RecNo)

因該是可以使用 資料指標 來做更新的值
是否可以請你把問題 再說明清楚，或放上程式碼？




===================引 用 ThePresent 文 章===================
資料更新如何用 SQL 指令做到
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('UPDATE 訂單 SET 序號=RecNo');
ADOQuery1.ExecSQL;
SQL 指令的 UPDATE 資料表 SET 欄位名=設定值
其設定值能否抓取資料指標呢？(RecNo)

------
學藝不精 謝多多指教

資料更新如何用 SQL 指令做到
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('UPDATE 訂單 SET 序號=RecNo');
ADOQuery1.ExecSQL;
SQL 指令的 UPDATE 資料表 SET 欄位名=設定值
其設定值能否抓取資料指標呢？(RecNo)

-------------------------------

想要做的功能如下

ADOQuery1.FIRST
WHILE NOT(訂單.EOF) DO
BEGIN
ADOQuery1.EDIT;
ADOQuery1.序號.VALUE=ADOQuery1.RECNO;
ADOQuery1.POST;
ADOQuery1.NEXT;
END;

因為操作時有刪除訂單的動作
我想做一個按鈕可以讓序號依資料指標來重整序號
但是當資料量變大時
處理時間就會變長

不知是否有什麼方法可以解決呢？
因為看到書上有提到 SQL 指令
才會想到是否用 SQL 指令就能達到我想要的功能

謝謝關心與回覆的大家們

編輯記錄

長官：

tQuery.RecNo 指的是資料自資料取回後，在tQuery中的序號而並非在資料庫中之序號，所以您這樣做會發生錯誤，因為雖然SQL語法不同，但第一筆資料的 RecNo都是1。

所以 Sql Server 中可以宣告一個 Field 為 [DataIndex] [int] IDENTITY (1, 1) NOT NULL，如此才能得到唯一的序號。

If you are using Oracle database, you can use the RecID field which is given by oracle system as defaul key of each table.
Therefore, the SQL command that you have to write in ADOQuery must select this key field, should look like
"select RecID, oreder_id, ..... from ordertable". As I remember, "RecID" is a keywork which used to obtain this defaul key value.
Then, you can use this key value to update a record.
But, you can not update the value of this key because it was assigned by Oracle database.

===================引 用 ThePresent 文 章===================
資料更新如何用 SQL 指令做到
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('UPDATE 訂單 SET 序號=RecNo');
ADOQuery1.ExecSQL;
SQL 指令的 UPDATE 資料表 SET 欄位名=設定值
其設定值能否抓取資料指標呢？(RecNo)

-------------------------------

想要做的功能如下

ADOQuery1.FIRST
WHILE NOT(訂單.EOF) DO
BEGIN
ADOQuery1.EDIT;
ADOQuery1.序號.VALUE=ADOQuery1.RECNO;
ADOQuery1.POST;
ADOQuery1.NEXT;
END;

因為操作時有刪除訂單的動作
我想做一個按鈕可以讓序號依資料指標來重整序號
但是當資料量變大時
處理時間就會變長

不知是否有什麼方法可以解決呢？
因為看到書上有提到 SQL 指令
才會想到是否用 SQL 指令就能達到我想要的功能

謝謝關心與回覆的大家們

------
===波士頓夜未眠===
What a wonderful world!!
Jazz up the world with jazz!!
==================

When I am not programming...
you can find me here:
http://www.holy-war.de/EN/World3/bin/?advertiser=63190

===================引 用 borland_delphi70 文 章===================
長官：

tQuery.RecNo 指的是資料自資料取回後，在tQuery中的序號而並非在資料庫中之序號，所以您這樣做會發生錯誤，因為雖然SQL語法不同，但第一筆資料的 RecNo都是1。

所以 Sql Server 中可以宣告一個 Field 為 [DataIndex] [int] IDENTITY (1, 1) NOT NULL，如此才能得到唯一的序號。


^^

客戶那邊我沒有裝 SQL Server 耶...
使用 Delphi 開發時, 因為版權與 $ 的關係, 我只是用 ADOQuery 配合 Access 的資料庫 .mdb
利用 ADOQuery 可下達 SQL 指令的方法來存取 Access 資料庫
所以, 現在給他有那麼一點頭疼

看看是否有高手中的高高手可以幫幫我想想辦法
不過, 還是謝謝你的回應

Since you are using Access, you can add one field into the table with AutoNum type and make it a key.
This is one way to sovle the problem of lacking a key field in the original table.

===================引 用 ThePresent 文 章===================

===================引 用 borland_delphi70 文 章===================
長官：

tQuery.RecNo 指的是資料自資料取回後，在tQuery中的序號而並非在資料庫中之序號，所以您這樣做會發生錯誤，因為雖然SQL語法不同，但第一筆資料的 RecNo都是1。

所以 Sql Server 中可以宣告一個 Field 為 [DataIndex] [int] IDENTITY (1, 1) NOT NULL，如此才能得到唯一的序號。


^^

客戶那邊我沒有裝 SQL Server 耶...
使用 Delphi 開發時, 因為版權與 $ 的關係, 我只是用 ADOQuery 配合 Access 的資料庫 .mdb
利用 ADOQuery 可下達 SQL 指令的方法來存取 Access 資料庫
所以, 現在給他有那麼一點頭疼

看看是否有高手中的高高手可以幫幫我想想辦法
不過, 還是謝謝你的回應

------
===波士頓夜未眠===
What a wonderful world!!
Jazz up the world with jazz!!
==================

When I am not programming...
you can find me here:
http://www.holy-war.de/EN/World3/bin/?advertiser=63190

方法一:
在ACCESS MDB設定該表的欄位為AutoNum type(自動編號)
方法二:
ADOQuery1 New Field "RECNO" (FieldKind = fkCalculated)

VAR I:INTEGER;
procedure TForm1.ADOQuery1CalcFields(DataSet: TDataSet);
begin
INC(I);
ADOQuery1['RECNO']:=I;
end;
procedure TForm1.ADOQuery1BeforeOpen(DataSet: TDataSet);
begin
I:=0;//初始化
end;

------
What do we live for if not to make life less difficult for each other?

===================引 用 christie 文 章===================
方法一:
在ACCESS MDB設定該表的欄位為AutoNum type(自動編號)
方法二:
ADOQuery1 New Field "RECNO" (FieldKind = fkCalculated)

VAR I:INTEGER;
procedure TForm1.ADOQuery1CalcFields(DataSet: TDataSet);
begin
INC(I);
ADOQuery1['RECNO']:=I;
end;
procedure TForm1.ADOQuery1BeforeOpen(DataSet: TDataSet);
begin
I:=0;//初始化
end;

謝謝大大無私的解惑... ^^