chap14-1.asp

来自「SQL2000跟课件学习的源代码 分享共同学习」· ASP 代码 · 共 20 行

ASP
20
字号
<html>
<head><title>在ASP中使用客户端脚本</title>
<Script Language=VBScript>
<!--
Option Explicit
Dim num, temp
Document.Write "求任意整数(1-100)的阶乘"
num=InputBox("请输入一个1-100的整数:")
Dim i,k
k=1
For i=1 to num
  k=k*i
next
Document.Write "<br>"&num&"!="&k
-->
</Script>
</head>
<body></body>
</html>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?