請問大家： 如果我想要亂數取得資料表內的任一筆資料 有沒有比較好的方法。 最好是直接從資料庫抓一筆資料 我也想過全部抓出來，再用亂數去取出其中一筆資料 可是如果資料很多時，可能會比較不好 請熟悉 SQL 語法的大大幫幫忙。 謝謝!! Eric Lin

------
Eric Lin

您好﹗    試試這樣的方法﹕

Var
  I, J : Integer;
begin
  ADOQuery1.Close;
  ADOQuery1.SQL.Clear;
  ADOQuery1.SQL.Add('Select * From TableName');
  ADOQuery1.Open;
  Randomize;
  I := ADOQuery1.RecordCount;
  J := Random(I) 1;  
  ADOQuery1.Close;
  ADOQuery1.SQL.Clear;
  ADOQuery1.SQL.Add('Select * From TableName Where ');
  ADOQuery1.SQL.Add('鍵值欄位 Not In (Select Top X 鍵值欄位 ');
  ADOQuery1.SQL.Add('From TableName) and 鍵值欄位 In ');
  ADOQuery1.SQL.Add('(Select Top Y 鍵值欄位 From TableName)');
  ADOQuery1.Text := StringReplace(ADOQuery1.Text, 'X',
    IntToStr(J), [rfReplaceAll, rfIgnoreCase]);
  ADOQuery1.Text := StringReplace(ADOQuery1.Text, 'X',
    IntToStr(J 1), [rfReplaceAll, rfIgnoreCase]);
  ADOQuery1.Open;
end;

========================= 我是您的朋友﹐有您真好﹗ =========================

------
忻晟

謝謝 我將前面的 Select * from TableName 改成 Select Count(FieldName) as RecordTotal from tabledname 這樣如果 Table 內的資料很多時應該有比較快一點吧？ Eric Lin

------
Eric Lin

Hi eric039,    以下有一篇討論，but 是針對 Oracle 的，也許你可以套用此觀念試試 http://blog.itpub.net/post/6/318 此外，你用的是何種資料庫？版本為何？ ---------------------------------- 小弟才疏學淺，若有謬誤尚請不吝指教 ----------------------------------

------
Fishman

試試看    select * from your_table where rownum=(select random (count(*)) from your_table)    

Kenlin2004 大大 關於您的方法 select * from your_table where rownum=(select random (count(*)) from your_table) 我是使用 MS SQL 2000 SQL 2000 並沒有 rownum 這個東東可以使用 而且 SQL 2000 內的 random 是 rand() rand() 回傳值為 0到1的浮點數 所以 rand 的回傳值在這裡還要作處理才可使用 如果MS SQL 有類似的 rownum 可以使用，這樣應該沒有問題 您的資料庫應該不是 MS SQL 或是您有其他的用法吧！ 感謝您的回答 Eric Lin

------
Eric Lin

現在回答好像慢了點,如果是使用Sql Server的話,你可以使用 Select Top 1 * from TableName Order By Newid() 來做 之前為了這個曾經寫了Cursor來處理,當時我是要抓3筆,測試的結果有點奇怪, 在10萬筆以前,兩個效率差不多,超過變成Cursor效率比較好,而到了30萬筆時, 又反過來,所以之前的案子我們就用了兩個寫法在兩種不相同的資料表格式中.. 你可以試試看 ^^