友情提示：如果本网页打开太慢或显示不完整，请尝试鼠标右键“刷新”本网页！
asp基础入门篇(DOC格式)-第3部分
快捷操作: 按键盘上方向键 ← 或 → 可快速上下翻页 按键盘上的 Enter 键可回到本书目录页 按键盘上方向键 ↑ 可回到本页顶部! 如果本书没有阅读完，想下次继续接着阅读，可使用上方 "收藏到我的浏览器" 功能 和 "加入书签" 功能！
直硎灸攴荩ɡ纭�1800 年）。当任何一个参数的取值超出可接受的范围时，则会适当地进位到下一个较大的时间单位。例如，如果指定了35 天，则这个天数将被解释成一个月加上多出来的日数，多出来的日数取决于其年份和月份。但是如果参数值超出 …32；768 到 32；767 的范围，或者由三个参数指定（无论是直接还是通过表达式指定）的日期超出了可以接受的日期范围，就会发生错误。
当我们了解并掌握了函数 DateSerial 的使用方法后，再来看看作者布置的这道题目，一切就迎刃而解了。下面我将程序中的此部分代码公布如下：itemp=DateSerial（Year（date）； month（date）； day（date）…7）
itemp=DateValue（itemp）
sql=〃Select * from message Where message。creatime Between #〃&date&〃# And #〃&itemp&〃# 〃
在这里我们又接触到了一组函数 Year；month；day，它们是用来得到一个日期的年、月、日。date 是常数，表示今天日期，而函数 DateValue 则是将字符串变量转化为日期格式的变量。在本段程序的第三行，我们第一次接触到了标准的 SQL 查询语句，这句语句是什么意思呢？
〃Select〃是标准的 SQL 数据库查询命令，通过 SELECT 语句我们可以在数据库中检索数据，并将查询结果提供给用户，此处的〃*〃表示查询该名为〃message〃的数据库中的所有记录，而〃where〃的作用是设定一个查询条件，是为了将数据库中符合条件的记录取出来，〃message。creatime〃是一个储存了数据库中记录创建日期的变量。将整句语句连起来理解就是：查询名为 message 的数据库中的所有记录，并将其中创建日期在今天和今天以前七日以内的所有记录存储在变量 sql 中。可能由于大家第一次接触 SQL 语句，一时间无法完全理解它的作用，不过不用担心在今后的章节中作者将专门用一期给大家介绍 SQL 的使用方法。
通过上面的学习，大家应该已经能够理解函数在程序中的作用，当然我们不必去死背函数，但要做到熟练运用只有一条捷径 …多实践。接下来让我们来看看 VBScript 的基本语法。
了解编程语言的朋友一定知道在程序中控制程序流程的语句主要可以分为条件语句和循环语句，在 VBScript 中可使用以下条件语句： If。。。Then。。。Else 语句
Select Case 语句
If。。。Then。。。Else 语句用于计算条件是否为 True 或 False，并且根据计算结果指定要运行的语句。通常，条件是使用比较运算符对值或变量进行比较的表达式，If。。。Then。。。Else 语句可以按照需要进行嵌套。
让我们来创建两个范例文件：if1。asp 和 if2。asp
将以下语句剪贴到记事簿中，并保存为 if1。asp（ 注意：请将程序中〃〃
case 〃ronaldreagan〃
response。write 〃Hi。You must be the actor president！《 p》〃
case 〃jimmycarter〃
response。write 〃Hi。You must be the peanut farmer president！《 p》〃
case 〃naokocharles〃
response。write 〃Hi。Your name reminds me of someone；but I am not sure who！《 p》〃
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 的朋友，能在课后进行一定程度的自学和练习。在日常开发 ASP 应用程序的过程中作者本人日渐体会到了脚本语言的重要性，灵活运用脚本语言将非但可以大大提高 ASP 应用程序的开发过程，给广大网站制作人员节省大量的时间，而且还能够增强 ASP 应用程序的执行效率和功能。欲善其事必先利其器，因此作者在此强烈建议诸君，熟练掌握脚本语言，这将对你的 ASP 程序开发大有帮助。由于本文不是 VBScript 教程，因此只能用较小的篇幅给大家简要介绍一些 VBScript 基本常识，在下一期介绍完 VBScript 的循环语句后，我们将正式开始学习 ASP 的内建对象，要深入 VBScript，建议大家找些教材进行自学。如果你在看完本文后有任何问题请及时 Mail 我，如果你有什么好的建议也请来信告知，谢谢。
ASP教程：ASP脚本循环语句
在本文上两篇中，我们学习了脚本语言 VBScript 的变量、函数、过程和条件语句，本篇将继续给大家介绍 VBScipt 的循环语句，并对脚本语言在 ASP 中的应用加以总结。
如果有人告诉你学习 ASP 不需要任何编程知识，那么他错了；如果我告诉你学习 ASP 必须掌握一门编程语言，那么我错了。ASP 动态服务器页面环境的特点就在于它是通过一种或几种脚本语言而写成的，脚本语言可以看作是编程语言的简化版，它易于学习和掌握，这给广大动态网站的设计者们提供了相当大的便利。可以这么说 ： 脚本语言运用的得当与否直接关系到 ASP 应用程序的优与劣。继上一篇我们学习了脚本语言 VBScript 的函数和条件语句后，今天我们继续来看看 VBScript 中的循环语句。
循环语句的作用就是重复执行程序代码，循环可分为三类：一类在条件变为〃假〃之前重复执行语句，一类在条件变为〃真〃之前重复执行语句，另一类按照指定的次数重复执行语句。在 VBScript 中可使用下列循环语句：
Do。。。Loop： 当（或直到）条件为〃真〃时循环。
While。。。Wend： 当条件为〃真〃时循环。
For。。。Next： 指定循环次数，使用计数器重复运行语句。
For Each。。。Next： 对于集合中的每项或数组中的每个元素，重复执行一组语句。
我们先来看看 Do。。。Loop，它是可以多次（次数不定）运行语句块。当条件为〃真〃时或条件变为〃真〃之前，重复执行语句块。请看下例： 《 html》《 head》
《 title》DoLoop。asp《 /title》《 body bgcolor=〃#FFFFFF〃》《 /head》《 p》《 /p》
《 p》请将今年到本月为止的每个月份的销售结算记录填写在本页之上。《 P》
《 ％
counter = 1
thismonth = month（now（））
Do while counter 《 thismonth ＋ 1
response。write 〃 〃 & counter & 〃 月份 ： 〃
response。write 〃______________________________〃 & 〃《 BR》《 br》〃
If counter 》13 then
exit do
end if
counter = counter＋1
Loop
％》
《 hr》《 /body》《 /html》
这段 ASP 程序运用循环语句制作了一张销售结算记录表，将以上代码剪贴至记事簿保存为 DoLoop。asp，并在浏览器中以 HTTP 方式进行浏览，根据当前的月份的不同，你将看到如下图的结果。
我们来分析一下此段程序，我们的目的是要根据当前的月份打印一张表格，首先我们建立一个计数器〃count〃并将其值设为 1，然后我们用函数 month（） 和 now（） 得到当前的月份，最后建立循环，当 count 的值小于当前月份的值加 1 的时候，即显示月份值及一条横线并将 count 的值加 1，循环语句重复执行直到以上条件为假时退出循环。其中如果 count 大于 13 则用 exit do 立即退出循环。
Do Loop 语句还可以使用以下语法：
Do
＇statements＇＇Exit Do＇
＇statements＇Loop ＇｛While ｜ Until｝ condition＇
While。。。Wend 语句是为那些熟悉其用法的用户提供的。但是由于 While。。。Wend 缺少灵活性，所以建议最好使用 Do。。。Loop 语句。下面我们来看看 For Next 语句。For。。。Next 语句用于将语句块运行指定的次数，在循环中使用计数器变量，该变量的值随每一次循环增加或减少。
下面的示例将过程 MyProc 重复执行 50 次。For 语句指定计数器变量 x 及其起始值与终止值。Next 语句使计数器变量每次加 1。 Sub DoMyProc50Times（）
Dim x
For x = 1 To 50
MyProc
Next
End Sub
关键字 Step 用于指定计数器变量每次增加或减少的值。在下面的示例中，计数器变量 j 每次加 2。循环结束后，total 的值为 2、4、6、8 和 10 的总和。
Sub TwosTotal（）
Dim j； total
For j = 2 To 10 Step 2
total = total ＋ j
Next
MsgBox 〃 总和为 〃 & total & 〃。〃
End Sub
要使计数器变量递减，可将 Step 设为负值。此时计数器变量的终止值必须小于起始值。在下面的示例中，计数器变量 myNum 每次减 2。循环结束后，total 的值为 16、14、12、10、8、6、4 和 2 的总和。 Sub NewTotal（）
Dim myNum； total
For myNum = 16 To 2 Step …2
total = total ＋ myNum
Next
MsgBox 〃 总和为 〃 & total & 〃。〃
End Sub
Exit For 语句用于在计数器达到其终止值之前退出 For。。。Next 语句。因为通常只是在某些特殊情况下（例如在发生错误时）要退出循环，所以可以在 If。。。Then。。。Else 语句的 True 语句块中使用 Exit For 语句。如果条件为 False，循环将照常运行。
最后，让我们来看看 For Each。。。Next 语句 ；For Each。。。Next 循环与 For。。。Next 循环类似。For Each。。。Next 不是将语句运行指定的次数，而是对于数组中的每个元素或对象集合中的每一项重复一组语句。这在不知道集合中元素的数目时非常有用。它的语法如下： For Each element In group
＇statements＇
＇Exit For＇
＇statements＇Next ＇element＇
如果 group 中有至少一个元素，就会进入 For Each 块执行。一旦进入循环，便首先对 group 中第一个元素执行循环中的所有语句。只要 group 中还有其他的元素，就会对每个元素执行循环中的语句。当 group 中没有其他元素时退出循环，然后从 Next 语句之后的语句继续执行。
至此，我们已经完成了对脚本语言 VBScript 所有的基本知识的学习，但是仅凭阅读现有的这几篇文章你是无法熟练运用 VBScript 的，你必须通过不断的实践来提高自己的等级。当然，如果你熟悉 C，你也可以选择JavaScript 来作为 ASP 应用程序的脚本语言。不知大家有没有发现 ASP 程序的调试比较困难，因为没有什么现成的工具，在这里我向大家简要介绍一下 Microsoft Script Debugger，我们可以运用它来进行一定量的程序调试工作。
IIS4。0 所包括的 Microsoft Script Debugger（Script 侦错工具），提供脚本程序的侦错功能。您可以使用 Microsoft Script 侦错工具来进行对使用 VBScript、JScript 编写的脚本程序，以及 Java applets、beans 和 ActiveX 组件的侦错工作。
有的脚本程序在用户端浏览器执行，有的脚本程序（《 ％ 。。。 ％》中的部份）在服务器端执行。Microsoft Script Debugger，可以侦错用户端执行的脚本程序以及服务器端执行脚本程序。 在用户端浏览器执行的脚本程序是在用户端的浏览器当中执行，包括在标准 HTML 代码中的 VBScript、Jscript 部份。在浏览器载入此 HTML 代码或譬如按下按钮触发事件时，将执行此包括脚本程序的 HTML 代码。用户端浏览器执行的脚本程序，主要用于对 HTML 表单输入的基本检查等功能。
在服务器端执行的脚本程序是在 IIS 服务器端执行，包括在 。asp 程序中。先在
快捷操作: 按键盘上方向键 ← 或 → 可快速上下翻页 按键盘上的 Enter 键可回到本书目录页 按键盘上方向键 ↑ 可回到本页顶部!
温馨提示： 温看小说的同时发表评论，说出自己的看法和其它小伙伴们分享也不错哦！发表书评还可以获得积分和经验奖励，认真写原创书评 被采纳为精评可以获得大量金币、积分和经验奖励哦！