ASP程序调试与错误处理技巧

【实验目的】

掌握ASP程序调试的方法。

【实验内容】

1. 运行并调试如下的求 1～100 之间偶数和的程序代码。

〈％@LANGUAGE＝″VBScript″％〉

〈％Option Explicit

Dimi

For i＝l to 100

If i mod 2＝0 Then

sum＝sum＋i

Next

Response.Write sum

％〉

2. 对上面的程序代码， 设置断点并跟踪程序进行调试。

3. 运行并调试如下的程序代码。(www.xing528.com)

〈HTML〉

〈％@ LANGUAGE＝″VBScript″％〉

〈HEAD〉

〈TITLE〉向已有文本文件中添加内容示例〈/TITLE〉

〈/HEAD〉

〈％

Set fso ＝Server.CreateObject（″Scripting.FileSystemObject″）

Set txtFile＝fso.OpenTextFile（Server.MapPath（″ttt.txt″），8）

txtFile.writeline（″欢迎浏览该网页″） ′添加内容

％〉

〈/BODY〉

〈/HTML〉

4. 对上面的程序代码使用Err对象及On Error Resume Next语句进行如下修改：当发现文件不存在时， 显示 “对不起， 该文件不存在”，否则向已有文本文件中添加内容 “欢迎浏览该网页”。