<p> 用 Redirect 方法可将浏览器重定向到另一个 URL,而不是将内容发送给用户。例如,如果您想确认用户是否已从主页进入了您的应用程序,以便能收到一个客户 ID,则可以检验他们是否有客户 ID 号;如果没有,就可以将其重定向到主页。以下就是具体例子:</p><p> <br /><%If Session("CustomerID") = 0 Then Response.Redirect "homepage.asp" End If%> </p><p> 除非缓冲区已经打开,否则,在任何内容或标题返回给浏览器之前,您必须重定向浏览器。将 Response.Redirect 语句放在页的顶部和<HTML> 标记之前可确保没有任何内容返回给浏览器。如果在返回给浏览器的内容或标题后使用 Response.Redirect,将看到一个错误信息。</p><p> 如果在页的中间使用 Response.Redirect,请将其与 Response.Buffer 属性一起使用,这是因为在默认情况下,Web 服务器返回 HTML 和在处理 ASP 页时的脚本处理结果。但是,您可以设置 Response 对象的 Buffer 属性以便在向用户发送任何内容之前,先处理页上的所有的服务器脚本命令。</p><p> 可以使用缓冲技术来确定在页处理过程中的某个点,而您并不想将该点之前的内容发送给用户。也可以用 Response 对象的 Redirect 方法将用户重定向到另一页,或者用 Response 对象的 Clear 方法清除缓冲区并将不同的内容发送给用户。下面的例子使用了以上两种方法。</p><p> 例子一: </p><p> <br /><% '下一句程序必须放在程序在<HTML> 标识符前Response.Buffer = True %><html><body>...<br />例子二:<br /><%If Request ("FName") = "" Then Response.Clear Response.Redirect ".. /test.html"Else Response.Write Request("FName")End If%></body></html> </p>
<p> </p>
<p> 以上就是Response对象的在程序中经常用到的功能。</p><p> Server对象有那些属性方法以及怎样使用</p><p> Server对象提供对服务器访问的方法和属性。其中大多数方法和属性是作为实用程序的功能提供的。<br />Server对象有哪些基本属性和方法?</p><p> (1).语法:<br /> Server.property|method<br /> (2).属性(property)<br /> Server对象只有一个属性:ScriptTimeout 程序能够运行的最大时间<br /> (3).方法(Methods)<br /> CreateObject 建立一个对象实例.<br /> Execute 执行一个asp文件<br /> GetLastError 返回一个错误代码<br /> HTMLEncode 对指定的HTML代码进行转换.<br /> MapPath 将一个相对路径转化为一个绝对路径.<br /> Transfer 将当前的所有状态信息发送给另一个asp文件<br />URLEncode 以URL形式转化指定的代码,包括空格 </p><p> 如何使用Server对象的属性和方法?</p><p> (1).CreateObject</p><p> 语法<br /> Server.CreateObject ( progID )<br /> 参数<br /> progID<br /> 指定要创建的组件名称,格式如下: [Vendor.]Component[.Version]。<br /> 要点:<br /> 一般来说,用由Server.CreateObject方法创建的对象的生存期在该页面范围内。这就说,当这页的asp程序执行完后,这个对象会自动地消失。</p><p> 为了创建一个拥有Session或Application范围的对象,你就要在Global.asa文件中使用CreateObject方法</p><p> (2).Execute</p><p> Execute 方法是呼叫一个ASP文件并且执行它,像被呼叫的ASP文件存在这个ASP文件中一样。这很与许多语言中的类的调用相似。<br /> 语法<br /> Server.Execute ( Path )<br /> 参数<br /> Path<br /> 指定将执行的那个asp文件的路径。如果它是一个相对路径,那么它必须是一个和这个ASP应用程序相同的地方(目录)的文件。 </p>
<p> </p>
<p> 讲解<br /> Server.Execute 方法提供了一个将复杂ASP应用程序分化为小块单位来执行的方法。通过这种方法,你能够建一个ASP图书馆,你能够随便在你需要时调用你图书馆中的ASP文件。</p><p> 当IIS根据指定的ASP文件路径执行完这个ASP文件之后,就会自动返回以前的ASP文件。这个刚刚执行完的ASP文件有可能改变了HTTP head。但是和其它的ASP文件一样,当程序试图改变http head时,就会报错!</p><p> 这个path参数可以包括一个询问信息。</p><p> 如果在被呼叫和呼叫的ASP文件中都含有相同的子函数,那么这些子函数只在本ASP文件中起作用。举个例子,如果在下面的ASP1和ASP2两个文件中都含有放弃程序的子函数。首先ASP1呼叫ASP2,那么ASP2中的的OnTransactionAbort开始执行,当ASP2执行完毕,ASP1中的OnTransactionAbort才开始执行。</p><p> <br /> ASP1:<br /><%@ Transaction = Required %><% Server.Execute ("Page22.asp") Sub OnTransactionAbort Sub OnTransactionCommit%><br /> Asp2.asp:<br />< %@ Transaction = Required Sub OnTransactionAbort Sub OnTransactionCommit%><br /> 例子:<br />ASP1<br /><% Response.Write ( "I am going to execute ASP2 " )Server.Execute ( "/myasps/asp2.asp" )%><br />ASP2<br /><% Response.Write ( "Here I am" ) %> </p><p> (3).GetLastError方法</p><p> GetLastError 方法返回一个ASPError Object 来描述一个错误信息.这个方法只适用于在asp文件发送任何内容给用户机之前.<br /> 语法<br /> Server.GetLastError ( )<br /> 要点:<br /> 如果一个500;100 用户错误已经被定义在一个asp应用程序中,它是指的一个以.asp为后缀的文件。这种情况下,在这个程序运行时当一个错误发生时,服务器就会自动的以Server.Transfer这种方式传送到这个正在执行的ASP页面。ASP应用程序就会将有效的处理这个错误。另外,这个ASPError Object一定要有效,这样你就能够看到服务器提供给你的错误信息来改这个文件了!</p>
<p> </p>
<p> 一般的Web Site 都是根据文件\iishelp\common\500-100.asp来构造的。你能够用它来执行一个asp错误,当然你能够自己定义了!。如果你想改变为另外一个asp文件的来执行这些用户错误。那么你可以用IIS中的snap-in。 </p><p> 注意:当IIS发现了一个asp文件或者global.asa文件中的一个错误,那么一个500;100用户错误产生。以下的程序将不能执行! </p><p> 下面的三个例子证明不同的错误会产生的用户错误。三个错误是:</p><p> 编译错误<br /> 运行错误<br /> 逻辑错误 </p><p> 第一个例子证明了一个编译错误,就是当IIS试图包含一个文件时产生的。这个错误会产生是因为在这个包含文件中没有定义所需的参数。第二个例子显示的是一个运行错误,这个程序中断的原因是程序中没有"next"。第三个例子显示的是一个逻辑错误,因为这个程序试图除以一个0。 </p><p> 例子01: </p><p> <br />< % response.write "hello"%><br />例子02:<br />< % dim I for I = 1 to 1 nxt%><br />例子03:<br /><% dim i , j dim sum sum = 0 j = 0 for i = 1 to 10 sum = sum+1 next sum = sum/j%> </p><p> (4).HTMLEncode方法:</p><p> HTMLEncode方法对指定的字符串进行HTML编码。<br /> 语法<br /> Server.HTMLEncode ( string )<br /> 参数<br /> string 要进行编码的字符<br /> 例子<br /> 下面的程序:<br /> <%= Server.HTMLEncode ( "The paragraph tag: " ) %><br /> 输出为:<br /> The paragraph tag:<br /> 注意 程序执行后在浏览器中看到的是:<br /> The paragraph tag: </p><p> 但是如果你用"查看源文件"看一下的话,源代码就不是了。 </p>
<p> </p>
<p> (5).MapPath</p><p> MapPath 方法将相对路径转化为服务器上的物理路径<br /> 语法<br /> Server.MapPath ( Path )<br /> 参数<br /> Path </p><p> 这个路径是以"/"或"\"开头的路径,如果这个路径中没有"\",那么MapPath方法就会返回以当前目录为基础的路径。 </p><p> 讲解<br /> MapPath 方法不能检查路径在这个服务器下是否存在。因为 MapPath 转化路径时是不管这个路径是否在这个服务器下存在的。 </p><p> 你能够用它来将一个相对路径转化为一个物理路径,然后再在这个路径下进行各种操作。</p><p> 在下面的例子中,data.txt文件存在 C:\Inetpub\Wwwroot\Script 目录中,而一个test.asp 文件包括下面的代码。C:\Inetpub\Wwwroot 是该服务器的主目录 。</p><p> 下面的例子中,首先用环境变量"PATH_INFO"获得当前文件的物理路径。</p><p> 下面是Script 代码:</p><p> <br /> <%= server.mappath ( Request.ServerVariables ( "PATH_INFO" ) ) %><br /> 显示为:<br />c:\inetpub\wwwroot\script\test.asp<br /> 因为下面的例子中路径参数没有以"/"开头,所以它是以当前目录转化的,asp文件是放在C:\Inetpub\Wwwroot\Script中的.以下是 scripts的内容: <br /> <%= server.mappath ( " data.txt " ) %> <%= server.mappath ( " script/data.txt " ) %><br /> 显示为:<br /> c:\inetpub\wwwroot\script\data.txt c:\inetpub\wwwroot\script\script\data.txt<br /> 以下的两个例子是以"\"开头的.以下是scripts的内容:<br /> <%= server.mappath ( " \script " ) %><br /> 显示为:<br /> c:\inetpub\wwwroot\script\data.txt c:\inetpub\wwwroot\script<br /> 直接用"/"或"\"就会得到服务器的主目录:<br /> <%= server.mappath ( " \ " ) %><br /> 显示为:<br /> c:\inetpub\wwwroot </p>
<p> </p>
<p> (6).Transfer方法:</p><p> transfer 方法会把一个正在执行的asp文件的所有信息传给另外一人asp文件。<br /> 语法<br /> Server.Transfer ( path )<br /> 参数<br /> Path<br /> 将要接收信息的asp文件的位置。<br /> 要点:<br /> 当你调用Server.Transfer时,所有内建对象的状态信息都会包含在这次传送之中。这就是说,所有在保存在Session或Application中的信息都会被传送,而且所有当前请求的信息都会被接收信息的asp文件所接受。</p><p> 下面的例子示范了从一个asp文件传送到另一个asp文件例子! </p><p> <br /> ASP1<br /><% Dim sessvar1 Response.Write Session.SessionID Response.Write ( " " ) Response.Write ( "I am going to ASP2 " ) Server.Transfer ( "/Myasps/ASP2.asp" )%><br /> ASP2<br /><% Response.Write Session.SessionID %> </p><p> (7).URLEncode方法:</p><p> URLEncode 方法可以将指定字符串进行URL编码。<br /> 语法<br /> Server.URLEncode ( string )<br /> 参数<br /> string 指定要转化的字符串<br /> 下面是代码:<br /> <% Respones.Write ( Server.URLEncode ( http://www.microsoft.com ) ) %><br /> 显示为:<br /> http%3A%2F%2Fwww%2Emicrosoft%2Ecom </p><p> (8).属性:ScriptTimeout</p><p> ScriptTimeout 属性规定了程序的最大运行时间。<br /> 语法<br /> Server.ScriptTimeout = NumSeconds<br /> 参数<br /> NumSeconds<br /> 规定了程序的最大的运行时间(以秒计算)。缺省值是90秒<br /> Remarks</p><p> Web sertvic 或 Web server上缺省的Scritpt Timeout的值能通过ASPScriptTimeOUT属性来设置。在程序中,ScriptTimeout属性的值不能小于这个缺省值。举个例子吧,如果NumSeconds我们设置为10秒,而缺省值为90秒,那么程序就会中止在90秒以后,而不是10秒以后的。同样,如果我们设置ScriptTimeout的值为100秒,那么,程序就会在100秒之后中止,而不是90秒。</p></p><p> 下面的例了中程序将被设置为100秒后自动中止。</p><p> <% Server.ScriptTimeout = 100 %><br /> 下面的例子中将重新得到ScriptTimeout的值,然后把它存在Timout变量中<br /> <% TimeOut = Server.ScriptTimeout %></p><p> 总结:</p><p> 通过以上结合例子的介绍,对server对象的如何使用有了一个比较具体的了解。但要灵活运用,只有不断练习。</p></p>