如何实现存储过程的调用?

Question

我想用ADOStoredProc组件对sql server2000的数据库进行调用,不知道如何使用?能否给我个具体的例子,我的存储过程是根据日期,查询两个表,然后把符合的记录返回出来,
存储过程如下
create procedure sp_查询客房住宿总费用
@date1 smalldatetime,@date2 smalldatetime
as
select sum(费用) as 费用 from tabl1 where table1.date between @date1 and @date2

Answer 1

1。先建立存储过程，带上两个参数。
2。在delphi中调用存储过程同时传递参数。

Answer 2

Var AdoS : TADOStoredProc ;
  AdoS := TADOStoredProc.Create(owner);
  AdoS.Connection := Adoconnection1;  Ados.ProcedureName := '存储过程名称';
  AdoS.Parameters.CreateParameter('参数1名称',FtDateTime,pdInput,20,Dt1.Date);
  AdoS.Parameters.CreateParameter('参数2名称',FtDateTime,pdInput,20,Dt2.Date);
  Ados.ExecProc ;  DataSource1.DataSet := AdoS;