怎么样在delphi调用存储过程,我是用ado连数据库的,最好有源码实例

解决方案 »

  1.   

    ADoquery.sql.add('存储过程名 参数')
      

  2.   

    try
        ADOStoredProc := TADOStoredProc.Create(nil);
        ADOStoredProc.Connection := ADOConnection;    ADOStoredProc.ProcedureName := 'SCount';
        ADOStoredProc.Parameters.CreateParameter('sid', ftInt, pdInput, 4, 0);
        ADOStoredProc.Parameters.CreateParameter('name', ftString, pdInput, 20, name);
        ADOStoredProc.Parameters.CreateParameter('Rcount', ftBoolean, pdReturnValue, 4, 0);    ADOStoredProc.Prepared := True;
        ADOStoredProc.ExecProc;
        Result := ADOStoredProc.Parameters.ParamByName('Result').Value;
      finally
        ADOStoredProc.Free;
      end;
      

  3.   

    try
        ADOStoredProc := TADOStoredProc.Create(nil);
        ADOStoredProc.Connection := ADOConnection;    ADOStoredProc.ProcedureName := 'SCount';
        ADOStoredProc.Parameters.CreateParameter('sid', ftInt, pdInput, 4, 0);
        ADOStoredProc.Parameters.CreateParameter('name', ftString, pdInput, 20, name);
        ADOStoredProc.Parameters.CreateParameter('Rcount', ftBoolean, pdReturnValue, 4, 0);    ADOStoredProc.Prepared := True;
        ADOStoredProc.ExecProc;
        Result := ADOStoredProc.Parameters.ParamByName('Result').Value;
      finally
        ADOStoredProc.Free;
      end;
      

  4.   

    adoStoredProc控件
    设置connection:=adoconnection1
    在adoStoredProc.ProcedureName:=对应数据库的存储过程名;
    设置相应的parameters
    adostoredProc1.active:=True;//返回结果
    adostoredProc1.execProc;//不返回结果
      

  5.   

    同意firetoucher(风焱) 
    to Knight_yin(狂徒骑士)就这么点分,我看你没了啊