ASP程序运行不了
来源:百度知道 编辑:UC知道 时间:2024/07/07 01:07:56
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<script language="vbscript">
<!--
sub CalculateResult(num1,num2)
Dim Result
Dim StartNum
Dim EndNum
Dim i
StartNum=Cint(num1)
EndNum=Cint(num2)
for i=StartNum to EndNum
Result=Result+i
next
frmCalculate.Result.value=Result
End sub
-->
</script>
<title>无标题文档</title>
</head>
<body>
<form name="frmCalculate">
计算从<input name="Start" type="text" /> 到 <input name="End" type="text" />之间
<p>
<p>
<input name="Calculate" type="button" value="计算" onclick="CalculateResult frmCalculate.sta
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<script language="vbscript">
<!--
sub CalculateResult(num1,num2)
Dim Result
Dim StartNum
Dim EndNum
Dim i
StartNum=Cint(num1)
EndNum=Cint(num2)
for i=StartNum to EndNum
Result=Result+i
next
frmCalculate.Result.value=Result
End sub
-->
</script>
<title>无标题文档</title>
</head>
<body>
<form name="frmCalculate">
计算从<input name="Start" type="text" /> 到 <input name="End" type="text" />之间
<p>
<p>
<input name="Calculate" type="button" value="计算" onclick="CalculateResult frmCalculate.sta
<input name="Calculate" type="button" value="计算" onclick="CalculateResult frmCalculate.start.value,femCalculate.End.value" />
<p>
start第一字母大写,femCalculate第二个字母为r
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<script language="vbscript">
<!--
sub CalculateResult(num1,num2)
Dim Result
Dim StartNum
Dim EndNum
Dim i
StartNum=Cint(num1)
EndNum=Cint(num2)
for i=StartNum to EndNum
Result=Result+i
next
frmCalculate.Result.value=Result
End sub
-->
</script>
<title>无标题文档</title>
</head>
<body>
<form name="frmCalculate">
计算从<input name="Start" type="text" /> 到 <input name="End" type="text