当前位置:主页>销售管理软件> 列表

用 adostoredproc 执行存储过程急用高分等你拿 找简单财务管理软件

仓库管理软件版1楼: 用 adostoredproc 怎么执行存储过程 aa(''2006-3-9'',8,2) 三个参数。 返回记录
返回记录怎么对应的写到本地的access的hm2表中

2楼: 最好有 代码???谢谢了!!还会给分的!!! 如简单财务管理软件

3楼: 在加100分

4楼: http://www.delphibbs.com/keylife/iblog_show.asp?xid=19244
连到本地可以在用ADO控件连到你的表
一个一个导入
不明白的话qq4835386

5楼: look 一下你的 存储过程?

6楼: adostoredproc执行完成后,本身就是一个数据集,循环一下,把adostoredproc里的数据写到另一个表,不行吗?

仓库管理软件版7楼: aa(''2006-3-9'',8,2) 三个参数 @datetime,@type,@goh

8楼: 不是一定要adostoredproc,你可以用AdoQuery来做
ADOQuery1.sql.text:=''exec aa(''''2006-3-9'''',8,2)'';
ADOQuery1.open;
//参数可以用字符连接来做。例如:''exec aa(''''2006-3-9'''',''+ inttostr(变量) +'',2)'';
ADOQuery2.SQL.TEXT:=''Select * from 你的ACC表'';
ADOQuery2.open;
while not ADOQuery1.eof do


begin
ADOQuery2.append;
fieldbyname(''你的列名ACC的'').values:=ADOQuery1.Fieldvalues[''你的列名''];
。。。
ADOQuery2,post;
ADOQuery1.next;
end;
随手写的,未经验证

9楼: procedure TForm1.Button1Click(Sender: TObject);
begin
ADOStoredProc1.ProcedureName :=''aa'';
with ADOStoredProc1.Parameters.AddParameter do
begin
DataType :=ftString;
Direction := pdInput;
Value := ''2006-3-9'';
end;
with ADOStoredProc1.Parameters.AddParameter do
begin
DataType :=ftInteger;
Direction := pdInput;
Value := 8;
end;
with ADOStoredProc1.Parameters.AddParameter do
begin
DataType :=ftInteger;
Direction := pdInput;
Value := 2;
end;
ADOStoredProc1.Open;
end;
//你这样试试