服務(wù)器組件增強了腳本語言的功能_第1頁
服務(wù)器組件增強了腳本語言的功能_第2頁
服務(wù)器組件增強了腳本語言的功能_第3頁
服務(wù)器組件增強了腳本語言的功能_第4頁
服務(wù)器組件增強了腳本語言的功能_第5頁
已閱讀5頁，還剩24頁未讀， 繼續(xù)免費閱讀

下載本文檔

版權(quán)說明：本文檔由用戶提供并上傳，收益歸屬內(nèi)容提供方，若內(nèi)容存在侵權(quán)，請進行舉報或認領(lǐng)

文檔簡介

服務(wù)器組件增強了腳本語言的功能第1頁，共29頁，2023年，2月20日，星期五DatabaseAccess提供用ActiveXDataObjects(ADO)對數(shù)據(jù)庫的訪問。ContentLinking創(chuàng)建一個NextLink對象，該對象可生成Web頁內(nèi)容列表，并象書一樣將各頁順續(xù)連接。FileAccess組件提供文件的輸入輸出訪問。第2頁，共29頁，2023年，2月20日，星期五MyInfo創(chuàng)建一個MyInfo

對象，該對象追蹤個人信息，例如站點管理員的姓名、地址及顯示選擇。Counters創(chuàng)建一個Counters

對象，該對象可以創(chuàng)建、保存、增加或檢索任意數(shù)量的獨立計數(shù)器。ContentRotator自動翻轉(zhuǎn)Web主頁上的HTML內(nèi)容字符串。PageCounter記錄并顯示W(wǎng)eb頁被打開的次數(shù)。Status創(chuàng)建一個Status

對象，該對象的某些屬性包含服務(wù)器狀態(tài)信息。當前的這種服務(wù)器狀態(tài)僅適用于PersonalWebServerforMacintosh。第3頁，共29頁，2023年，2月20日，星期五二、創(chuàng)建內(nèi)置組件對象1.使用Server.CreateObject(注冊名)2.使用HTML語言中的<OBJECT>標簽第4頁，共29頁，2023年，2月20日，星期五廣告翻轉(zhuǎn)器組件AdRotator組件創(chuàng)建一個AdRotator

對象，該對象在Web頁上自動輪換顯示廣告圖像。當用戶每次打開或重新加載Web頁時，AdRotator組件將根據(jù)在ADRotator計劃文件中指定的信息顯示一個新廣告。語法SetAdRotator=Server.CreateObject("MSWC.AdRotator")

參數(shù)AdRotator

指定AdRotator對象的名稱，此對象通過調(diào)用Server.CreateObject

創(chuàng)建。一、廣告顯示第5頁，共29頁，2023年，2月20日，星期五屬性Border指定廣告邊框的大小。Clickable指定廣告是否為超鏈接。TargetFrame指定顯示廣告的框架的名稱。方法GetAdvertisement從數(shù)據(jù)文件中獲取下一個計劃廣告的詳細說明并將其格式化為HTML格式。第6頁，共29頁，2023年，2月20日，星期五示例下面的示例在用戶每次查看Web頁時顯示不同的廣告。<%Setad=Server.CreateObject("MSWC.AdRotator")%><%=ad.GetAdvertisement("/ads/adrot.txt")%>ADRotator計劃文件文件包含AdRotator組件用于管理和顯示各種廣告圖象的信息。在該文件中，用戶可以指定廣告的細節(jié)，例如廣告的空間大小、使用的圖象文件以及每個文件的顯示時間所占百分比。文件由兩部分組成。第一部分設(shè)置應(yīng)用于輪換安排中所有廣告圖象的參數(shù)；第二部分指定每個單獨廣告的文件和位置信息以及應(yīng)當接收的每個廣告的顯示時間所占百分比。這兩部分由全是星號(*)的一行隔開。第7頁，共29頁，2023年，2月20日，星期五例子：Adrot.txtREDIRECTadred.aspWIDTH230HEIGHT33BORDER1*/prog/ad/468x60_1.gif/網(wǎng)易2/images/Ad173962St1Sz1Sq1Id2.gif/新浪網(wǎng)3gamichlg.gif-SponsoredbyFlyteworks3第8頁，共29頁，2023年，2月20日，星期五例子：主文件：<%Setad=Server.CreateObject("MSWC.AdRotator")%>

<%=ad.GetAdvertisement("/ads/adrot.txt")%>

在第一部分中有四個全局參數(shù)，每個參數(shù)都由一個關(guān)鍵字和值組成。所有的參數(shù)都是可選的。如果用戶未指定全局參數(shù)的值，則AdRotator

