<%
functiom countN(n)
dim i,c,a
a=requst.form("x")
If a<>"" then
a =cint(x)
End if
c=0
for i=1 to a
c=c+i
next
countN=c
end function
response.Write "从 1 加到 " & a & " 的结果是：" &countN(a)
%>
<form name="form1" method="post" >
x=<input type="text" name="x">

'怎么会end function 有问题？没搞懂，，，大家帮我看哈，我是新手哈，正在努力学阶段，

[[it] 本帖最后由 个性人生 于 2008-10-27 14:53 编辑 [/it]]

<%
function countN(n)
dim i,c
c=0
for i=1 to n
c=c+i
next
countN=c
end function
a=requst.form("x")
If a<>"" then
a =cint(a)
End if
response.Write (countN(a))
%>
<form name="form1" method="post" >
x=<input type="text" name="x">

改了一下子，，还是不对

[[it] 本帖最后由 个性人生 于 2008-10-27 15:10 编辑 [/it]]