方法一：
tjzb_sp.close;
with tjzb_sp do
begin
parameters.parambyname('@riqi_start').value :=datetostr(riqi_start.date);
parameters.parambyname('@riqi_end').value :=datetostr(riqi_end.date);
parameters.parambyname('@sjd_start').value :=sjd_start.text;
parameters.parambyname('@sjd_end').value := sjd_end.text;
parameters.parambyname('@bss').value :=bss_ed.text;
parameters.parambyname('@site').value :='%'+site_ed.text+'%';
parameters.parambyname('@cell').value := cell_ed.text;
end;
tjzb_sp.open;
//tjzb_sp 是控制項adostoreproc的名字
//另外還要設定儲存過程名和各個引數，型別
方法二：
tjzb_sp.procedurename:='wlwxxntj';
tjzb_sp.close;
tjzb_sp.parameters.clear;
tp := tjzb_sp.parameters.addparameter;
tp.name := '@riqi_start';
tp.datatype := ftdatetime;
tp.value := datetostr(riqi_start.date);
tp := tjzb_sp.parameters.addparameter;
tp.name := '@riqi_end';
tp.datatype := ftdatetime;
tp.value := datetostr(riqi_end.date);
tp := tjzb_sp.parameters.addparameter;
tp.name := '@sjd_start';
tp.datatype := ftstring;
tp.value := sjd_start.text;
tp := tjzb_sp.parameters.addparameter;
tp.name := '@sjd_end';
tp.datatype := ftstring;
tp.value := sjd_end.text;
tp := tjzb_sp.parameters.addparameter;
tp.name := '@bss';
tp.datatype := ftstring;
tp.value := bss_ed.text;
tp := tjzb_sp.parameters.addparameter;
tp.name := '@site';
tp.datatype := ftstring;
tp.value := '%'+site_ed.text+'%';
tp := tjzb_sp.parameters.addparameter;
tp.name := '@cell';
tp.datatype := ftstring;
tp.value := cell_ed.text;
tp := tjzb_sp.parameters.addparameter;
tp.name := '@orderby_key';
tp.datatype := ftwidestring;
tp.value := orderby_key.text;
tp := tjzb_sp.parameters.addparameter;
tp.name := '@pxfs';
tp.datatype := ftwidestring;
tp.value := pxfs_comb.text;
tp := tjzb_sp.parameters.addparameter;
tp.name := '@ysf';
tp.datatype := ftwidestring;
tp.value := ysf_comb.text;
tp := tjzb_sp.parameters.addparameter;
tp.name := '@ysf_z';
tp.datatype := ftstring;
if ysf_z.text='' then tp.value :='0' else tp.value := ysf_z.text;
tp := tjzb_sp.parameters.addparameter;
tp.name := '@top_z';
tp.datatype := ftstring;
tp.value := top_z.text;
tjzb_sp.open;
if tjzb_sp.eof then jg_lab.caption:='沒有找到相關記錄！';
tjzb_groupbox.caption:='共找到'+inttostr(tjzb_sp.recordcount)+'條記錄';
//第一次用第乙個方法，有時會出錯，所以改用了第二種方法，
//在查詢時，有個查詢二個日期間的資料時，當選擇同乙個日期時查不出來，後來發現要把日期型別轉換為字串型別。
dbms output put line使用方法
begin dbms output.put line a end 如果你是再sql plus中,只要再環境中打出 set serveroutput on 就可以了.還有一種方法 就是使用環境中的繫結變數也可以.再環境中定義 variable name varchar2 50 然後把過程新增乙個out...
sp addlinkedserver使用方法
exec sp droplinkedsrvlogin dbvip,null exec sp dropserver dbvip exec sp addlinkedserver server dbvip 被訪問的伺服器別名 srvproduct provider sqloledb datasrc ser...
SQL Server Profiler使用方法
一 sql server profiler使用方法 1 單擊開始 程式 microsoft sql server 2005 效能工具 sql server profiler，如下圖 2 彈出sql server profiler視窗，如下圖 3 在工作視窗內，滑鼠單擊 檔案 新建跟蹤 n 彈出資料庫...