var
a:integer;
begin
with adoquery1 do
begin//4
procedureName:='js_zhf ';
Parameters.Refresh;
Parameters.ParamByName('@xfrm_n').Value:=G;-------string型
Parameters.ParamByName('@stdno').Value :=a;;-------int型
Parameters.ParamByName('@zfrm_n').Value :=GD;;-------string型
Parameters.ParamByName('@out').Direction :=pdoutput;
ExecProc;
zhf:= Parameters.ParamByName('@out').Value;
提示参数不匹配;
存储过程:
create procedure js_zhf---------计算综合评分
(
@zfrm_n varchar(20),----综合成绩表表名
@xfrm_n varchar(20),----学习成绩表表名
@stdno int, -----学生学号
@out int output)
as
declare @str varchar(8000),
@zhcj int
..................
set @out=@zhcj
a:integer;
begin
with adoquery1 do
begin//4
procedureName:='js_zhf ';
Parameters.Refresh;
Parameters.ParamByName('@xfrm_n').Value:=G;-------string型
Parameters.ParamByName('@stdno').Value :=a;;-------int型
Parameters.ParamByName('@zfrm_n').Value :=GD;;-------string型
Parameters.ParamByName('@out').Direction :=pdoutput;
ExecProc;
zhf:= Parameters.ParamByName('@out').Value;
提示参数不匹配;
存储过程:
create procedure js_zhf---------计算综合评分
(
@zfrm_n varchar(20),----综合成绩表表名
@xfrm_n varchar(20),----学习成绩表表名
@stdno int, -----学生学号
@out int output)
as
declare @str varchar(8000),
@zhcj int
..................
set @out=@zhcj
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货