Question

帮我把这个JS的循环语句，转成ASP的

JS代码是这样子的，要转成ASP的。谢谢
var j=1,so=0,m,ttt，txt22
for (var i=0;i<Math.floor(str.length/3);i++){
switch (str[j-1]){
case "玻纤":m=2.1,txt22=38.5;
break;
case "绿玻纤":m=2.1,txt22=38.5;
break;
case "合成石":m=1.85,txt22=120;
break;
case "环氧板":m=2.1,txt22=25;
break;
case "黑电木":m=1.5,txt22=20;
break;
case "红电木":m=1.5,txt22=20;
break;
case "电木":m=1.5,txt22=20;
break;
case "铝合金":m=2.1;
break;
default :exit();
break;
}
下面这个代码，在ASP中不能运行吧？
ASP中不这个吗：Math.floor、str.length，
这种，case "玻纤":m=2.1,txt22=38.5 。在ASP中，也没有哦

哦，还留了一句：

so=eval(str[j])*eval(str[j+1])*m/1000000*txt2+so
j=j+3

Answer 1

js中Math.floor()在asp中用CInt
js中str.length是取数组str长度,asp中应该是 ubound(str)+1,
这段js有问题,i地for循环内却没有用到i,每次循环做地都是相同地事,for语句没有意义,把j换成i也说不过去,str[i-1]数组会出现str[-1]

Answer 2

<%
dim i,so,m,ttt,txt22
j=1
so=0

for i=0 to int(len(str)/3)-1
select case str(i)
case "玻纤"
m=2.1
txt22=38.5
case "绿玻纤"
m=2.1
txt22=38.5
case "合成石"
m=1.85
txt22=120
case "环氧板"
m=2.1
txt22=25
case "黑电木"
m=1.5
txt22=20
case "红电木"
m=1.5
txt22=20
case "电木"
m=1.5
txt22=20
case "铝合金"
m=2.1
end select
next
%>

Answer 3

<%
dim j=1,so=0,m,ttt，txt22
for i=0 to cint(str.len/3)
select case str[j-1]

case "玻纤"
m=2.1
txt22=38.5

case "绿玻纤"
m=2.1
txt22=38.5

case "合成石"
m=1.85
txt22=120

case "环氧板"
m=2.1
txt22=25

case "黑电木"
m=1.5
txt22=20

case "红电木"
m=1.5
txt22=20

case "电木"
m=1.5
txt22=20

case "铝合金"
m=2.1
end select
next
%>

Answer 4

dim j,so,m,ttt,txt22
j=1
,so=0
for var i=0 to Math.floor(str.length/3)
switch (str[j-1])
case "玻纤":m=2.1,txt22=38.5
break
case "绿玻纤":m=2.1,txt22=38.5
break
case "合成石":m=1.85,txt22=120
break
case "环氧板":m=2.1,txt22=25
break
case "黑电木":m=1.5,txt22=20
break
case "红电木":m=1.5,txt22=20
break
case "电木":m=1.5,txt22=20
break
case "铝合金":m=2.1
break
default exit()
break;
next

Answer 5

直接用不就行了，干嘛要转