ASP的內(nèi)置組件專項(xiàng)課程課件

10.1課前導(dǎo)讀10.2課堂教學(xué)10.3上機(jī)練習(xí)10.4課后作業(yè)第10課ASP的內(nèi)置組件10.1課前導(dǎo)讀第10課ASP的內(nèi)置組件110.1課前導(dǎo)讀ASP的內(nèi)置組件指安裝ASP時(shí)自動(dòng)注冊(cè)到ASPWeb服務(wù)器上的組件。主要包括表10-1中的組件。表10-1ASP的內(nèi)置組件組件名稱中文名稱主要作用AdRotator廣告輪顯組件隨機(jī)顯示廣告圖像(圖標(biāo))ContentRotator內(nèi)容輪顯組件隨機(jī)顯示W(wǎng)eb頁面ContentLinking內(nèi)容鏈接組件網(wǎng)頁導(dǎo)航Counter計(jì)數(shù)器組件統(tǒng)計(jì)頁面訪問次數(shù)、廣告單擊次數(shù)等PageCounter頁面計(jì)數(shù)器組件僅用來統(tǒng)計(jì)頁面訪問次數(shù)BrowserCapabilities瀏覽器信息組件獲取客戶瀏覽器信息Dictionary數(shù)據(jù)目錄組件保存數(shù)據(jù)FileAccess文件訪問組件訪問文件系統(tǒng)，創(chuàng)建、顯示文件，讀取驅(qū)動(dòng)器信息等DatabaseAccess數(shù)據(jù)庫訪問組件在應(yīng)用程序中訪問數(shù)據(jù)庫，可以顯示表的整個(gè)內(nèi)容、允許用戶構(gòu)造查詢以及在Web頁執(zhí)行其他一些數(shù)據(jù)庫查詢10.1課前導(dǎo)讀組件名稱中文名稱主要作用AdRotato2使用ASP內(nèi)置組件必須先使用Server內(nèi)置對(duì)象的CreateObject方法創(chuàng)建該組件的一個(gè)實(shí)例（變量），或在GlobaLasa文件中使用<Object>標(biāo)記創(chuàng)建該組件的一個(gè)實(shí)例（變量），然后就可以把它當(dāng)ASP內(nèi)置對(duì)象來處理，引用該組件的屬性、方法、集合來實(shí)現(xiàn)組件提供的功能。使用ASP內(nèi)置組件必須先使用Server內(nèi)置對(duì)象的C310.2課堂教學(xué)

10.2.1廣告輪顯組件

10.2.2內(nèi)容輪顯組件

10.2.3文件訪問組件

10.2.4網(wǎng)頁計(jì)數(shù)器組件10.2課堂教學(xué)410.2.1廣告輪顯組件

1.創(chuàng)建廣告輪顯組件的實(shí)例對(duì)象

2.AdRotator對(duì)象的屬性和方法

3.使用廣告輪顯組件

10.2.1廣告輪顯組件510.2.1廣告輪顯組件使用廣告輪顯（AdRotator）組件可以在網(wǎng)頁上輪換顯示廣告。AdRotator組件在每次用戶加載或刷新網(wǎng)頁時(shí)為網(wǎng)頁選擇一個(gè)廣告。另外，如果需要更改廣告，則只需要在重定向和輪換計(jì)劃文件中更改此廣告即可，而不必修改包含此廣告的所有ASP文件。如果此廣告出現(xiàn)在網(wǎng)站中的許多網(wǎng)頁上，這樣就可以節(jié)省開發(fā)時(shí)間。1.創(chuàng)建廣告輪顯組件的實(shí)例對(duì)象使用AdRotator組件首先要?jiǎng)?chuàng)建一個(gè)AdRotator組件的實(shí)例——AdRotator對(duì)象：Set實(shí)例對(duì)象名=Server.CreateObject("MSWC.AdRotator")10.2.1廣告輪顯組件62.AdRotator對(duì)象的屬性和方法AdRotator對(duì)象有三個(gè)屬性Border，TargetFrame，Chickable。它們分別指定圖片的邊框大小，是否提供超連接，還有連接的目標(biāo)框。各屬性說明見表10-2。表10-2AdRotator對(duì)象各屬性的說明屬性名使用格式作用描述備注BorderBorder=Size指定顯示廣告圖像的邊框?qū)挾萐ize為像素值TargetFrameTargetFrame=Frame指定圖標(biāo)鏈接的目標(biāo)框架Frame為框架名ChickableChickable=Value指定廣告是否存在超鏈接Value取True或FalseAdRotator對(duì)象的方法只有一個(gè)，其格式為：GetAdvertisement(RotatorschedulePath)說明：GetAdvertisement方法用來讀取廣告安排文件所設(shè)定的廣告圖標(biāo)信息。2.AdRotator對(duì)象的屬性和方法屬性名使用格式作用描73.使用廣告輪顯組件使用廣告輪顯組件就是使用AdRotator對(duì)象。使用AdRotator對(duì)象需要兩個(gè)文件：重定向文件（包含指向廣告的URL鏈接）以及輪換計(jì)劃文件（包含顯示數(shù)據(jù)）。通過建立這兩個(gè)文件，網(wǎng)站上的任何ASP網(wǎng)頁都可使用AdRotator對(duì)象。使用廣告輪顯組件的步驟如下：3.使用廣告輪顯組件8(1)創(chuàng)建一個(gè)AdRotator輪換計(jì)劃文件輪換計(jì)劃文件用于為要顯示的廣告編錄信息，這些信息包括單擊廣告后的重定向信息、要顯示的廣告的大小、要顯示的圖象、廣告的注釋，以及表明特定廣告被選中的頻率的數(shù)字。在ASP網(wǎng)頁中調(diào)用AdRotator組件的方法時(shí)，組件會(huì)使用此文件來選擇要顯示的廣告。輪換計(jì)劃文件用星號(hào)(*)分成兩節(jié)。第一節(jié)提供了所有廣告的公共信息，第二節(jié)則列出了每個(gè)廣告的特定數(shù)據(jù)。若要測(cè)試輪換計(jì)劃文件，可以使用M上的一些圖像作為廣告圖像。表10-3概述了輪換計(jì)劃文件的結(jié)構(gòu)。(1)創(chuàng)建一個(gè)AdRotator輪換計(jì)劃文件9表10-3輪換計(jì)劃文件的結(jié)構(gòu)內(nèi)容說明RedirectionURL形式的、可在顯示廣告前執(zhí)行的ASP文件的路徑和名稱。此文件可用于記錄單擊廣告的用戶的有關(guān)信息。可以記錄客戶端IP地址、客戶端看到的廣告所在的網(wǎng)頁、廣告點(diǎn)擊的頻率等信息。如果沒有任何URL與第2節(jié)中的廣告相關(guān)聯(lián)，ASP文件也可以處理這種情況。在按廣告點(diǎn)擊次數(shù)向廣告客戶收費(fèi)時(shí)，最好能夠向客戶證明這些點(diǎn)擊不是同一位用戶反復(fù)點(diǎn)擊“刷新”的結(jié)果。Width每個(gè)廣告圖像的寬度，以像素為單位。默認(rèn)值為440。Height每個(gè)廣告圖像的高度，以像素為單位。默認(rèn)值為60。Border環(huán)繞在每個(gè)廣告圖像周圍的邊框?qū)挾?。默認(rèn)值為1。*將第1節(jié)與第2節(jié)分開。此字符必須獨(dú)立成行。圖像URL廣告的圖像文件的虛擬路徑和文件名。廣告客戶主頁的URL選擇此鏈接時(shí)跳轉(zhuǎn)到的URL。如果沒有鏈接，請(qǐng)使用連字符(-)。文本瀏覽器不支持圖片時(shí)顯示的文字。印記一個(gè)整數(shù)，表示AdRotator組件選擇廣告時(shí)選中此廣告的相對(duì)幾率。表10-3輪換計(jì)劃文件的結(jié)構(gòu)內(nèi)容說明Redirectio10(2)創(chuàng)建一個(gè)AdRotator重定向文件用戶單擊廣告時(shí)，用ASP編寫的AdRotator重定向文件可以在顯示廣告之前，捕獲某些信息，并將這些信息寫入一個(gè)文件。該文件首先讀取用戶單擊廣告時(shí)的信息：URL=Request("URL")，然后將網(wǎng)頁導(dǎo)向廣告指向的網(wǎng)頁：Response.RedirectURL。(2)創(chuàng)建一個(gè)AdRotator重定向文件11(3)創(chuàng)建一個(gè)調(diào)用AdRotator組件的ASP網(wǎng)頁來顯示和輪換廣告調(diào)用AdRotator組件首先要?jiǎng)?chuàng)建一個(gè)AdRotator對(duì)象：SetobjLoad=Server.CreateObject("MSWC.AdRotator")如果網(wǎng)頁使用框架，則應(yīng)設(shè)置TargetFrame屬性，以便將在這個(gè)框架中打開URL。objLoad.TargetFrame="TARGET=new"然后可以設(shè)置其他的AdRotator屬性：objLoad.Border=1最后調(diào)用GetAdvertisement方法從文本文件獲取隨機(jī)廣告。(3)創(chuàng)建一個(gè)調(diào)用AdRotator組件的ASP網(wǎng)12【例10-1】設(shè)計(jì)隨機(jī)廣告播放器。準(zhǔn)備3個(gè)充作廣告的圖片文件：MARU1.GIF、MARU2.GIF、MARU3.GIF。然后依次編寫如下文件：①輪換計(jì)劃文件ss.txt，其中代碼為：Redirectar.aspwidth113height113border1*MARU1.GIF../../第2章例題/2_1.htm '使用相對(duì)路徑調(diào)用網(wǎng)頁文件2_1.htm第2章例題2_130MARU2.GIF../../第2章例題/2_2.htm第2章例題2_230MARU3.GIF../../第2章例題/2_3.htm第2章例題2_330【例10-1】設(shè)計(jì)隨機(jī)廣告播放器。13②重定向文件ar.asp，其代碼如下：<%URL=Request("URL")Response.RedirectURL%>③顯示和輪換廣告的網(wǎng)頁文件ShowAd.asp，其代碼如下：<HTML><HEAD><TITLE>廣告輪顯</TITLE></HEAD><BODY><H1>廣告輪顯</H1><%setobjad=server.CreateObject("MSWC.AdRotator")Response.Writeobjad.GetAdvertisement("ss.txt")Setobjad=Nothing%></BODY></HTML>在瀏覽器中運(yùn)行網(wǎng)頁文件ShowAd.asp，單擊廣告圖片，將指向所連接的第2章例題，如圖所示。②重定向文件ar.asp，其代碼如下：1410.2.2內(nèi)容輪顯組件

