发新话题
打印

各位专家请进!

各位专家请进!

下面这段脚本语言通不过,能否用普通的代码翻译过来呢?
谢谢。
input: n(10,1,60);
constant:=1;
dd:=1;
cc:=c;
{上面为假设条件}
<%
NN= FFL.VarData("N")
VD= FFL.VarData("DD")
VC= FFL.VarData("Cc")
Vonstant= FFL.VarData("Constant")
LT = UBound( VC )
for m=NN + 1 to LT
VD( m )=VD( m - 1 ) + Vonstant( m ) * ( VC( m ) - VD( m - 1 ) )
next
FFL.VarData("DD")=VD
%>

本贴由 十九 于 2005-1-16 09:15 最后编辑

TOP

TOP

TOP

复制内容到剪贴板
代码:
<%
NN= FFL.VarData("N")
VD= FFL.VarData("DD")
VC= FFL.VarData("Cc")
Vonstant= FFL.VarData("Constant")  //以上传递变量到VBS
LT = UBound( VC ) //取 vc 下标
for m=NN + 1 to LT //定位 m 循环
VD( m )=VD( m - 1 ) + Vonstant( m ) * ( VC( m ) - VD( m - 1 ) ) //在几个数组中计算
next
FFL.VarData("DD")=VD //将计算结果传回飞狐
%>

TOP

引用:
hx817 于 2005-1-23 11:55 AM 写道:
[code]
<%
NN= FFL.VarData("N")
VD= FFL.VarData("DD")
VC= FFL.VarData("Cc")
Vonstant= FFL.VarData("Constant")  //以上传递变量到VBS
LT = UBound( VC  ...
好棒,好棒!学习!

TOP

学习

TOP

input: n(10,1,60);
constant:=1;
dd:=C*0;
cc:=c;
{上面?假??件}
<%
NN= FFL.VarData("N")
VD= FFL.VarData("DD")
VC= FFL.VarData("Cc")
Vonstant= FFL.VarData("Constant")
LT = UBound( VC )
vd(nn)=1
for m=NN + 1 to LT
VD( m )=VD( m - 1 ) + Vonstant* ( VC( m ) - VD( m - 1 ) )
next
FFL.VarData("DD")=VD
rem  FFL.VARSTARTINDEX("DD")=NN + 1
%>

[color=Teal][align=right] 本贴由 股市骑兵00 于 2005-1-23 14:27 最后编辑 [/align][/color]

TOP

yhcheng好棒的,VBS有空教我哦。

TOP

发新话题