怎样动态创建ado存储过程控建并使用传参数
我的程序:
 aspTemp :=tadostoredproc.Create(nil);
  asptemp.Connection :=DM_SysInit.cntSysInit;
  asptemp.ProcedureName :='SysS_Error';
  with asptemp do
  begin
    Active :=false;
    Parameters[1].Value :=errorid;
    Parameters[2].Value :=Module;
    Parameters[3].Value :=location;
    parameters[4].Value :=bewrite;
    Parameters[5].Value :=getmycomputername;
    parameters[6].Value :=gEmplID;
    Prepared;
    ExecProc;
  end
执行传参数时出错

解决方案 »

  1.   

    该为:  aspTemp :=tadostoredproc.Create(nil);
      asptemp.Connection :=DM_SysInit.cntSysInit;
      asptemp.ProcedureName :='SysS_Error';
      //刷新一下
      asptemp.Params.Refresh;
      //
      with asptemp do
      begin
        Parameters[1].Value :=errorid;
        Parameters[2].Value :=Module;
        Parameters[3].Value :=location;
        parameters[4].Value :=bewrite;
        Parameters[5].Value :=getmycomputername;
        parameters[6].Value :=gEmplID;
        Prepared;
        ExecProc;
      end