1.創(chuàng)建內(nèi)容輪顯組件的實(shí)例對(duì)象

2.內(nèi)容安排文件

3.ContentRotator對(duì)象的方法

4.使用內(nèi)容輪顯組件10.2.2內(nèi)容輪顯組件1510.2.2內(nèi)容輪顯組件內(nèi)容輪顯（ContentRotator）組件和AdRotator組件十分類似，只是進(jìn)行隨機(jī)變換的是頁面內(nèi)容而不僅僅是一個(gè)圖標(biāo)，該組件可以用于：①每日新聞：可以隨機(jī)顯示今日有關(guān)網(wǎng)站的不同方面的新信息，例如訪問者情況，新聞組信息，訪問用戶的信息交換。②隨機(jī)連接：隨機(jī)指向并顯示你的各個(gè)網(wǎng)站內(nèi)容。③廣告顯示：這里面提請(qǐng)注意的是顯然你可以制作比AdRotator對(duì)象所提供的循環(huán)廣告更加復(fù)雜的廣告顯示系統(tǒng)。10.2.2內(nèi)容輪顯組件161.創(chuàng)建內(nèi)容輪顯組件的實(shí)例對(duì)象

使用ContentRotator組件首先要?jiǎng)?chuàng)建一個(gè)ContentRotator組件的實(shí)例——ContentRotator對(duì)象：Set實(shí)例對(duì)象名=Server.CreateObject("MSWC.ContentRotator")2.內(nèi)容安排文件使用ContentRotator組件需要一個(gè)內(nèi)容安排文件：將所有欲顯示的網(wǎng)頁內(nèi)容都包含在內(nèi)，這個(gè)文件是一般的文本文件，可以利用任何通用的文本編輯器處理，可以存儲(chǔ)為任何名稱和后綴。1.創(chuàng)建內(nèi)容輪顯組件的實(shí)例對(duì)象17文件的格式如下：%%[#n[//注釋]顯示內(nèi)容說明：①整個(gè)文件由多個(gè)條目組成，每個(gè)條目由以上兩部分組成。②其中n表示顯示頻率的權(quán)重，權(quán)重越高，顯示頻率越大。其默認(rèn)值為1。③注釋內(nèi)容是可選的。④顯示內(nèi)容是任何網(wǎng)頁內(nèi)容。文件的格式如下：183.ContentRotator對(duì)象的方法ContentRotator對(duì)象沒有屬性，只有兩個(gè)方法。①ChooseContent()方法：讀取內(nèi)容安排文件的一個(gè)條目并顯示在瀏覽器窗口。其語法格式：ChooseContent(〈內(nèi)容安排文件〉)②GetAllContent()方法：讀取內(nèi)容安排文件的所有條目，每個(gè)條目后加<HR>換行標(biāo)記，然后顯示在瀏覽器窗口。其語法格式：GetAllContent(〈內(nèi)容安排文件〉)說明：兩個(gè)方法中的〈內(nèi)容安排文件〉都表示內(nèi)容安排文件的相對(duì)路徑或虛擬路徑。3.ContentRotator對(duì)象的方法194.使用內(nèi)容輪顯組件下面以具體實(shí)例說明內(nèi)容輪顯組件的使用?！纠?0-2】設(shè)計(jì)隨機(jī)文本播放器。建立一個(gè)具有上下兩個(gè)框架窗口的框架網(wǎng)頁(main.htm)，上部框架為隨機(jī)文本播放器，用來顯示內(nèi)容安排文件設(shè)定的網(wǎng)頁信息，對(duì)應(yīng)文件為top.asp：下部框架用來顯示個(gè)人主頁，對(duì)應(yīng)文件為Home.asp。4.使用內(nèi)容輪顯組件20①框架網(wǎng)頁main.htm的代碼如下：<HTML><HEAD><TITLE>我的主頁</TITLE></HEAD><framesetrows="120,*"><FRAMESRC="top.asp"name=top><FRAMESRC="home.asp"name=bottom></FRAMESET></HTML>②隨機(jī)文本播放器文件top.asp的代碼如下：<HTML><HEAD></HEAD><BODY><%SetMyContent=Server.createObject("MSWC.ContentRotator")Response.WriteMyContent.ChooseContent("ss.txt")SetMyContent=nothing%></BODY></HTML>①框架網(wǎng)頁main.htm的代碼如下：21③內(nèi)容安排文件ss.txt的內(nèi)容如下：%%#2//這是第一個(gè)記錄<FontColor=Red>歡迎訪問我們的討論組</Font>%%#3//這是第二個(gè)記錄<B>不要忘了把我們站點(diǎn)放入書簽</B>%%#5//這是第三個(gè)記錄請(qǐng)從我們的下載區(qū)下載共享軟件<UL><Li>ActiveX組件<Li>連接檢查</UL>說明：該文件中有三個(gè)記錄，首先用兩個(gè)百分號(hào)%進(jìn)行分隔確認(rèn)，說明這是一個(gè)記錄的開始，然后在井號(hào)#后面是給定的權(quán)重，例子中的權(quán)重分別是2,3,5，那么顯示概率就分別為2/10、3/10、5/10，這里面權(quán)重值為0到65535的整數(shù)，如果設(shè)置為0，就不可能顯示，顯示概率是該權(quán)重除以所有權(quán)重之和。③內(nèi)容安排文件ss.txt的內(nèi)容如下：22④簡(jiǎn)化的主頁文件Home.asp代碼如下：<HTML><HEAD><TITLE>我的主頁</TITLE></HEAD><BODY><H1>我的主頁</H1>內(nèi)容輪顯組件的使用</BODY></HTML>

圖10-2隨機(jī)文本播放器④簡(jiǎn)化的主頁文件Home.asp代碼如下：圖12310.2.3文件訪問組件

1.創(chuàng)建文件訪問組件的實(shí)例——FileSystemObject對(duì)象

2.文件系統(tǒng)對(duì)象模型

3.管理文件夾

4.管理文件

5.讀、寫文件10.2.3文件訪問組件2410.2.3文件訪問組件使用文件訪問（FileAccess）組件是為了在服務(wù)器端對(duì)文件和文件夾進(jìn)行存取訪問。1.創(chuàng)建文件訪問組件的實(shí)例——FileSystemObject對(duì)象要使用文件訪問組件，首先必須創(chuàng)建文件訪問組件的實(shí)例：FileSystemObject對(duì)象。FileSystemObject對(duì)象是VBScript的對(duì)象，其創(chuàng)建命令語法如下：Set實(shí)例對(duì)象名=Server.CreateObject("Scripting.FileSystemObject")使用文件訪問組件就是使用文件系統(tǒng)對(duì)象：FileSystemObject對(duì)象。10.2.3文件訪問組件252.文件系統(tǒng)對(duì)象模型FileSystemObject對(duì)象模型包括若干對(duì)象，可以用于創(chuàng)建、改編、移動(dòng)和刪除文件夾或文件，還可以用于獲取文件夾或文件的各種信息。FileSystemObject對(duì)象模型所包含的對(duì)象見表10-4。表10-4FileSystemObject對(duì)象模型中的對(duì)象對(duì)象描述Drive允許收集關(guān)于系統(tǒng)所用的驅(qū)動(dòng)器的信息，諸如驅(qū)動(dòng)器有多少可用空間，其共享名稱是什么，等等。Folder允許創(chuàng)建、刪除或移動(dòng)文件夾，并向系統(tǒng)查詢文件夾的名稱、路徑等。Files允許創(chuàng)建、刪除或移動(dòng)文件，并向系統(tǒng)查詢文件的名稱、路徑等。FileSystemObject主要對(duì)象，提供一整套用于創(chuàng)建、刪除、收集相關(guān)信息、以及通常的操作驅(qū)動(dòng)器、文件夾和文件的方法。TextStream允許讀和寫文本文件。2.文件系統(tǒng)對(duì)象模型對(duì)象描述Drive允許收集關(guān)于系統(tǒng)所用26說明：FileSystemObject對(duì)象提供了一整套用于創(chuàng)建、刪除、收集相關(guān)信息、以及通常的操作驅(qū)動(dòng)器、文件夾和文件的方法，為簡(jiǎn)單起見本教程只介紹使用FileSystemObject對(duì)象管理文件夾、文件，使用TextStream對(duì)象讀寫文件。(1)FileSystemObject對(duì)象的方法FileSystemObject對(duì)象可以用來存取Web服務(wù)器上的文件與文件夾。其方法的語法及說明見表10-5。說明：FileSystemObject對(duì)象提供了一整27表10-5FileSystemObject對(duì)象的方法表10-5FileSystemObject對(duì)象的方法28DeleteFolderPath,Force刪除Path指定的文件夾，F(xiàn)orce為布爾值，若值為True，表示刪除只讀文件夾，默認(rèn)值為False(不刪除只讀文件夾)。DriveExists(Path)若Path指定的磁盤存在，返回True，否則返回FalseFileExists(Path)若Path指定的文件存在，返回True，否則返回FalseFolderExists(Path)若Path指定的文件夾存在，返回True，否則返回FalseGetDrive(Path)返回包含Path的磁盤，返回值為一個(gè)Drive對(duì)象實(shí)例GetDriveName(Path)返回包含Path的磁盤名稱，返回值為一個(gè)字符串GetExtensionName(Path)返回Path指定之文件的擴(kuò)展名，返回值為一個(gè)字符串GetFile(Path)返回Path指定的文件，返回值為一個(gè)File對(duì)象實(shí)例GetFileName(Path)返回Path最后面的文件名稱或文件夾名稱GetFolder(Path)返回Path指定的文件夾，返回值為一個(gè)Folder對(duì)象實(shí)例GetParentFolderName(Path)返回Path的父文件夾名稱，返回值為一個(gè)字符串DeleteFolderPath,Force刪除Path29GetSpecialFolder(Name)返回特殊文件夾的路徑，Name可以是WindowsFolder、SystemFolder或TemporaryFolder，分別代表Windows文件夾、系統(tǒng)文件夾及存放臨時(shí)文件的文件夾。MoveFileSource,Destination將Source指定的文件移動(dòng)到Destination中。MoveFolderSource,Destination將Source指定的文件夾移動(dòng)到Destination中。OpenTextFile(Filename,Iomode,Create,Format)打開Filename指定的文本文件，并返回一個(gè)TextStream對(duì)象實(shí)例；Iomode為文本文件的打開方式，1表示只讀，2表示可寫，3表示附加到后面；Create表示當(dāng)文本文件不存在時(shí)，是否要建立；Format為文本文件的格式，-1表示Unicode文本文件，0表示ASCII文本文件，-2表示采用系統(tǒng)默認(rèn)值。說明：語法中包含括號(hào)的方法可以有返回值。GetSpecialFolder(Name)返回特殊文件夾的30(2)Folder對(duì)象的屬性和方法使用FileSystemObject對(duì)象的CreateFolder方法可以創(chuàng)建并返回一個(gè)新Folder對(duì)象，使用FileSystemObject對(duì)象的GetFolder則可以返回一個(gè)已經(jīng)存在的Folder對(duì)象。Folder對(duì)象的屬性見表10-6。表10-6Folder對(duì)象的屬性屬性名說明Attributes設(shè)置或返回文件夾的屬性(諸如只讀、隱藏、保存等)。DateCreated返回文件夾的建立日期(此為只讀屬性)。DateLastAccessed返回文件夾最近一次的存取日期與時(shí)間(此為只讀屬性)。DateLastModified返回文件夾最近一次的修改日期與時(shí)間(此為只讀屬性)。Drive返回文件夾所在的磁盤驅(qū)動(dòng)器代號(hào)(此為只讀屬性)。Files返回一個(gè)Files集合，此集合由包含在文件夾內(nèi)的每個(gè)File對(duì)象實(shí)例所組成。IsRootFolder若文件夾為磁盤的根目錄，返回True，否則返回False。Name設(shè)置或返回文件夾的名稱。(2)Folder對(duì)象的屬性和方法屬性名說明Att31ParentFolder返回文件夾的父文件夾(返回值為Folder對(duì)象實(shí)例)Path返回文件夾的路徑(包含文件夾的名稱)。ShortName返回文件夾名稱在不支持長(zhǎng)文件名的環(huán)境下的表示方式。ShortPath返回文件夾路徑在不支持長(zhǎng)文件名的環(huán)境下的表示方式。Size返回文件夾的大小(以字節(jié)為單位，包含所有文件及子文件夾)。SubFolders返回一個(gè)Folders集合，由包含在文件夾內(nèi)每個(gè)Folder對(duì)象實(shí)例所組成。Type返回文件夾的類型。ParentFolder返回文件夾的父文件夾(返回值為Fol32Folder對(duì)象的方法見表10-7。表10-7Folder對(duì)象的方法方法說明CopyDestination，Overwrite將文件夾復(fù)制到Destination，若Overwrite的值為True，表示將已有同名文件夾覆蓋，否則不覆蓋。Delete(Porce)刪除文件夾，若Force的值為True，表示刪除只讀文件夾，否則不刪除。Move(Destination)將文件夾移動(dòng)到Destination。CreateTextFile(Filename,Overwrite,Unicode)建立一個(gè)名稱為Filename的文本文件，并返回一個(gè)TextStream對(duì)象實(shí)例；Overwrite為布爾值，若值為True，表示可覆寫，否則為不可覆蓋；Unicode為布爾值，若值為True，表示為Unicode文本文件，否則為ASCII文本文件；Overwrite和Unicode的默認(rèn)值皆為Flase，若要采用默認(rèn)值，可省略不寫。Folder對(duì)象的方法見表10-7。方法說明Copy33(3)File對(duì)象的屬性和方法使用FileSystemObject對(duì)象的GetFile可以返回一個(gè)已經(jīng)存在的File對(duì)象。File對(duì)象的屬性見表10-8。表10-8File對(duì)象的屬性屬性名說明Attributes設(shè)置或返回文件的屬性(例如只讀、隱藏、保存等)。DateCreated返回文件的建立日期(此為只讀屬性)。DateLastAccessed返回文件最近一次的存取日期與時(shí)間(此為只讀屬性)。DateLastModified返回文件最近一次的修改日期與時(shí)間(此為只讀屬性)。Drive返回文件所在的磁盤驅(qū)動(dòng)器代號(hào)(此為只讀屬性)。Name設(shè)置或返回文件的名稱。ParentFolder返回文件的父文件夾(返回值為Folder對(duì)象實(shí)例)。Path返回文件的路徑(包含文件名)。ShortName返回以“8．3”制的方式表示文件的名稱，以適用于不支持長(zhǎng)文件名的環(huán)境。ShortPath返回文件路徑在不支持長(zhǎng)文件名的環(huán)境下的表示方式。Size返回文件的大小(以字節(jié)為單位)。Type返回文件的類型(3)File對(duì)象的屬性和方法屬性名說明Attri34File對(duì)象的方法見表10-9。表10-9File對(duì)象的方法方法說明Copydestination,overwrite將文件復(fù)制到Destination，若overwrite的值為True，表示將同名文件覆蓋，否則不覆蓋。Delete(Force)刪除文件，若Force的值為True，表示刪除只讀文件，若Force的值為False，表示不刪除只讀文件。Move(Destination)將文件移動(dòng)到Destination。OpenAsTextStream(Iomode,Format)返回代表文件的TextStream對(duì)象實(shí)例；Iomode為文件的打開方式，1表示只讀，2表示可寫，3表示附加到后面；Format為文件的格式，-l表示Unicode文本文件，0表示ASCII文本文件，-2表示采用系統(tǒng)默認(rèn)值。File對(duì)象的方法見表10-9。方法說明Copyd35(4)TextStream對(duì)象的屬性和方法使用FileSystemObject對(duì)象的CreateTextFile方法可以創(chuàng)建并返回一個(gè)新的代表文件的TextStream對(duì)象，使用FileSystemObject對(duì)象的OpenTextFile方法則可以返回一個(gè)已經(jīng)存在的代表文件的TextStream對(duì)象。TextStream對(duì)象的屬性見表10-10。表10-10TextStream對(duì)象的屬性屬性名說明AtEndOfLine若文件指針位于文件中某一行的尾端，返回True，否則返回False。AtEndOfStream若文件指針位于文件的尾端，返回True，否則返回False。Column返回文件指針位于文件的第幾行。Line返回文件指針位于文件的第幾列。(4)TextStream對(duì)象的屬性和方法屬性名說36TextStream對(duì)象的方法見表10-11。表10-11TextStream對(duì)象的方法方法說明Close關(guān)閉文件。Read(Num)從文件指針的位置讀取后面的Num個(gè)字符，然后存放至字符串。ReadAll讀取整個(gè)文件，然后存放至字符串。ReadLine從文件指針的位置讀取一行，然后存放至字符串。Skip(Num)讀取文件時(shí)跳過Num個(gè)字符。SkipLine讀取文件時(shí)跳過一行。Write(String)將字符串String寫入文件。WriteLine(String)將字符串String寫入文件，并在字符串的后面加上換行字符(vbCrLf)，若沒有指定String，表示寫入一個(gè)空行。WriteBlankLines(Num)將Num個(gè)換行字符(vbCrLf)寫入文件，即寫入Num個(gè)空行。TextStream對(duì)象的方法見表10-11。方法說373.管理文件夾FileSystemObject對(duì)象管理文件夾的方法有：建立（CreateFolder）、移動(dòng)或重命名（MoveFolder）、刪除（DeleteFolder）和復(fù)制（CopyFolder）?！纠?0-3】在Web服務(wù)器中瀏覽目錄與子目錄。

程序代碼，運(yùn)行結(jié)果。3.管理文件夾38說明：①Request("af")為表單提交的文件夾路徑；Session("af")存放的是由Request("af")轉(zhuǎn)換的文件夾對(duì)象。②網(wǎng)頁中包括兩個(gè)列表框：文件夾列表框和文件列表框，分別顯示當(dāng)前目錄中的所有子目錄和文件名稱。③代碼中省去了“表單提交”控件，而在文件夾列表框的“單擊”事件過程代碼中，激發(fā)表單的“提交”事件。④在瀏覽器中運(yùn)行代碼，結(jié)果如圖10-3所示。說明：394.管理文件FileSystemObject對(duì)象管理文件的方法有：建立（CreateFolder）、移動(dòng)或重命名（MoveFolder）、刪除（DeleteFolder）和復(fù)制（CopyFolder）?！纠?0-4】在Web服務(wù)器中瀏覽、復(fù)制和刪除文件。程序代碼，運(yùn)行結(jié)果。說明：代碼中使用了兩個(gè)Hidden控件，分別用于存放“復(fù)制文件”和“刪除文件”的信息。4.管理文件405.讀、寫文件TextStream對(duì)象對(duì)應(yīng)于一個(gè)文本文件的內(nèi)容，要對(duì)文件進(jìn)行讀、寫操作，必須使用TextStream對(duì)象。TextStream對(duì)象可以用FileSystemObject對(duì)象的OpenTextFile方法或CreateTextFile方法得到；可以用Folder對(duì)象的CreateTextFile方法得到；還可以用File對(duì)象的OpenAsTextStream方法得到。其中的OpenTextFile方法和CreateTextFile方法還同時(shí)具有創(chuàng)建文本文件的功能。創(chuàng)建一個(gè)TextStream對(duì)象相當(dāng)于打開一個(gè)文本文件，對(duì)文本文件進(jìn)行讀、寫操作則需要使用TextStream對(duì)象的方法，當(dāng)然這還依賴于文件的打開方式。5.讀、寫文件41【例10-5】在Web服務(wù)器中瀏覽、顯示和修改文件。當(dāng)用鼠標(biāo)單擊左邊列表中的文件夾時(shí)，當(dāng)前目錄將轉(zhuǎn)向該文件夾；當(dāng)用鼠標(biāo)單擊左邊列表中的文件時(shí)，右邊的多行文本框中將顯示文件的內(nèi)容。程序代碼，運(yùn)行結(jié)果。說明：①代碼中使用了1個(gè)Hidden控件，用于存放修改文件的確定信息。②由于表單的提交內(nèi)容比較多，采用提交方式為：method=post。【例10-5】在Web服務(wù)器中瀏覽、顯示和修改文件。4210.2.4網(wǎng)頁計(jì)數(shù)器組件

1.創(chuàng)建網(wǎng)頁計(jì)數(shù)器組件的實(shí)例對(duì)象

2.PageCounter對(duì)象的方法

3.使用PageCounter對(duì)象10.2.4網(wǎng)頁計(jì)數(shù)器組件4310.2.4網(wǎng)頁計(jì)數(shù)器組件網(wǎng)頁計(jì)數(shù)器（PageCounter）組件用于統(tǒng)計(jì)每個(gè)網(wǎng)頁被訪問的次數(shù)，該組件定期把統(tǒng)計(jì)的數(shù)據(jù)存入服務(wù)器磁盤上的一個(gè)文本文件——訪問次數(shù)統(tǒng)計(jì)數(shù)據(jù)文件中，所以在停機(jī)或出現(xiàn)錯(cuò)誤信息，當(dāng)前數(shù)據(jù)也不會(huì)丟失。1.創(chuàng)建網(wǎng)頁計(jì)數(shù)器組件的實(shí)例對(duì)象使用PageCounter組件首先要?jiǎng)?chuàng)建一個(gè)PageCounter組件的實(shí)例——PageCounter對(duì)象：Set實(shí)例對(duì)象名=Server.CreateObject("MSWC.PageCounter")10.2.4網(wǎng)頁計(jì)數(shù)器組件1.創(chuàng)建網(wǎng)頁計(jì)數(shù)器組件的實(shí)例44表10-12PageCounter對(duì)象的方法方法說明Hits([Page_Path])返回由Page_Path指定的網(wǎng)頁的訪問次數(shù)，如果省略Page_Path，返回當(dāng)前網(wǎng)頁的訪問次數(shù)PageHit()增加當(dāng)前網(wǎng)頁的訪問次數(shù)Reset([Page_Path])設(shè)置由Page_Path指定的網(wǎng)頁的訪問次數(shù)為0，如果省略Page_Path，設(shè)置當(dāng)前網(wǎng)頁的訪問次數(shù)為02.PageCounter對(duì)象的方法PageCounter對(duì)象提供了向“訪問次數(shù)統(tǒng)計(jì)數(shù)據(jù)文件”增加訪問次數(shù)的方法以及讀取和重新設(shè)置訪問計(jì)數(shù)總和的方法，見表10-12。表10-12PageCounter對(duì)象的方法方法說明H453.使用PageCounter對(duì)象下面例子說明PageCounter組件的使用，先用Server.CreateObject方法創(chuàng)建對(duì)象實(shí)例，然后調(diào)用Hits方法得到對(duì)當(dāng)前網(wǎng)頁的訪問次數(shù)?！纠?0-6】“網(wǎng)頁計(jì)數(shù)器”。每點(diǎn)擊一次“點(diǎn)擊網(wǎng)頁”按鈕或單擊瀏覽器上的“刷新”按鈕都將增加對(duì)當(dāng)前網(wǎng)頁的訪問次數(shù)。如果選中“重置網(wǎng)頁計(jì)數(shù)器”復(fù)選框，則把計(jì)數(shù)器重新設(shè)置為0，如圖10-6所示。3.使用PageCounter對(duì)象46代碼如下：<%SetMyPageCounter=Server.CreateObject("MSWC.PageCounter") '創(chuàng)建對(duì)象實(shí)例MyPageCounter.PageHit '增加此網(wǎng)頁的計(jì)數(shù)器值IfRequest("reset")="on"Then '是否提交重置信息MyPageCounter.Reset() '重置此網(wǎng)頁的計(jì)數(shù)器EndIf%><html><head><title>網(wǎng)頁計(jì)數(shù)器示例</title></head><body><H3>網(wǎng)頁計(jì)數(shù)器示例</H3><p>此網(wǎng)頁的點(diǎn)擊數(shù)為<%=MyPageCounter.Hits%><BR><FORMNAME="PageCounter"METHOD="GET"ACTION="PageCounter.asp"><INPUTTYPE="SUBMIT"VALUE="點(diǎn)擊網(wǎng)頁"><P><P><INPUTTYPE="CHECKBOX"NAME="reset">重置網(wǎng)頁計(jì)數(shù)器</FORM></body></html>說明：選中復(fù)選框控件，服務(wù)器端將得到提交值：“on”。代碼如下：4710.3上機(jī)練習(xí)【練習(xí)10-1】設(shè)計(jì)可以瀏覽、顯示文件屬性的網(wǎng)頁程序，如圖10-7所示圖10-7瀏覽、顯示文件屬性

