杭州交通信息网二手宝马e90买上当了:我的asp平方和代码只显示O？？？？？
来源：百度文库 编辑：杭州交通信息网 时间：2024/04/30 19:00:39
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
<HEAD>
<TITLE> New Document </TITLE>
</HEAD>
<BODY>
<%
Function pingfang(a,b)
For i=a To b
sum = sum +i^2
i=i+1
Next
pingfang=sum
End Function
%>
<script>
a=inputbox("first number")
b=inputbox("second number")
</script>
<%
he=pingfang(a,b)
response.write he
%>
</BODY>
</HTML>
就只有0 郁闷啊
<HTML>
<HEAD>
<TITLE> New Document </TITLE>
</HEAD>
<BODY>
<%
Function pingfang(a,b)
For i=a To b
sum = sum +i^2
i=i+1
Next
pingfang=sum
End Function
%>
<script>
a=inputbox("first number")
b=inputbox("second number")
</script>
<%
he=pingfang(a,b)
response.write he
%>
</BODY>
</HTML>
就只有0 郁闷啊
成功测试
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
<HEAD>
<TITLE> New Document </TITLE>
</HEAD>
<BODY>
<%
dim he
Function pingfang(a,b)
For i=a To b
sum = sum +i^2
Next '这里去掉了i=i+1,因为i=a to b本身就保证了i的递增.
pingfang=sum
End Function
Dim a,b
%>
<script language="vbscript">'你要让它知道这是VB角本
a=InputBox("first number")
b=InputBox("second number")
</script>
<%
he=pingfang(a,b)
response.write he
%>
</BODY>
</HTML>
应是类型的问题.
可能你的first number和second number根本就不是数值而是字符串,可以用转换函数转换为数值试下.