[點(diǎn)晴永久免費(fèi)OA]ASP基礎(chǔ)入門(mén)第七篇(ASP內(nèi)建對(duì)象Response)
下面,我們開(kāi)始學(xué)習(xí) ASP 的另一個(gè)內(nèi)建對(duì)象 Response。 與 Request 是獲取客戶端 HTTP 信息相反 ,Response 對(duì)象是用來(lái)控制發(fā)送給用戶的信息,包括直接發(fā)送信息給瀏覽器、重定向?yàn)g覽器到另一個(gè) URL 或設(shè)置 cookie 的值。 語(yǔ)法:Response.collection|property|method 一、屬性 1、Buffer Buffer 屬性指示是否緩沖頁(yè)輸出。當(dāng)緩沖頁(yè)輸出時(shí),只有當(dāng)前頁(yè)的所有服務(wù)器腳本處理完畢或者調(diào)用了 Flush 或 End 方法后,服務(wù)器才將響應(yīng)發(fā)送給客戶端瀏覽器,服務(wù)器將輸出發(fā)送給客戶端瀏覽器后就不能再設(shè)置 Buffer 屬性。因此應(yīng)該在 .asp 文件的第一行調(diào)用 Response.Buffer。 2、Charset Charset 屬性將字符集名稱附加到 Response 對(duì)象中 content-type 標(biāo)題的后面。對(duì)于不包含 Response.Charset 屬性的 ASP 頁(yè),content-type 標(biāo)題將為 :content-type:text/html。 我們可以在 .asp 文件中指定 content-type 標(biāo)題,如 : <% Response.Charset="gb2312") %> 將產(chǎn)生以下結(jié)果 : content-type:text/html; charset=gb2312 注意,無(wú)論字符串表示的字符集是否有效,該功能都會(huì)將其插入 content-type 標(biāo)題中。且如果某個(gè)頁(yè)包含多個(gè)含有 Response.Charset 的標(biāo)記,則每個(gè) Response.Charset 都將替代前一個(gè) CharsetName。這樣,字符集將被設(shè)置為該頁(yè)中 Response.Charset 的最后一個(gè)實(shí)例所指定值。 3、ContentType ContentType 屬性指定服務(wù)器響應(yīng)的 HTTP 內(nèi)容類型。如果未指定 ContentType,默認(rèn)為 text/HTML。 4、Expires Expires 屬性指定了在瀏覽器上緩沖存儲(chǔ)的頁(yè)距過(guò)期還有多少時(shí)間。如果用戶在某個(gè)頁(yè)過(guò)期之前又回到此頁(yè),就會(huì)顯示緩沖區(qū)中的頁(yè)面。如果設(shè)置 response.expires=0,則可使緩存的頁(yè)面立即過(guò)期。這是一個(gè)較實(shí)用的屬性,當(dāng)客戶通過(guò) ASP 的登陸頁(yè)面進(jìn)入 WEB 站點(diǎn)后,應(yīng)該利用該屬性使登陸頁(yè)面立即過(guò)期,以確保安全。 5、ExpiresAbsolute 與 Expires 屬性不同 ExpiresAbsolute 屬性指定緩存于瀏覽器中的頁(yè)面的確切到期日期和時(shí)間。在未到期之前,若用戶返回到該頁(yè),該緩存中的頁(yè)面就顯示。如果未指定時(shí)間,該主頁(yè)在當(dāng)天午夜到期。如果未指定日期,則該主頁(yè)在腳本運(yùn)行當(dāng)天的指定時(shí)間到期。如下示例指定頁(yè)面在 1998 年 12 月 10 日上午 9:00 分 30 秒到期。 <% Response.ExpiresAbsolute=#Dec 12,1998 9:00:30# %> 二、方法 1、Clear 可以用 Clear 方法清除緩沖區(qū)中的所有 HTML 輸出。但 Clear 方法只清除響應(yīng)正文而不清除響應(yīng)標(biāo)題。可以用該方法處理錯(cuò)誤情況。但是如果沒(méi)有將 Response.Buffer 設(shè)置為 TRUE,則該方法將導(dǎo)致運(yùn)行時(shí)錯(cuò)誤。 2、End End 方法使 Web 服務(wù)器停止處理腳本并返回當(dāng)前結(jié)果。文件中剩余的內(nèi)容將不被處理。如果 Response.Buffer 已設(shè)置為 TRUE,則調(diào)用 Response.End 將緩沖輸出。 3、Flush Flush 方法立即發(fā)送緩沖區(qū)中的輸出。如果沒(méi)有將 Response.Buffer 設(shè)置為 TRUE,則該方法將導(dǎo)致運(yùn)行時(shí)錯(cuò)誤。 4、Redirect Redirect 方法使瀏覽器立即重定向到程序指定的 URL。這也是一個(gè)我們經(jīng)常用到方法,這樣程序員就可以根據(jù)客戶的不同響應(yīng),為不同的客戶指定不同的頁(yè)面或根據(jù)不同的情況指定不同的頁(yè)面。一旦使用了 Redirect 方法任何在頁(yè)中顯式設(shè)置的響應(yīng)正文內(nèi)容都將被忽略。然而,此方法不向客戶端發(fā)送該頁(yè)設(shè)置的其他 HTTP 標(biāo)題,將產(chǎn)生一個(gè)將重定向 URL 作為鏈接包含的自動(dòng)響應(yīng)正文。Redirect 方法發(fā)送下列顯式標(biāo)題,其中 URL 是傳遞給該方法的值。如: <% Response.redirect("www.gxlsystem.com") %> 5、Write Write 方法是我們平時(shí)最常用的方法之一,它是將指定的字符串寫(xiě)到當(dāng)前的 HTTP 輸出。 三、集合 Response 對(duì)象只有一個(gè)集合 --Cookie Cookies 集合設(shè)置 cookie 的值。若指定的 cookie 不存在,則創(chuàng)建它。若存在,則設(shè)置新的值并且將舊值刪去。 語(yǔ)法 Response.Cookies(cookie)[(key)|.attribute]=value 這里的 cookie 是指定 cookie 的名稱。而如果指定了 key,則該 cookie 就是一個(gè)字典。attribute 指定 cookie 自身的有關(guān)信息。attribute 參數(shù)可以是下列之一 : Domain 若被指定,則 cookie 將被發(fā)送到對(duì)該域的請(qǐng)求中去。 Expires 指定 cookie 的過(guò)期日期。為了在會(huì)話結(jié)束后將 cookie 存儲(chǔ)在客戶端磁盤(pán)上,必須設(shè)置該日期。若此項(xiàng)屬性的設(shè)置未超過(guò)當(dāng)前日期,則在任務(wù)結(jié)束后 cookie 將到期。 HasKeys 指定 cookie 是否包含關(guān)鍵字。 Path 若被指定,則 cookie 將只發(fā)送到對(duì)該路徑的請(qǐng)求中。如果未設(shè)置該屬性,則使用應(yīng)用程序的路徑。 至此,我們已經(jīng)學(xué)習(xí)的 Response 對(duì)象的所有屬性、方法和集合的理論知識(shí),下面作者將給大家演示一段簡(jiǎn)單的程序,通過(guò)實(shí)踐讓大家加深理解。先將以下程序剪貼到記事簿中,并保存為 asp7.asp。 <% Dim user Dim flag Dim pwd Dim say Response.buffer=true ' 開(kāi)啟緩沖頁(yè)面功能 Response.ContentType="text/HTML" Response.Charset="gb2312" user=Request.Form("username") pwd=Request.Form("password") say=Request.QueryString("say") %> <form method="POST" action="asp7.asp"> <p> 用戶名 :<input type="text" name="username" size="12"><br> 口 令 :<input type="password" name="password" size="12"><br> <input type="submit" value=" 提交 " name="B1"><input type="reset" value=" 取消 " name="B2"></p></form> <% If say=1 then Response.Write " 歡迎書(shū)生大駕光臨 !" End If If say > 1 then Response.Write " 歡迎再次光臨書(shū)生的 ASP 網(wǎng)站 !" End If If user="Adm" and pwd="shusheng" Then Response.Expires=1 ' 設(shè)置該頁(yè)面在瀏覽器的緩沖中存儲(chǔ) 1 分鐘后過(guò)期。 flag=1 ElseIf user="guest" and pwd="guest" Then Response.Expires=0 ' 使緩存的頁(yè)面立即過(guò)期。 Response.Clear ' 清空存儲(chǔ)在緩存中的頁(yè)面 flag=2 ElseIf user="vip" and pwd="vip" Then Response.Write " 歡迎 VIP 光臨書(shū)生的 ASP 網(wǎng)站 " flag=3 Else flag=0 Response.End ' 立即停止腳本處理,并將緩存中的頁(yè)面輸出 End If
Response.write "<p><a href='asp7b.asp?flag="&flag&"'> 動(dòng)態(tài)網(wǎng)站設(shè)計(jì)十八般武藝 --ASP 篇 (7) 實(shí)踐練習(xí) </a></p>" ' 將變量 flag 的值傳送給 asp7b.asp
%>
<p> 動(dòng)態(tài)網(wǎng)站設(shè)計(jì)十八般武藝 --ASP 篇 (7) 實(shí)踐練習(xí) </p>
再將以下程序保存為 asp7b.asp。
<%
Dim saysay=Request.QueryString("flag")
select case say
case "1"
Response.Redirect "asp7.asp?say=1"
case "2"
Response.Redirect "asp7.asp?say=2"
case "3"
Response.Redirect "asp7.asp?say=3"
case "0"
Response.Redirect "asp7.asp?say=0"
End select
%> 將這兩個(gè)程序放在有執(zhí)行權(quán)限的 WEB 虛擬目錄下,并以 http 方式訪問(wèn) asp7.asp。在這兩個(gè)程序中我們充分運(yùn)用了至今為止所學(xué)過(guò)的兩個(gè) ASP 內(nèi)建對(duì)象 :Request 和 Response。當(dāng)你第一次訪問(wèn) asp7.asp 文件時(shí),頁(yè)面上出現(xiàn)一個(gè) Form 并提示輸入用戶名和口令,如果你輸入用戶名 :Adm、口令 :shusheng, 則會(huì)出現(xiàn)如下頁(yè)面 : 那為什么第一次登陸asp7.asp 頁(yè)面時(shí)僅僅只顯示一個(gè) Form 對(duì)話框呢?因?yàn)榇藭r(shí)程序判斷到用戶既非 Adm, 也不是 guest 和 vip,所以執(zhí)行 Response.End, 立即將存儲(chǔ)在緩存中的 Form 顯示出來(lái),并停止其后的一切腳本處理,包括純 HTML 代碼的顯示。 無(wú)論你是用 Adm 還是 guest 或 vip 登陸該頁(yè)面你都可以看到一個(gè)超鏈,該超鏈指向文件 asp7b.asp,當(dāng)我們點(diǎn)擊該超鏈時(shí),asp7.asp 將變量 flag 的值作為參數(shù)發(fā)送給 asp7b.asp, 而后者則根據(jù)該參數(shù)的值來(lái)做出判斷,并依據(jù)不同情況使用 Response.Redirect 再?gòu)?qiáng)行返回 asp7.asp, 并也將一個(gè)變量 say 的值作為參數(shù)發(fā)送給 asp7.asp。如此一來(lái),asp7.asp 又會(huì)根據(jù)此參數(shù)來(lái)做出不同的反應(yīng)。 大家現(xiàn)在都看到了我們僅僅用了兩個(gè)很簡(jiǎn)單的程序,就可以做到對(duì)同一個(gè)頁(yè)面的多種不同顯示結(jié)果,這正是 ASP 的魅力所在,各位可以以此示范程序?yàn)榛A(chǔ),來(lái)進(jìn)行一些改動(dòng),以熟練掌握我們所學(xué)的這兩個(gè)內(nèi)建對(duì)象。 該文章在 2022/6/21 14:42:07 編輯過(guò) |
關(guān)鍵字查詢
相關(guān)文章
正在查詢... |