程序代碼，運(yùn)行結(jié)果。說明：代碼中使用了1個(gè)Hidden控件，用于存放和返回列表框中選定項(xiàng)的序號(hào)。10.3上機(jī)練習(xí)圖10-7瀏覽、顯示文件屬性48演講完畢，謝謝觀看！演講完畢，謝謝觀看！4910.1課前導(dǎo)讀10.2課堂教學(xué)10.3上機(jī)練習(xí)10.4課后作業(yè)第10課ASP的內(nèi)置組件10.1課前導(dǎo)讀第10課ASP的內(nèi)置組件5010.1課前導(dǎo)讀ASP的內(nèi)置組件指安裝ASP時(shí)自動(dòng)注冊(cè)到ASPWeb服務(wù)器上的組件。主要包括表10-1中的組件。表10-1ASP的內(nèi)置組件組件名稱中文名稱主要作用AdRotator廣告輪顯組件隨機(jī)顯示廣告圖像(圖標(biāo))ContentRotator內(nèi)容輪顯組件隨機(jī)顯示W(wǎng)eb頁面ContentLinking內(nèi)容鏈接組件網(wǎng)頁導(dǎo)航Counter計(jì)數(shù)器組件統(tǒng)計(jì)頁面訪問次數(shù)、廣告單擊次數(shù)等PageCounter頁面計(jì)數(shù)器組件僅用來統(tǒng)計(jì)頁面訪問次數(shù)BrowserCapabilities瀏覽器信息組件獲取客戶瀏覽器信息Dictionary數(shù)據(jù)目錄組件保存數(shù)據(jù)FileAccess文件訪問組件訪問文件系統(tǒng)，創(chuàng)建、顯示文件，讀取驅(qū)動(dòng)器信息等DatabaseAccess數(shù)據(jù)庫訪問組件在應(yīng)用程序中訪問數(shù)據(jù)庫，可以顯示表的整個(gè)內(nèi)容、允許用戶構(gòu)造查詢以及在Web頁執(zhí)行其他一些數(shù)據(jù)庫查詢10.1課前導(dǎo)讀組件名稱中文名稱主要作用AdRotato51使用ASP內(nèi)置組件必須先使用Server內(nèi)置對(duì)象的CreateObject方法創(chuàng)建該組件的一個(gè)實(shí)例（變量），或在GlobaLasa文件中使用<Object>標(biāo)記創(chuàng)建該組件的一個(gè)實(shí)例（變量），然后就可以把它當(dāng)ASP內(nèi)置對(duì)象來處理，引用該組件的屬性、方法、集合來實(shí)現(xiàn)組件提供的功能。使用ASP內(nèi)置組件必須先使用Server內(nèi)置對(duì)象的C5210.2課堂教學(xué)

