您所在位置：主题：新人总很晕自检查N便没错可一浏览照样错误！高手挺我
悄然入心
[专家分：0] 发布于 2008-04-07 09:46:00
<body>
<%
dim vvs,ubs
ubs="男"
vvs=30
if ubs "男" then
if vvs<8 then
response.Write("小弟弟")
else
if vvs>=8 and vvs<=15 then
response.Write("小男孩")
else
if vvs>=16 and vvs<=24 then
response.Write("小伙子")
else
if vvs>=25 and vvs<=45 then
response.Write("青年男子")
else
if vvs>=46 and vvs<=55 then
response.Write("中年男子")
else
if vvs>=56 and vvs<=80 then
response.Write("老爷爷")
else
if vvs>81 then
response.Write("老寿星")
end if
end if
end if
end if
end if
end if
else
if vvs<8 then
response.Write("小妹妹")
else
if vvs>=8 and vvs<=15 then
response.write("小女孩")
else
if vvs>=15 and vvs<=24 then
response.Write("小姑娘")
else
if vvs>=25 and vvs<=45 then
response.write("青年女子")
else
if vvs>=46 and vvs<=55 then
response.Write("中年女子")
else
if vvs>=56 and vvs<=80 then
response.Write("老奶奶")
else
if vvs>81 then
response.Write("寿星老")
end if
end if
end if
end if
end if
end if
end if
%>
</body>
<%
dim vvs,ubs
ubs="男"
vvs=30
if ubs "男" then
if vvs<8 then
response.Write("小弟弟")
else
if vvs>=8 and vvs<=15 then
response.Write("小男孩")
else
if vvs>=16 and vvs<=24 then
response.Write("小伙子")
else
if vvs>=25 and vvs<=45 then
response.Write("青年男子")
else
if vvs>=46 and vvs<=55 then
response.Write("中年男子")
else
if vvs>=56 and vvs<=80 then
response.Write("老爷爷")
else
if vvs>81 then
response.Write("老寿星")
end if
end if
end if
end if
end if
end if
else
if vvs<8 then
response.Write("小妹妹")
else
if vvs>=8 and vvs<=15 then
response.write("小女孩")
else
if vvs>=15 and vvs<=24 then
response.Write("小姑娘")
else
if vvs>=25 and vvs<=45 then
response.write("青年女子")
else
if vvs>=46 and vvs<=55 then
response.Write("中年女子")
else
if vvs>=56 and vvs<=80 then
response.Write("老奶奶")
else
if vvs>81 then
response.Write("寿星老")
end if
end if
end if
end if
end if
end if
end if
%>
</body>
