一 声明变量
二 给变量赋值
三 循环
四 case
<html>
<head title="test hello world">
</head>
<% dim a
dim b
a=2
b=2
if a=2 and b=2 then
response.Write("ok")
elseif a=1 and b=1 then
response.Write("ok1")
else
response.Write("no")
end if
%>
<%
dim c
c=21
select case c
case 1
response.Write(1)
case 2
response.Write(2)
case 3
response.Write(3)
case else
response.Write("else else ")
end select
%>
<%
dim d
d=1
do while d<10
response.Write(d)
if d=4 then
exit do
end if
d=d+1
loop
%>
<%
sub dosome()
dim e
e=1
for e=1 to 10 step 2
if e=4 then
exit for
end if
response.Write(e)
next
end sub
dosome()
%>
<body>
<form method="post" action="simpleform.asp">
<p>
First Name:
<input type="text" name="fname" />
</p>
<p>
Last Name:
<input type="text" name="lname" />
</p>
<input type="submit" value="Submit" />
</form>
</body>
</html>
时间： 2024-08-06 17:26:35