我在调用AdostoredProc的ExecProc后,总是提示“AdospMain:CommandText does not return a sesult set."
我的代码大致如下:
AdospMain.Active:=False;
AdospMain.Parameters.Refresh;
AdospMain.Parameters[1].Value:='select * from tempp_swdj ';
AdospMain.Parameters[2].Value:='d:\';
AdospMain.Parameters[3].Value:=FormatDateTime('yymmddhhnnss',now)+'test.xls';
AdospMain.Parameters[4].Value:='sheet1';
AdospMain.Active:=True;
AdospMain.ExecProc;
end;
请问如何解决:
备注,执行后,可以在“d:\"生成对应文件
我的代码大致如下:
AdospMain.Active:=False;
AdospMain.Parameters.Refresh;
AdospMain.Parameters[1].Value:='select * from tempp_swdj ';
AdospMain.Parameters[2].Value:='d:\';
AdospMain.Parameters[3].Value:=FormatDateTime('yymmddhhnnss',now)+'test.xls';
AdospMain.Parameters[4].Value:='sheet1';
AdospMain.Active:=True;
AdospMain.ExecProc;
end;
请问如何解决:
备注,执行后,可以在“d:\"生成对应文件
with AdoSpPeriodStat do
begin
Active := False;
Prepared;
ProcedureName := aaaaaaa;
Parameters.Refresh;
Parameters.Parambyname('@aaa').Value := aaa;
Parameters.Parambyname('@bbb').Value := bbb;
Parameters.Parambyname('@iRet').Value := 0;
ExecProc; iRet := Parameters.Parambyname('@iRet').Value;
end;
AdospMain.ExecProc;这两句是重复的,如果有返回数据集的时候采用第一句,如果没有返回数据集采用第二句就应该OK了
AdospMain.ExecProc;
这里尝试用 一个看看