ASP动态网页制作常用错误处理

作者

ASP错误处理

ASP是非常简单的，以至于许多的开发者不会去思考错误处理。错误处理能够让你的应用程序更加合理。我看到过很多个用ASP编写的商业网站，大多数都忽略了错误处理。

错误的类型

有三种主要的错误类型：

编译错误：
这种错误出现一般都是代码的语法问题。因为编译错误而导致辞ASP停止运行。

运行错误

这个错误是发生在你准备运行ASP时的。例如：如果你试图给一个变量赋值，但是却超出了该变量允许的范围。

逻辑错误

逻辑错误是最难被发现的，这种错误经常是一种结构错误，电脑是发现不了的。这就需要我们彻头彻尾地检查我们的代码。

因为编译错误一般是和逻辑错误一起发生的，一般都能显示出来，所以我们担心的就只是运行错误。它都终止ASP的运行，而且给用户丢下一堆很不友好的文字。

那么我们要怎样处理运行错误呢！？我们先来看看，ASP唯一提供给我们的错误命令---On Error Resume Next(这里提醒一下初学者，在ASP中只有On Error Resume Next语句，没有On Error Resume Goto语句）

如果你不使用On Error Resume Next语句的话,一切运行错误都会发生，这个是致命的，那么就会有一段错误代码“展现”给用户，而且ASP程序也会停止。

下面就是一个错误代码：
 

Microsoft&nbsp;OLE&nbsp;DB&nbsp;Provider&nbsp;for&nbsp;ODBC&nbsp;Drivers&nbsp;error&nbsp;80004005&nbsp;&nbsp;<br />[Microsoft][ODBC&nbsp;Driver&nbsp;Manager]&nbsp;Data&nbsp;source&nbsp;name&nbsp;not&nbsp;found&nbsp;and&nbsp;no&nbsp;default&nbsp;driver&nbsp;specified&nbsp;&nbsp;<br />/test.asp,&nbsp;line&nbsp;60

当我们在程序最上面使用On Error Resume Next语句时，所有的错误都会被忽略，程序会自动执行下一条语句。这样程序就会完全执行，出错后用户也不会看到出错信息。但是这样也有不好的地方，那就是如果程序没有按照你想像的执行的话，你就很难找到到底是哪里出了问题，所以你就得在必要的地方对错误进行处理。

处理错误

在ASP中，处理错误的最好的办法就是在程序最底端放上代码来处理错误。我也推荐在每个ASP程序都使用缓冲区。这样的话，如果错误发生，页面就会停止，页面内容也会被清除，这样用户就不会看到错误信息，对你们的抱怨也就少了！下面是一个例子：
 

&lt;%&nbsp;<br />'设置buffer为True&nbsp;<br />Response.Buffer&nbsp;=&nbsp;True&nbsp;&nbsp;<br />'开始错误处理&nbsp;<br />On&nbsp;Error&nbsp;Resume&nbsp;Next&nbsp;<br />%&gt;&nbsp;&nbsp;<br />&lt;%&nbsp;&nbsp;<br />'错误处理&nbsp;<br />If&nbsp;Err.Number&nbsp;&lt;&gt;&nbsp;0&nbsp;Then&nbsp;<br />'清除页面&nbsp;<br />Response.Clear&nbsp;<br />'显示错误信息给用户&nbsp;&nbsp;<br />%&gt;&nbsp;<br />&nbsp;&nbsp;&lt;HTML&gt;&nbsp;<br />&nbsp;&nbsp;&lt;HEAD&gt;&nbsp;<br />&nbsp;&nbsp;&lt;TITLE&gt;&lt;/TITLE&gt;&nbsp;<br />&nbsp;&nbsp;&lt;/HEAD&gt;&nbsp;<br />&nbsp;&nbsp;&lt;BODY&nbsp;BGCOLOR=&quot;#C0C0C0&quot;&gt;&nbsp;<br />&nbsp;&nbsp;&lt;FONT&nbsp;FACE=&quot;ARIAL&quot;&gt;An&nbsp;error&nbsp;occurred&nbsp;in&nbsp;the&nbsp;execution&nbsp;of&nbsp;this&nbsp;ASP&nbsp;page&lt;BR&gt;&nbsp;<br />&nbsp;&nbsp;Please&nbsp;report&nbsp;the&nbsp;following&nbsp;information&nbsp;to&nbsp;the&nbsp;support&nbsp;desk&lt;P&gt;&nbsp;<br />&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&lt;B&gt;Page&nbsp;Error&nbsp;Object&lt;/B&gt;&lt;BR&gt;&nbsp;<br />&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;错误&nbsp;Number：&nbsp;&lt;%=&nbsp;Err.Number&nbsp;%&gt;&lt;BR&gt;&nbsp;<br />&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;错误信息：&nbsp;&lt;%=&nbsp;Err.Description&nbsp;%&gt;&lt;BR&gt;&nbsp;&nbsp;<br />&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;出错文件：&nbsp;&lt;%=&nbsp;Err.Source&nbsp;%&gt;&lt;BR&gt;&nbsp;<br />&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;出错行：&nbsp;&lt;%=&nbsp;Err.Line&nbsp;%&gt;&lt;BR&gt;&nbsp;<br />&nbsp;&nbsp;&lt;/FONT&gt;&nbsp;<br />&nbsp;&nbsp;&lt;/BODY&gt;&nbsp;<br />&nbsp;&nbsp;&lt;/HTML&gt;&nbsp;<br />&lt;%End&nbsp;If%&gt;

你们上面看到了，我首先设置On Error Resume Next ，这样出现错误就不会影响程序的执行。

错误处理和数据库

在错误处理中加入数据库的执行是很复杂的。假若我们有一个程序，有很多的命令去向数据库中添加记录，如果insert/update在程序的最底部执行，如果我们前面又错误发生，那就完了！我们就会向数据库中添加了一个错误的信息。因为我们用了On Error Resume Next 一切的错误都被忽略了！即使前面出错，程序依旧会向数据库中添加数据的。

为避免这种情况，我们就先得做些手脚，正确处理的方法如下：
 

If&nbsp;Err.Number&nbsp;=&nbsp;0&nbsp;And&nbsp;objConnection.Errors.Count&nbsp;=&nbsp;0&nbsp;Then&nbsp;<br />'这里才能执行语句，因为没有错误&nbsp;<br />Set&nbsp;rstResults&nbsp;=&nbsp;dbData.Execute(txtSql)&nbsp;<br />End&nbsp;If

更多高级的处理办法

当一个错误发生时，你们也可以显示更多的错误信息。下面是同时处理数据库和页面错误的例子，有了它我们一下就能发现我们程序中的所有错误。

 

&lt;%&nbsp;&nbsp;<br />If&nbsp;Err.Number&nbsp;&lt;&gt;&nbsp;0&nbsp;Then&nbsp;<br />&nbsp;&nbsp;&nbsp;&nbsp;Response.Clear&nbsp;<br />&nbsp;&nbsp;&nbsp;&nbsp;Select&nbsp;Case&nbsp;Err.Number&nbsp;<br />&nbsp;&nbsp;&nbsp;&nbsp;Case&nbsp;8&nbsp;&nbsp;<br />&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;'指定错误的Number&nbsp;<br />&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;'在这里处理自定义错误&nbsp;&nbsp;<br />&nbsp;&nbsp;&nbsp;&nbsp;Case&nbsp;Else&nbsp;<br />&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;'一般错误&nbsp;<br />&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;If&nbsp;IsObject(objConnection)&nbsp;Then&nbsp;<br />&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;If&nbsp;objConnection.Errors.Count&nbsp;&gt;&nbsp;0&nbsp;Then<br />%&gt;&nbsp;<br />&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&lt;B&gt;Database&nbsp;Connection&nbsp;Object&lt;/B&gt;&nbsp;<br />&lt;%&nbsp;<br />&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;For&nbsp;intLoop&nbsp;=&nbsp;0&nbsp;To&nbsp;objConnection.Errors.Count&nbsp;-&nbsp;1&nbsp;%&gt;&nbsp;<br />&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Error&nbsp;No:&nbsp;&lt;%=&nbsp;objConnection.Errors(intLoop).Number&nbsp;%&gt;&lt;BR&gt;&nbsp;<br />&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Description:&nbsp;&lt;%=&nbsp;objConnection.Errors(intLoop).Description&nbsp;%&gt;&lt;BR&gt;&nbsp;<br />&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Source:&nbsp;&lt;%=&nbsp;objConnection.Errors(intLoop).Source&nbsp;%&gt;&lt;BR&gt;&nbsp;<br />&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;SQLState:&nbsp;&lt;%=&nbsp;objConnection.Errors(intLoop).SQLState&nbsp;%&gt;&lt;BR&gt;<br />&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;NativeError:&nbsp;&lt;%=&nbsp;objConnection.Errors(intLoop).NativeError&nbsp;%&gt;&lt;P&gt;&nbsp;<br />&lt;%&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Next&nbsp;<br />&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&
nbsp;&nbsp;&nbsp;&nbsp;End&nbsp;If&nbsp;<br />&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;End&nbsp;If&nbsp;<br />&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;If&nbsp;Err.Number&nbsp;&lt;&gt;&nbsp;0&nbsp;Then&nbsp;<br />&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;%&gt;&nbsp;<br />&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&lt;B&gt;Page&nbsp;Error&nbsp;Object&lt;/B&gt;&lt;BR&gt;&nbsp;<br />&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Error&nbsp;Number&nbsp;&lt;%=&nbsp;Err.Number&nbsp;%&gt;&lt;BR&gt;&nbsp;<br />&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Error&nbsp;Description&nbsp;&lt;%=&nbsp;Err.Description&nbsp;%&gt;&lt;BR&gt;&nbsp;&nbsp;<br />&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Source&nbsp;&lt;%=&nbsp;Err.Source&nbsp;%&gt;&lt;BR&gt;&nbsp;<br /><br />&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;LineNumber&nbsp;&lt;%=&nbsp;Err.Line&nbsp;%&gt;&lt;P&gt;&nbsp;<br />&lt;%&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<br />&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;End&nbsp;If&nbsp;<br />&nbsp;&nbsp;&nbsp;&nbsp;End&nbsp;Select&nbsp;<br />End&nbsp;If&nbsp;<br />%&gt;

上面的例子让我们一下了处理了很多在数据库中出现的问题，这个在我们日常编程也是常用的！我们也应该看到那个Select Case 语句，它能让我们来处理特定的错误。

Redirect 和错误处理

有一点我们就当注意一下，就是我们常用到的redirect对象，如果一个页面中出现了redirect对象，那么错误处理就失去了意义。所以在转向之前我们还得处理一下，如下：
 

If&nbsp;Err.Number&nbsp;=&nbsp;0&nbsp;And&nbsp;objConnection.Errors.Count&nbsp;=&nbsp;0&nbsp;Then&nbsp;<br />&nbsp;&nbsp;Response.Clear&nbsp;<br />&nbsp;&nbsp;Response.Redirect&nbsp;URL&nbsp;Here<br />End&nbsp;If

把代码变得更整齐

为了让代码变得更整齐，首先把错误处理的文件放在一个包含文件中。这样你就可以在任何文件中使用它。这样修改也方便。

在你程序的最上方加入(当然在语言声明之后）On Error Resume Next语句。

在你执行SQL以前进行错误检查。

使用redirect以前也要进行错误处理。
让你处理错误的包含文件在代码的最上面。

发表评论

此站点使用Akismet来减少垃圾评论。了解我们如何处理您的评论数据。

京ICP备07012509号