chinaopub.com 第章调试和错误处理213 所以应该改写为如下的代码: Response. write DateAdd(d, 1, Now()) 脚本解释器检测到了我们为第二个参数提供的是一个字符型数据,而 DataAdd函数需要的 是整型数据类型。 代码结构和脚本结构 语法错误的另一个原因是:当制作网页时使用嵌套的或复杂的脚本结构,如 If Then.Els End If或者 Do While.Loop。这有时会造成难以找到的语法错误 例如下面这段程序 If Len(Request Form('cmdSet ))Then strCounterName- Request Form("Isset") strNewvalue =a Request Form('txtset) If IsNumeric(strNewValue)Then ntNewvalue CInt(strNewvalue bjcounters. set strcounterName intNewvalue Response. Write ' Set counter . strcounterName to . strNewvalue Response. Write strNewvalue &' is not a valid If Len(Request Form('cmaRemove))Then objCounters. Remove strcounterName Response. Write Removed counter strcounterName Ena工f End If 产生的错误如图7-4所示 TP 500,100. Internal Server Error. AsP e nternet Informaton Service echnical Information (for support personnel) Error Type Mpected'End /test/test. asp, line 16 国国L 图74程序执行结果4 为什么提示在网页程序中需要一个End语句呢?看一下程序就可以发现,丢失了一个End If,而不是End,在程序的最末尾应该还有另一个 End if o Response. Write Removed counter ' strCounterName End If 在这种情况下,根据代码的缩排格式可以很容易地找到相应的错误。特别当错误信息指 出错误的大致位置时,很快就可以找到错误位置。然而,这段代码很短,如果在分界符 <%.%>中另外还有40行代码,那么错误行号仍然可能指向最后一行(line56):并且如果在新所以应该改写为如下的代码： 脚本解释器检测到了我们为第二个参数提供的是一个字符型数据，而 D a t a A d d函数需要的 是整型数据类型。 代码结构和脚本结构 语法错误的另一个原因是：当制作网页时使用嵌套的或复杂的脚本结构，如 If Then...Else ...End If 或者Do While...Loop。这有时会造成难以找到的语法错误。 例如下面这段程序: 产生的错误如图7 - 4所示。 图7-4 程序执行结果4 为什么提示在网页程序中需要一个 E n d语句呢？看一下程序就可以发现，丢失了一个 E n d I f，而不是E n d，在程序的最末尾应该还有另一个 End If。 在这种情况下，根据代码的缩排格式可以很容易地找到相应的错误。特别当错误信息指 出错误的大致位置时，很快就可以找到错误位置。然而，这段代码很短，如果在分界符 < % . . . % >中另外还有4 0行代码，那么错误行号仍然可能指向最后一行 (line 56)；并且如果在新 第7章 调试和错误处理计计2 1 3 下载