<%
Dim a,b,jc1,jc2,i,j,sum1,sum2,sum3
jc1=1
jc2=1
a=request.Form("a")
b=request.Form("b")
If a<b Then
response.write"<script>alert'警告!'</scritp>"
else
for i=1 to a
jc1=jc1*i
sum1=jc1
next
for j=1 to b
jc1=jc1*j
sum2=jc2
next
sum3=sum1+sum2
response.write a & "和"
response.write b & "的阶乘和为:<br>"
response.write sum3
End if
%>
这样不行啊