10.2.1廣告輪顯組件

10.2.2內(nèi)容輪顯組件

10.2.3文件訪問組件

10.2.4網(wǎng)頁計(jì)數(shù)器組件10.2課堂教學(xué)5310.2.1廣告輪顯組件

1.創(chuàng)建廣告輪顯組件的實(shí)例對(duì)象

2.AdRotator對(duì)象的屬性和方法

3.使用廣告輪顯組件

10.2.1廣告輪顯組件5410.2.1廣告輪顯組件使用廣告輪顯（AdRotator）組件可以在網(wǎng)頁上輪換顯示廣告。AdRotator組件在每次用戶加載或刷新網(wǎng)頁時(shí)為網(wǎng)頁選擇一個(gè)廣告。另外，如果需要更改廣告，則只需要在重定向和輪換計(jì)劃文件中更改此廣告即可，而不必修改包含此廣告的所有ASP文件。如果此廣告出現(xiàn)在網(wǎng)站中的許多網(wǎng)頁上，這樣就可以節(jié)省開發(fā)時(shí)間。1.創(chuàng)建廣告輪顯組件的實(shí)例對(duì)象使用AdRotator組件首先要?jiǎng)?chuàng)建一個(gè)AdRotator組件的實(shí)例——AdRotator對(duì)象：Set實(shí)例對(duì)象名=Server.CreateObject("MSWC.AdRotator")10.2.1廣告輪顯組件552.AdRotator對(duì)象的屬性和方法AdRotator對(duì)象有三個(gè)屬性Border，TargetFrame，Chickable。它們分別指定圖片的邊框大小，是否提供超連接，還有連接的目標(biāo)框。各屬性說明見表10-2。表10-2AdRotator對(duì)象各屬性的說明屬性名使用格式作用描述備注BorderBorder=Size指定顯示廣告圖像的邊框?qū)挾萐ize為像素值TargetFrameTargetFrame=Frame指定圖標(biāo)鏈接的目標(biāo)框架Frame為框架名ChickableChickable=Value指定廣告是否存在超鏈接Value取True或FalseAdRotator對(duì)象的方法只有一個(gè)，其格式為：GetAdvertisement(RotatorschedulePath)說明：GetAdvertisement方法用來讀取廣告安排文件所設(shè)定的廣告圖標(biāo)信息。2.AdRotator對(duì)象的屬性和方法屬性名使用格式作用描563.使用廣告輪顯組件使用廣告輪顯組件就是使用AdRotator對(duì)象。使用AdRotator對(duì)象需要兩個(gè)文件：重定向文件（包含指向廣告的URL鏈接）以及輪換計(jì)劃文件（包含顯示數(shù)據(jù)）。通過建立這兩個(gè)文件，網(wǎng)站上的任何ASP網(wǎng)頁都可使用AdRotator對(duì)象。使用廣告輪顯組件的步驟如下：3.使用廣告輪顯組件57(1)創(chuàng)建一個(gè)AdRotator輪換計(jì)劃文件輪換計(jì)劃文件用于為要顯示的廣告編錄信息，這些信息包括單擊廣告后的重定向信息、要顯示的廣告的大小、要顯示的圖象、廣告的注釋，以及表明特定廣告被選中的頻率的數(shù)字。在ASP網(wǎng)頁中調(diào)用AdRotator組件的方法時(shí)，組件會(huì)使用此文件來選擇要顯示的廣告。輪換計(jì)劃文件用星號(hào)(*)分成兩節(jié)。第一節(jié)提供了所有廣告的公共信息，第二節(jié)則列出了每個(gè)廣告的特定數(shù)據(jù)。若要測(cè)試輪換計(jì)劃文件，可以使用M上的一些圖像作為廣告圖像。表10-3概述了輪換計(jì)劃文件的結(jié)構(gòu)。(1)創(chuàng)建一個(gè)AdRotator輪換計(jì)劃文件58表10-3輪換計(jì)劃文件的結(jié)構(gòu)內(nèi)容說明RedirectionURL形式的、可在顯示廣告前執(zhí)行的ASP文件的路徑和名稱。此文件可用于記錄單擊廣告的用戶的有關(guān)信息?？梢杂涗浛蛻舳薎P地址、客戶端看到的廣告所在的網(wǎng)頁、廣告點(diǎn)擊的頻率等信息。如果沒有任何URL與第2節(jié)中的廣告相關(guān)聯(lián)，ASP文件也可以處理這種情況。在按廣告點(diǎn)擊次數(shù)向廣告客戶收費(fèi)時(shí)，最好能夠向客戶證明這些點(diǎn)擊不是同一位用戶反復(fù)點(diǎn)擊“刷新”的結(jié)果。Width每個(gè)廣告圖像的寬度，以像素為單位。默認(rèn)值為440。Height每個(gè)廣告圖像的高度，以像素為單位。默認(rèn)值為60。Border環(huán)繞在每個(gè)廣告圖像周圍的邊框?qū)挾取ＤJ(rèn)值為1。*將第1節(jié)與第2節(jié)分開。此字符必須獨(dú)立成行。圖像URL廣告的圖像文件的虛擬路徑和文件名。廣告客戶主頁的URL選擇此鏈接時(shí)跳轉(zhuǎn)到的URL。如果沒有鏈接，請(qǐng)使用連字符(-)。文本瀏覽器不支持圖片時(shí)顯示的文字。印記一個(gè)整數(shù)，表示AdRotator組件選擇廣告時(shí)選中此廣告的相對(duì)幾率。表10-3輪換計(jì)劃文件的結(jié)構(gòu)內(nèi)容說明Redirectio59(2)創(chuàng)建一個(gè)AdRotator重定向文件用戶單擊廣告時(shí)，用ASP編寫的AdRotator重定向文件可以在顯示廣告之前，捕獲某些信息，并將這些信息寫入一個(gè)文件。該文件首先讀取用戶單擊廣告時(shí)的信息：URL=Request("URL")，然后將網(wǎng)頁導(dǎo)向廣告指向的網(wǎng)頁：Response.RedirectURL。(2)創(chuàng)建一個(gè)AdRotator重定向文件60(3)創(chuàng)建一個(gè)調(diào)用AdRotator組件的ASP網(wǎng)頁來顯示和輪換廣告調(diào)用AdRotator組件首先要?jiǎng)?chuàng)建一個(gè)AdRotator對(duì)象：SetobjLoad=Server.CreateObject("MSWC.AdRotator")如果網(wǎng)頁使用框架，則應(yīng)設(shè)置TargetFrame屬性，以便將在這個(gè)框架中打開URL。objLoad.TargetFrame="TARGET=new"然后可以設(shè)置其他的AdRotator屬性：objLoad.Border=1最后調(diào)用GetAdvertisement方法從文本文件獲取隨機(jī)廣告。(3)創(chuàng)建一個(gè)調(diào)用AdRotator組件的ASP網(wǎng)61【例10-1】設(shè)計(jì)隨機(jī)廣告播放器。準(zhǔn)備3個(gè)充作廣告的圖片文件：MARU1.GIF、MARU2.GIF、MARU3.GIF。然后依次編寫如下文件：①輪換計(jì)劃文件ss.txt，其中代碼為：Redirectar.aspwidth113height113border1*MARU1.GIF../../第2章例題/2_1.htm '使用相對(duì)路徑調(diào)用網(wǎng)頁文件2_1.htm第2章例題2_130MARU2.GIF../../第2章例題/2_2.htm第2章例題2_230MARU3.GIF../../第2章例題/2_3.htm第2章例題2_330【例10-1】設(shè)計(jì)隨機(jī)廣告播放器。62②重定向文件ar.asp，其代碼如下：<%URL=Request("URL")Response.RedirectURL%>③顯示和輪換廣告的網(wǎng)頁文件ShowAd.asp，其代碼如下：<HTML><HEAD><TITLE>廣告輪顯</TITLE></HEAD><BODY><H1>廣告輪顯</H1><%setobjad=server.CreateObject("MSWC.AdRotator")Response.Writeobjad.GetAdvertisement("ss.txt")Setobjad=Nothing%></BODY></HTML>在瀏覽器中運(yùn)行網(wǎng)頁文件ShowAd.asp，單擊廣告圖片，將指向所連接的第2章例題，如圖所示。②重定向文件ar.asp，其代碼如下：6310.2.2內(nèi)容輪顯組件

