3、新建Reg.asp文档，参照1中的Reg.html，通过VBScript服务器端脚本代码实现 ”班级” Select表单的自动生成，如下所示： 注：通过循环语句，采用Response.Write命令实现上述功能。
4、在3中Reg.asp的基础上，点击“提交”按钮采用Post方式提交表单信息，提交的目的网页设为Display1.asp. 提交以后，通过Request对象获取表单提交信息，并通过Response对象将结果显示出来,要求用表格来约束页面的布局。
由于“插入html代码”识别不了VBScript脚本代码，所以直接上了运行结果的截图。
<%@ language="VBScript" %>
<html>
<head>
<title>Reg</title>
</head>
<body>
<form method="post" action="Display1.asp" name="Display1">
<p align=center>请选择班级：
<select size="1" name="banji">
<%
for i = 1 to 6
Response.write" <option>机械160"&i&"</option>"
Next
%>
</select>班</p>
<p align=center><input type="submit" value="提交" name="I1">
</p>
</form>
</body>
</html>
<%@ language="VBScript" %>
<html>
<head>
<title>Display1</title>
</head>
<body><center>
<%
Dim banji
banji = Request.Form("banji")
Response.Write"您的班级是："& banji &"班"
%>
</body>
</html>