將使用默認的值。在這種情況下，文件的第一行必須只有一個星號(*)。第9頁，共29頁，2023年，2月20日，星期五

二、用PageCounter組件統(tǒng)計訪問者PageCounter組件創(chuàng)建PageCounter

對象，以記錄和顯示W(wǎng)eb頁被打開的次數(shù)。每隔一定的時間，此對象將訪問次數(shù)寫入文本文件以便數(shù)據(jù)不會在服務(wù)器關(guān)機時丟失。語法<%SetoVar=Server.CreateObject("MSWC.PageCounter")%>

參數(shù)

oVar

指定通過調(diào)用Server.CreateObject

創(chuàng)建的PageCounter

對象的名稱。第10頁，共29頁，2023年，2月20日，星期五方法Hits顯示指定的URL被打開的次數(shù)。PageHit增加訪問次數(shù)。Reset將指定的頁的訪問次數(shù)設(shè)置為0。第11頁，共29頁，2023年，2月20日，星期五例子：<HTML><HEAD><TITLE>頁面計數(shù)器示例</TITLE></HEAD><BODY><%SetWHits=Server.CreateObject("MSWC.PageCounter")WHits.PageHit()%>此頁面被訪問了<%=WHits.hits%>次</Body></HTML>第12頁，共29頁，2023年，2月20日，星期五三、瀏覽器能力：實例：<HTML><HEAD><TITLE>瀏覽器能力檢測示例</TITLE></HEAD><BODY><%SetMyBrow=Server.CreateObject("MSWC.BrowserType")%>你的瀏覽器有如下特性：<P>瀏覽器類型:<%=MyBrow.Browser%></br></br>是否支持分屏:<%=MyBrow.Frames%></br></br>Cookies:<%=MyBrow.Cookies%></br></br>操作平臺:<%=MyBrow.platform%></br></br>VBScript:<%=MyBrow.vbscript%></br></br></BODY></HTML>第13頁，共29頁，2023年，2月20日，星期五文件存取組件一、FileAccess組件簡介FileAccess組件展示可用來訪問計算機文件系統(tǒng)的方法和屬性。用戶可以使用FileAccess組件創(chuàng)建FileSystemObject

對象，該對象提供用于訪問文件系統(tǒng)的方法、屬性和集合。FileAccess組件的對象第14頁，共29頁，2023年，2月20日，星期五二、文件的讀、寫1.創(chuàng)建并寫入文件首先，需要創(chuàng)建一個FileSystemObject對象，然后，利用CreateTextFile()以該對象創(chuàng)建一個TextStream對象，最后利用TextStream對象的WriteLine方法來寫入文件。2.從文本文件讀取數(shù)據(jù)首先，創(chuàng)建一個FileSystemObject對象，然后，利用OpenTextFile()以該對象創(chuàng)建一個TextStream對象，最后利用TextStream對象的ReadLine方法來讀取文件。第15頁，共29頁，2023年，2月20日，星期五CreateTextFile(文件名,[overwrite[,unicode]])參數(shù):overwrite:對文件是否覆蓋

Unicode:指示該文件是否用ASC還是UNICODE碼第16頁，共29頁，2023年，2月20日，星期五實例（寫入文件）：<%Setfobject=server.createobject(“scripting.filesystemObject”)Settfile=fobject.CreateTextFile(“c:\test\test.txt”)Tfile.writeLine(“ok寫入文件”)%>Writeline:在文件中添加字符串和分行符Write：將一個字段寫入文本writeBlankLine(lines):用戶在文件中指定分行符數(shù)目第17頁，共29頁，2023年，2月20日，星期五OpenTextFile(文件名,[IOmode],[Create],[format])IOmode:取值為ForReading;ForAppendingmode:1為只讀打開;8為追加Create:如果文件不存在問是否創(chuàng)建,如果要創(chuàng)建則設(shè)為trueFormat:-2:系統(tǒng)默認;-1unicode;0:ASCII第18頁，共29頁，2023年，2月20日，星期五實例（讀取文件）：<%Setfobject=server.createobject(“scripting.filesystemObject”)Settfile=fobject.OpenTextFile(“c:\test\test.txt”)WhilenotTfile.AtEndOfStreamResponse.Write(Tfile.Readline)WendTfile.close%>第19頁，共29頁，2023年，2月20日，星期五參數(shù)（讀取文件）：AtEndofLine:當光標在當前行的末尾時為真AtEndOfStream:在流的末尾時,為真Column:(只讀的整數(shù)):統(tǒng)計從行首到當前光標的位置的字符數(shù)LINE:只讀的整數(shù):指明光標所在行在整個文件中的行號.方法:Read(字符數(shù)):指定從光標的當前位置開始從文本文件中讀取一定數(shù)量的字符ReadLine:讀取一行字符ReadAll:讀取全部字符Skip(字符數(shù)):略過一定的字符