1.創(chuàng)建內(nèi)容輪顯組件的實(shí)例對(duì)象

2.內(nèi)容安排文件

3.ContentRotator對(duì)象的方法

4.使用內(nèi)容輪顯組件10.2.2內(nèi)容輪顯組件6410.2.2內(nèi)容輪顯組件內(nèi)容輪顯（ContentRotator）組件和AdRotator組件十分類似，只是進(jìn)行隨機(jī)變換的是頁面內(nèi)容而不僅僅是一個(gè)圖標(biāo)，該組件可以用于：①每日新聞：可以隨機(jī)顯示今日有關(guān)網(wǎng)站的不同方面的新信息，例如訪問者情況，新聞組信息，訪問用戶的信息交換。②隨機(jī)連接：隨機(jī)指向并顯示你的各個(gè)網(wǎng)站內(nèi)容。③廣告顯示：這里面提請(qǐng)注意的是顯然你可以制作比AdRotator對(duì)象所提供的循環(huán)廣告更加復(fù)雜的廣告顯示系統(tǒng)。10.2.2內(nèi)容輪顯組件651.創(chuàng)建內(nèi)容輪顯組件的實(shí)例對(duì)象

使用ContentRotator組件首先要?jiǎng)?chuàng)建一個(gè)ContentRotator組件的實(shí)例——ContentRotator對(duì)象：Set實(shí)例對(duì)象名=Server.CreateObject("MSWC.ContentRotator")2.內(nèi)容安排文件使用ContentRotator組件需要一個(gè)內(nèi)容安排文件：將所有欲顯示的網(wǎng)頁內(nèi)容都包含在內(nèi)，這個(gè)文件是一般的文本文件，可以利用任何通用的文本編輯器處理，可以存儲(chǔ)為任何名稱和后綴。1.創(chuàng)建內(nèi)容輪顯組件的實(shí)例對(duì)象66文件的格式如下：%%[#n[//注釋]顯示內(nèi)容說明：①整個(gè)文件由多個(gè)條目組成，每個(gè)條目由以上兩部分組成。②其中n表示顯示頻率的權(quán)重，權(quán)重越高，顯示頻率越大。其默認(rèn)值為1。③注釋內(nèi)容是可選的。④顯示內(nèi)容是任何網(wǎng)頁內(nèi)容。文件的格式如下：673.ContentRotator對(duì)象的方法ContentRotator對(duì)象沒有屬性，只有兩個(gè)方法。①ChooseContent()方法：讀取內(nèi)容安排文件的一個(gè)條目并顯示在瀏覽器窗口。其語法格式：ChooseContent(〈內(nèi)容安排文件〉)②GetAllContent()方法：讀取內(nèi)容安排文件的所有條目，每個(gè)條目后加<HR>換行標(biāo)記，然后顯示在瀏覽器窗口。其語法格式：GetAllContent(〈內(nèi)容安排文件〉)說明：兩個(gè)方法中的〈內(nèi)容安排文件〉都表示內(nèi)容安排文件的相對(duì)路徑或虛擬路徑。3.ContentRotator對(duì)象的方法684.使用內(nèi)容輪顯組件下面以具體實(shí)例說明內(nèi)容輪顯組件的使用。【例10-2】設(shè)計(jì)隨機(jī)文本播放器。建立一個(gè)具有上下兩個(gè)框架窗口的框架網(wǎng)頁(main.htm)，上部框架為隨機(jī)文本播放器，用來顯示內(nèi)容安排文件設(shè)定的網(wǎng)頁信息，對(duì)應(yīng)文件為top.asp：下部框架用來顯示個(gè)人主頁，對(duì)應(yīng)文件為Home.asp。4.使用內(nèi)容輪顯組件69①框架網(wǎng)頁main.htm的代碼如下：<HTML><HEAD><TITLE>我的主頁</TITLE></HEAD><framesetrows="120,*"><FRAMESRC="top.asp"name=top><FRAMESRC="home.asp"name=bottom></FRAMESET></HTML>②隨機(jī)文本播放器文件top.asp的代碼如下：<HTML><HEAD></HEAD><BODY><%SetMyContent=Server.createObject("MSWC.ContentRotator")Response.WriteMyContent.ChooseContent("ss.txt")SetMyContent=nothing%></BODY></HTML>①框架網(wǎng)頁main.htm的代碼如下：70③內(nèi)容安排文件ss.txt的內(nèi)容如下：%%#2//這是第一個(gè)記錄<FontColor=Red>歡迎訪問我們的討論組</Font>%%#3//這是第二個(gè)記錄<B>不要忘了把我們站點(diǎn)放入書簽</B>%%#5//這是第三個(gè)記錄請(qǐng)從我們的下載區(qū)下載共享軟件<UL><Li>ActiveX組件<Li>連接檢查</UL>說明：該文件中有三個(gè)記錄，首先用兩個(gè)百分號(hào)%進(jìn)行分隔確認(rèn)，說明這是一個(gè)記錄的開始，然后在井號(hào)#后面是給定的權(quán)重，例子中的權(quán)重分別是2,3,5，那么顯示概率就分別為2/10、3/10、5/10，這里面權(quán)重值為0到65535的整數(shù)，如果設(shè)置為0，就不可能顯示，顯示概率是該權(quán)重除以所有權(quán)重之和。③內(nèi)容安排文件ss.txt的內(nèi)容如下：71④簡(jiǎn)化的主頁文件Home.asp代碼如下：<HTML><HEAD><TITLE>我的主頁</TITLE></HEAD><BODY><H1>我的主頁</H1>內(nèi)容輪顯組件的使用</BODY></HTML>

圖10-2隨機(jī)文本播放器④簡(jiǎn)化的主頁文件Home.asp代碼如下：圖17210.2.3文件訪問組件

1.創(chuàng)建文件訪問組件的實(shí)例——FileSystemObject對(duì)象

2.文件系統(tǒng)對(duì)象模型

3.管理文件夾

4.管理文件

5.讀、寫文件10.2.3文件訪問組件7310.2.3文件訪問組件使用文件訪問（FileAccess）組件是為了在服務(wù)器端對(duì)文件和文件夾進(jìn)行存取訪問。1.創(chuàng)建文件訪問組件的實(shí)例——FileSystemObject對(duì)象要使用文件訪問組件，首先必須創(chuàng)建文件訪問組件的實(shí)例：FileSystemObject對(duì)象。FileSystemObject對(duì)象是VBScript的對(duì)象，其創(chuàng)建命令語法如下：Set實(shí)例對(duì)象名=Server.CreateObject("Scripting.FileSystemObject")使用文件訪問組件就是使用文件系統(tǒng)對(duì)象：FileSystemObject對(duì)象。10.2.3文件訪問組件742.文件系統(tǒng)對(duì)象模型FileSystemObject對(duì)象模型包括若干對(duì)象，可以用于創(chuàng)建、改編、移動(dòng)和刪除文件夾或文件，還可以用于獲取文件夾或文件的各種信息。FileSystemObject對(duì)象模型所包含的對(duì)象見表10-4。表10-4FileSystemObject對(duì)象模型中的對(duì)象對(duì)象描述Drive允許收集關(guān)于系統(tǒng)所用的驅(qū)動(dòng)器的信息，諸如驅(qū)動(dòng)器有多少可用空間，其共享名稱是什么，等等。Folder允許創(chuàng)建、刪除或移動(dòng)文件夾，并向系統(tǒng)查詢文件夾的名稱、路徑等。Files允許創(chuàng)建、刪除或移動(dòng)文件，并向系統(tǒng)查詢文件的名稱、路徑等。FileSystemObject主要對(duì)象，提供一整套用于創(chuàng)建、刪除、收集相關(guān)信息、以及通常的操作驅(qū)動(dòng)器、文件夾和文件的方法。TextStream允許讀和寫文本文件。2.文件系統(tǒng)對(duì)象模型對(duì)象描述Drive允許收集關(guān)于系統(tǒng)所用75說明：FileSystemObject對(duì)象提供了一整套用于創(chuàng)建、刪除、收集相關(guān)信息、以及通常的操作驅(qū)動(dòng)器、文件夾和文件的方法，為簡(jiǎn)單起見本教程只介紹使用FileSystemObject對(duì)象管理文件夾、文件，使用TextStream對(duì)象讀寫文件。(1)FileSystemObject對(duì)象的方法FileSystemObject對(duì)象可以用來存取Web服務(wù)器上的文件與文件夾。其方法的語法及說明見表10-5。說明：FileSystemObject對(duì)象提供了一整76表10-5FileSystemObject對(duì)象的方法表10-5FileSystemObject對(duì)象的方法77DeleteFolderPath,Force刪除Path指定的文件夾，F(xiàn)orce為布爾值，若值為True，表示刪除只讀文件夾，默認(rèn)值為False(不刪除只讀文件夾)。DriveExists(Path)若Path指定的磁盤存在，返回True，否則返回FalseFileExists(Path)若Path指定的文件存在，返回True，否則返回FalseFolderExists(Path)若Path指定的文件夾存在，返回True，否則返回FalseGetDrive(Path)返回包含Path的磁盤，返回值為一個(gè)Drive對(duì)象實(shí)例GetDriveName(Path)返回包含Path的磁盤名稱，返回值為一個(gè)字符串GetExtensionName(Path)返回Path指定之文件的擴(kuò)展名，返回值為一個(gè)字符串GetFile(Path)返回Path指定的文件，返回值為一個(gè)File對(duì)象實(shí)例GetFileName(Path)返回Path最后面的文件名稱或文件夾名稱GetFolder(Path)返回Path指定的文件夾，返回值為一個(gè)Folder對(duì)象實(shí)例GetParentFolderName(Path)返回Path的父文件夾名稱，返回值為一個(gè)字符串DeleteFolderPath,Force刪除Path78GetSpecialFolder(Name)返回特殊文件夾的路徑，Name可以是WindowsFolder、SystemFolder或TemporaryFolder，分別代表Windows文件夾、系統(tǒng)文件夾及存放臨時(shí)文件的文件夾。MoveFileSource,Destination將Source指定的文件移動(dòng)到Destination中。MoveFolderSource,Destination將Source指定的文件夾移動(dòng)到Destination中。OpenTextFile(Filename,Iomode,Create,Format)打開Filename指定的文本文件，并返回一個(gè)TextStream對(duì)象實(shí)例；Iomode為文本文件的打開方式，1表示只讀，2表示可寫，3表示附加到后面；Create表示當(dāng)文本文件不存在時(shí)，是否要建立；Format為文本文件的格式，-1表示Unicode文本文件，0表示ASCII文本文件，-2表示采用系統(tǒng)默認(rèn)值。說明：語法中包含括號(hào)的方法可以有返回值。GetSpecialFolder(Name)返回特殊文件夾的79(2)Folder對(duì)象的屬性和方法使用FileSystemObject對(duì)象的CreateFolder方法可以創(chuàng)建并返回一個(gè)新Folder對(duì)象，使用FileSystemObject對(duì)象的GetFolder則可以返回一個(gè)已經(jīng)存在的Folder對(duì)象。Folder對(duì)象的屬性見表10-6。表10-6Folder對(duì)象的屬性屬性名說明Attributes設(shè)置或返回文件夾的屬性(諸如只讀、隱藏、保存等)。DateCreated返回文件夾的建立日期(此為只讀屬性)。DateLastAccessed返回文件夾最近一次的存取日期與時(shí)間(此為只讀屬性)。DateLastModified返回文件夾最近一次的修改日期與時(shí)間(此為只讀屬性)。Drive返回文件夾所在的磁盤驅(qū)動(dòng)器代號(hào)(此為只讀屬性)。Files返回一個(gè)Files集合，此集合由包含在文件夾內(nèi)的每個(gè)File對(duì)象實(shí)例所組成。IsRootFolder若文件夾為磁盤的根目錄，返回True，否則返回False。Name設(shè)置或返回文件夾的名稱。(2)Folder對(duì)象的屬性和方法屬性名說明Att80ParentFolder返回文件夾的父文件夾(返回值為Folder對(duì)象實(shí)例)Path返回文件夾的路徑(包含文件夾的名稱)。ShortName返回文件夾名稱在不支持長(zhǎng)文件名的環(huán)境下的表示方式。ShortPath返回文件夾路徑在不支持長(zhǎng)文件名的環(huán)境下的表示方式。Size返回文件夾的大小(以字節(jié)為單位，包含所有文件及子文件夾)。SubFolders返回一個(gè)Folders集合，由包含在文件夾內(nèi)每個(gè)Folder對(duì)象實(shí)例所組成。Type返回文件夾的類型。ParentFolder返回文件夾的父文件夾(返回值為Fol81Folder對(duì)象的方法見表10-7。表10-7Folder對(duì)象的方法方法說明CopyDestination，Overwrite將文件夾復(fù)制到Destination，若Overwrite的值為True，表示將已有同名文件夾覆蓋，否則不覆蓋。Delete(Porce)刪除文件夾，若Force的值為True，表示刪除只讀文件夾，否則不刪除。Move(Destination)將文件夾移動(dòng)到Destination。CreateTextFile(Filename,Overwrite,Unicode)建立一個(gè)名稱為Filename的文本文件，并返回一個(gè)TextStream對(duì)象實(shí)例；Overwrite為布爾值，若值為True，表示可覆寫，否則為不可覆蓋；Unicode為布爾值，若值為True，表示為Unicode文本文件，否則為ASCII文本文件；Overwrite和Unicode的默認(rèn)值皆為Flase，若要采用默認(rèn)值，可省略不寫。Folder對(duì)象的方法見表10-7。方法說明Copy82(3)File對(duì)象的屬性和方法使用FileSystemObject對(duì)象的GetFile可以返回一個(gè)已經(jīng)存在的File對(duì)象。File對(duì)象的屬性見表10-8。表10-8File對(duì)象的屬性屬性名說明Attributes設(shè)置或返回文件的屬性(例如只讀、隱藏、保存等)。DateCreated返回文件的建立日期(此為只讀屬性)。DateLastAccessed返回文件最近一次的存取日期與時(shí)間(此為只讀屬性)。DateLastModified返回文件最近一次的修改日期與時(shí)間(此為只讀屬性)。Drive返回文件所在的磁盤驅(qū)動(dòng)器代號(hào)(此為只讀屬性)。Name設(shè)置或返回文件的名稱。ParentFolder返回文件的父文件夾(返回值為Folder對(duì)象實(shí)例)。Path返回文件的路徑(包含文件名)。ShortName返回以“8．3”制的方式表示文件的名稱，以適用于不支持長(zhǎng)文件名的環(huán)境。ShortPath返回文件路徑在不支持長(zhǎng)文件名的環(huán)境下的表示方式。Size返回文件的大小(以字節(jié)為單位)。Type返回文件的類型(3)File對(duì)象的屬性和方法屬性名說明Attri83File對(duì)象的方法見表10-9。表10-9File對(duì)象的方法方法說明Copydestination,overwrite將文件復(fù)制到Destination，若overwrite的值為True，表示將同名文件覆蓋，否則不覆蓋。Delete(Force)刪除文件，若Force的值為True，表示刪除只讀文件，若Force的值為False，表示不刪除只讀文件。Move(Destination)將文件移動(dòng)到Destination。OpenAsTextStream(Iomode,Format)返回代表文件的TextStream對(duì)象實(shí)例；Iomode為文件的打開方式，1表示只讀，2表示可寫，3表示附加到后面；Format為文件的格式，-l表示Unicode文本文件，0表示ASCII文本文件，-2表示采用系統(tǒng)默認(rèn)值。File對(duì)象的方法見表10-9。方法說明Copyd84(4)TextStream對(duì)象的屬性和方法使用FileSystemObject對(duì)象的CreateTextFile方法可以創(chuàng)建并返回一個(gè)新的代表文件的TextStream對(duì)象，使用FileSystemObject對(duì)象的OpenTextFile方法則可以返回一個(gè)已經(jīng)存在的代表文件的TextStream對(duì)象。TextStream對(duì)象的屬性見表10-10。表10-10TextStream對(duì)象的屬性屬性名說明AtEndOfLine若文件指針位于文件中某一行的尾端，返回True，否則返回False。AtEndOfStream若文件指針位于文件的尾端，返回True，否則返回False。Column返回文件指針位于文件的第幾行。Line返回文件指針位于文件的第幾列。(4)TextStream對(duì)象的屬性和方法屬性名說85TextStream對(duì)象的方法見表10-11。表10-11TextStream對(duì)象的方法方法說明Close關(guān)閉文件。Read(Num)從文件指針的位置讀取后面的Num個(gè)字符，然后存放至字符串。ReadAll讀取整個(gè)文件，然后存放至字符串。ReadLine從文件指針的位置讀取一行，然后存放至字符串。Skip(Num)讀取文件時(shí)跳過Num個(gè)字符。SkipLine讀取文件時(shí)跳過一行。Write(String)將字符串String寫入文件。WriteLine(String)將字符串String寫入文件，并在字符串的后面加上換行字符(vbCrLf)，若沒有指定String，表示寫入一個(gè)空行。WriteBlankLines(Num)將Num個(gè)換行字符(vbCrLf)寫入文件，即寫入Num個(gè)空行。TextStream對(duì)象的方法見表10-11。方法說863.管理文件夾FileSystemObject對(duì)象管理文件夾的方法有：建立（Create