Przerwij zapytanie SQL z limitem czasu przetwarzania

Question

Czy mogę pisać zapytania SQL przy użyciu DELPHI, komponentów dbgo DB i serwera bazy danych SQL Server, które są ograniczone pod względem czasu przetwarzania?

Jak

select * from table where ...... 

i process_time_limit = 5 sec?

Lepiej dać mi 10% wierszy w terminie, a nie godzin czekając na kompletnego zestawu danych kwerendy

Answer 1

ADO składniki:

chciałbym spróbować do danych asynchroniczny sprowadzać. Po uruchomieniu zapytania zapamiętasz, kiedy uruchomisz i za każdym razem, gdy zostanie wywołane zdarzenie OnFetchProgress, sprawdzisz, czy EventStatus nadal znajduje się w stanie i sprawdza czas, jaki upłynął od wykonania zapytania. Jeśli upłynął, możesz anulować pobieranie danych przy użyciu metody Cancel w swoim zestawie danych.

chciałem użyć coś jak poniżej (untested) Pseudokod:

var 
    FQueryStart: DWORD; 

procedure TForm1.FormCreate(Sender: TObject); 
begin 
    // configure the asynchronous data fetch for dataset 
    ADOQuery1.ExecuteOptions := [eoAsyncExecute, eoAsyncFetchNonBlocking]; 
end; 

procedure TForm1.Button1Click(Sender: TObject); 
begin 
    // store the query execution starting time and execute a query 
    FQueryStart := GetTickCount; 
    ADOQuery1.SQL.Text := 'SELECT * FROM Table'; 
    ADOQuery1.Open; 
end; 

procedure TForm1.ADOQuery1FetchProgress(DataSet: TCustomADODataSet; Progress, 
    MaxProgress: Integer; var EventStatus: TEventStatus); 
begin 
    // if the fetch progress is in esOK (adStatusOK) status and the time since 
    // the query has been executed (5000 ms) elapsed, cancel the query 
    if (EventStatus = esOK) and (GetTickCount - FQueryStart >= 5000) then 
    DataSet.Cancel; 
end;