Close:關(guān)閉打開的文件第20頁，共29頁，2023年，2月20日，星期五OpenTextFile(文件名,[IOmode],[Create],[format])IOmode:取值為ForReading;ForAppendingmode:1為只讀打開;8為追加Create:如果文件不存在問是否創(chuàng)建,如果要創(chuàng)建則設(shè)為trueFormat:-2:系統(tǒng)默認;-1unicode;0:ASCII第21頁，共29頁，2023年，2月20日，星期五文件的處理:FileSystemObject方法:CopyFilesource,destinationMoveFilesource,destinationDeleteFileFileSpecifierFile對象Copynewcopy,[overwrite]Movenewcopydelete:第22頁，共29頁，2023年，2月20日，星期五實例(文件的處理)1：<%Setfobject=server.createobject(“scripting.filesystemObject”)Settfile=fobject.CreateTextFile(“c:\test\test.txt”)Tfile.writeLine(“ok寫入文件”)Tfile.closeFObject.CopyFile”c:\test\test.txt”“c:\test\test2.txt”FObject.MoveFile”c:\test\test.txt”“c:\test\test3.txt”FObject.DeleteFile”c:\test\test.txt”%>第23頁，共29頁，2023年，2月20日，星期五實例(文件的處理)2：<%Setfobject=server.createobject(“scripting.filesystemObject”)Settfile=fobject.CreateTextFile(“c:\test\test.txt”)Tfile.writeLine(“ok寫入文件”)Tfile.closeSetafile=tfile.GetFile(“c:\test\test.txt”)Afile.copy“c:\test2.txt”Afile.move”c:\test3.txt”Afile.delete%>第24頁，共29頁，2023年，2月20日，星期五檢測文件的存在性:

語法:FileExists(文件的物理地址)例子:<%Myself=request.ServerVariables(“PATH_TRANSLATED”)Setfobject=server.createobject(“scripting.filesystemObject”)Tfile.writeLine(“ok寫入文件”)If(fobject.FileExists(myself)thenResponse.write(“fileexist”)%>第25頁，共29頁，2023年，2月20日，星期五驅(qū)動器和文件夾操作例子:<%Setfobject=server.createobject(“scripting.filesystemObject”)Foreachthinginfobject.drives%><br>Driveletter:<%=thing.Driveletter%><br>DriveTotalSize:<%=thing.TotalSize%><br>DriveAvailableSpace:<%=thing.AvailableSpace%><hr><%next%>第26頁，共29頁，2023年，2月20日，星期五文件操作綜合事例:<%@Language=VBScript%><%'注意絕對路徑:C:\Inetpub\home\asp\wuf23.asp主頁路徑:C:\Inetpub\home'使用CreateObject方法創(chuàng)建FileSystemObject對象FSOSetFSO=Server.CreateObject("Scripting.FileSystemObject")Path=Server.MapPath("test")'返回test的物理目錄(絕對路徑)'就本例而言,下面這句與上面這句返回的Path完全一樣'Path=Server.MapPath("\asp\test\")Response.WritePath&"<Br>"IfFSO.FolderExists(Path)=falsethen'判斷該文件夾是否存在

FSO.CreateFolder(Path)'新建文件夾EndIf第27頁，共29頁，2023年，2月20日，星期五文件操作綜合事例:File=Path&"\asptest.txt"'寫文件操作IfFSO.FileExists(File)=TrueThen'判斷該文件是否存在

'建立TextStream對象CTFSe

溫馨提示

  • 1. 本站所有資源如無特殊說明，都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請下載最新的WinRAR軟件解壓。
  • 2. 本站的文檔不包含任何第三方提供的附件圖紙等，如果需要附件，請聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
  • 3. 本站RAR壓縮包中若帶圖紙，網(wǎng)頁內(nèi)容里面會有圖紙預(yù)覽，若沒有圖紙預(yù)覽就沒有圖紙。
  • 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
  • 5. 人人文庫網(wǎng)僅提供信息存儲空間，僅對用戶上傳內(nèi)容的表現(xiàn)方式做保護處理，對用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯，并不能對任何下載內(nèi)容負責。
  • 6. 下載文件中如有侵權(quán)或不適當內(nèi)容，請與我們聯(lián)系，我們立即糾正。
  • 7. 本站不保證下載資源的準確性、安全性和完整性, 同時也不承擔用戶因使用這些下載資源對自己和他人造成任何形式的傷害或損失。

評論

0/150

提交評論