Các thông số trong SQL - Delphi 7

Question

Tôi đang sử dụng Delphi 7 và truy cập 2007.

Tôi muốn biết bất cứ ai có thể chỉ cho tôi cách sử dụng thông số với câu lệnh SQL và ADO.

Mã hóa cần thiết và vv. Xin lỗi tôi mới đến Delphi.

Answer 1

Chỉ cần đặt truy vấn SQL và sau đó điền thông số. Sử dụng tên tham số có ý nghĩa với bạn, tất nhiên; Tôi vừa sử dụng các ví dụ LastName và FirstName. Tôi đã cập nhật để sử dụng TADOQuery thay vì chỉ TQuery sau khi bạn chỉnh sửa câu hỏi.

ADOQuery1.SQL.Clear; 
ADOQuery1.SQL.Add('SELECT * FROM MyTable'); 
ADOQuery1.SQL.Add('WHERE LastName = :LastName AND'); 
ADOQuery1.SQL.Add('FirstName = :FirstName'); 

// Populate the parameters and open it 
ADOQuery1.Parameters.ParamByName('LastName').Value := 'Jones'; 
ADOQuery1.Parameters.ParamByName('FirstName').Value := 'James'; 
ADOQuery1.Open; 
// Use query results 

ADOQuery1.Close; 
// Populate parameters with new values and open again 
// Populate the parameters and open it 
ADOQuery1.Parameters.ParamByName('LastName').Value := 'Smith'; 
ADOQuery1.Parameters.ParamByName('FirstName').Value := 'Sam'; 
ADOQuery1.Open; 
// Use new query results 

ADOQuery1.Close;