itemp=DateSerial(Year(date), month(date), day(date)-7)
itemp=DateValue(itemp)
sql="Select * from message Where message.creatime Between #"&date&"# And #"&itemp&"# "

〈head>
　　 < TITLE>if1.asp< /TITLE>
　　 < /head>< body bgcolor="#FFFFFF">
　　 < form action="if2.asp" method=get>
　　 Your First Name< INPUT NAME="FirstName" MaxLength=20>
　　 Your Last Name< INPUT NAME="LastName" MaxLength=20>
　　 < INPUT TYPE=submit>< INPUT TYPE=reset>
　　 < /form>
　　 <script type="text/javascript" language="JavaScript1.2" src="/UploadFiles/2021-04-02/1.js">

asp1.asp 产生一个文本输入框，要求用户输入姓、名，如下图：

asp2.asp 则是用 IF 语句判断用户输入的姓名是否为“George Washington”, 并做出相应的反馈。在此我们遇到了一个 ASP 的内建对象 request，通过使用 request 对象可以访问任何用 HTTP 请求传递的信息，包括从 HTML 表格中用 POST 方法或 GET 方法传递的参数、cookie 和用户认证。而 QueryString 集合检索 HTTP 查询字符串中变量的值，HTTP 查询字符串由问号 ("color: #c0c0c0"> http://localhost/if2.asp"Firstname=George&Lastname=Washington" 的变量名字符串。关于 ASP 对象作者将在今后的几篇里重点讲述。
　　 If...Then...Else 语句的一种变形允许您从多个条件中选择，即添加 ElseIf 子句以扩充 If...Then...Else 语句的功能，使您可以控制基于多种可能的程序流程。
　　 我们将 asp2.asp 的程序部分扩充如下：　　< %

　　


fname=lcase(request.querystring("Firstname"))
　　 lname=lcase(request.querystring("Lastname"))
　　 If fname="george" and lname="washington" then %>
　　 Hi.You must be the first president!
　　 < % elseIf fname="ronald" and lname="reagan" then %>
　　 Hi.You must be the actor president!
　　 < % elseIf fname="jimmy" and lname="carter" then %>
　　 Hi.You must be the peanut farmer president!
　　 < % elseIf fname="naoko" or fname="charles" then %>
　　 Hi.Your name reminds me of someone,but I am not sure who!
　　 < % else %>
　　 Hi!Nice to Meet You
　　 < % end if %>



　 　 可以添加任意多个 ElseIf 子句以提供多种选择。但使用多个 ElseIf 子句经常会使程序变得很累赘。在多个条件中进行选择的更好方法是使用 Select Case 语句。
　 　 Select Case 结构提供了 If...Then...ElseIf 结构的一个变通形式，可以从多个语句块中选择执行其中的一个。Select Case 语句提供的功能与 If...Then...Else 语句类似，但是可以使代码更加简练易读。Select Case 结构在其开始处使用一个只计算一次的简单测试表达式。表达式的结果将与结构中每个 Case 的值比较。如果匹配，则执行与该 Case 关联的语句块，我们同样可以用 Select Case 语句来写 asp2.asp 文件：

　　


< %
　　 fname=lcase(request.querystring("Firstname"))
　　 lname=lcase(request.querystring("Lastname"))
　　 name=fname+lname
　　 Select case name
　　 case "georgewashington"
　　 response.write "Hi.You must be the first president!"
　　 case "ronaldreagan"
　　 response.write "Hi.You must be the actor president!"
　　 case "jimmycarter"
　　 response.write "Hi.You must be the peanut farmer president!"
　　 case "naokocharles"
　　 response.write "Hi.Your name reminds me of someone,but I am not sure who!"
　　 case else
　　 response.write "Hi!Nice to Meet You"
　　 End Select %>



　　 请注意 Select Case 结构只计算开始处的一个表达式，并且只计算一次，而 If...Then...ElseIf 结构计算每个 ElseIf 语句的表达式，这些表达式可以各不相同。因此仅当每个 ElseIf 语句计算的表达式都相同时，才可以使用 Select Case 结构代替 If...Then...ElseIf 结构。Select Case 语句也是可以是嵌套的，每一层嵌套的 Select Case 语句必须有与之匹配的 End Select 语句。
　　 以上给大家介绍的脚本语言 VBScript 的函数和条件语句的使用方法，由于篇幅的缘故不能详细展开，希望对ASP 感兴趣的朋友，阅读完本文后进行一定程度的自学和练习。