传递参数到存储过程的问题？？？哪位可以帮帮我？

Question

我想点一下button按钮分别从edit1,edit2,edit3中的数据传递到存储过程（@colnum,@codelong,@baglimit），并执行存储过程

Answer 1

with ADOStoredProc1,Parameters do
  begin
    Close;
    ProcedureName := '你的过程名字;1';
    Refresh;
    ParamByName('@colnum').Value := Edit1.Text;
    ParamByName('@codelong').Value := Edit2.Text;
    ParamByName('@baglimit').Value := Edit3.Text;
    try
      Open;
    except
      ExecProc;
    end;
  end;

Answer 2

我试一下，出现ADOStoredProc1:Papameter'@colnum' not found,是什么问题啊？

Answer 3

还有需要parameters.createparam()吗

Answer 4

with ADOStoredProc1,Parameters do
  begin
    Close;
    ProcedureName := '你的过程名字;1';
    Refresh;
    ParamByName('@colnum').Value := Edit1.Text;
    ParamByName('@codelong').Value := Edit2.Text;
    ParamByName('@baglimit').Value := Edit3.Text;
    try
      Open;
    except
      ExecProc;
    end;
  end;楼主，你真些都确认是输入参数吗? 
          
 在这里发贴，表示您接受了CSDN社区的 用户行为准则。
 请您对您的言行负责，并遵守中华人民共和国有关法律、法规,尊重网上道德。  

Answer 5

Sorry,楼主不小心把这些警告搞出来

Answer 6

with ADOStoredProc1,Parameters do
    begin
      Close;
      ProcedureName := 'autopinjian;1';
      Refresh;
      ADOstoredproc1.Parameters.CreateParameter('@colnum',ftstring, pdInput, 10, 10);
      ADOstoredproc1.Parameters.CreateParameter('@codelong',ftstring, pdInput, 10, 10);
      ADOstoredproc1.Parameters.CreateParameter('@baglimit',ftstring, pdInput, 10, 10);
      ParamByName('@colnum').Value := Edit4.Text;
      ParamByName('@codelong').Value := Edit2.Text;
      ParamByName('@baglimit').Value := Edit3.Text;
      try
        Open;
      except
        ExecProc;
      end;
    end;

Answer 7

严重同意： geniusqing(依帆) ( )

Answer 8

而且当adostoredproc1的active为true时,出现'adostoredproce1:commandtext does not return a result set'的错误