动态设置TAdoStoredProc的ProcedureName及其相关输入输出参数的问题

Question

sto.ProcedureName :='cardsearch';
   sto.Parameters.ParamByName('@candpno').Value :='11111';
   sto.Prepared :=true;
   sto.Open ;
请问有什么错误么，该如何写

Answer 1

sto.ProcedureName :='cardsearch;1';
   STO.Parameters.ParamByName('@candpno').DataType:=ftString;
   sto.Parameters.ParamByName('@candpno').Value :='11111';
   sto.Prepared :=true;//可以不要;
   sto..ExecProc;

Answer 2

把sto.Open 这一句改为sto.ExecProc;应该就可以了

Answer 3

两种方法我都试过了还是不行，提示找不见@candpno

Answer 4

将ParamByName('@candpno')
改为Parameters[1]

Answer 5

sto.ProcedureName :='cardsearch;1';
sto.Parameters.ParamByName('@candpno').Value :='11111';
sto.Prepared :=true;
sto.ExecProc ;

Answer 6

建议先在属性面板里连接好
然后
   sto.ProcedureName :='cardsearch';
   sto.Prepared:= true;
   sto.Parameters.Refresh;
   sto.Parameters.ParamByName('@candpno').Value :='11111';
   sto.Prepared :=true;
   sto.Open ;

Answer 7

sto.ProcedureName :='cardsearch';
   sto.Prepared:= true;
   sto.Parameters.Refresh;
   sto.Parameters.ParamByName('@candpno').Value :='11111';
   sto.Open ;