<% @ LANGUAGE = "VBScript" %>
<HTML>
<HEAD><TITLE>表单用get方法提交</TITLE></HEAD>
<BODY>
<p>
  <%
If Request.QueryString("pass") = "1111" Then
  Response.Write "欢迎你，" & Request.QueryString("name")& "朋友！" 
Else
  Response.Write Request.QueryString("name")& "，你输入的密码是" & Request.QueryString("pass") _
  & "。密码错误，禁止登录！"
End If
%>
</BODY></HTML>
