黑鷹基地vip asp教程23 lesson_第1頁
黑鷹基地vip asp教程23 lesson_第2頁
黑鷹基地vip asp教程23 lesson_第3頁
黑鷹基地vip asp教程23 lesson_第4頁
黑鷹基地vip asp教程23 lesson_第5頁
已閱讀5頁,還剩24頁未讀 繼續免費閱讀

下載本文檔

版權說明:本文檔由用戶提供并上傳,收益歸屬內容提供方,若內容存在侵權,請進行舉報或認領

文檔簡介

ActiveX

服務器組件增強了腳本語言的功能,它提供簡潔、可重用和安全的方法來訪問信息。例如,ASP的Database

Access

(數據庫訪問)組件,使得腳本可以查詢數據庫。因此,無論何時要從腳本查詢數據庫,您都可以使用Database

Access

組件,而不必編寫復雜的腳本。一、內置組件ASP的組件概述Ad

Rotator創建一個AdRotator對象,該對象可按指定計劃在同一頁上自動輪換顯示廣告。Browser

Capabilities創建一個BrowserType對象,該對象決定訪問Web站點的每個瀏覽器的性能、類型及版本。Database

Access提供用ActiveX

Data

Objects

(ADO)

對數據庫的訪問。Content

Linking創建一個NextLink

對象,該對象可生成Web

頁內容列表,并象書一樣將各頁順續連接。File

Access

組件提供文件的輸入輸出訪問。MyInfo創建一個MyInfo對象,該對象追蹤個人信息,例如站點管理員的姓名、地址及顯示選擇。Counters創建一個Counters對象,該對象可以創建、保存、增加或檢索任意數量的獨立計數器。Content

Rotator自動翻轉Web

主頁上的HTML

內容字符串。Page

Counter記錄并顯示Web

頁被打開的次數。Status創建一個Status對象,該對象的某些屬性包含服務器狀態信息。當前的這種服務器狀態僅適用于

Personal

Web

Server

for

Macintosh。二、創建內置組件對象使用Server.CreateObject(注冊名)使用HTML語言中的<OBJECT>標簽廣告翻轉器組件一、廣告顯示Ad

Rotator

組件創建一個Ad

Rotator

對象,該對象在

Web頁上自動輪換顯示廣告圖像。當用戶每次打開或重新加載Web

頁時,Ad

Rotator

組件將根據在ADRotator計劃文件中指定的信息顯示一個新廣告。語法Set

AdRotator

=

Server.CreateObject("MSWC.AdRotator")參數AdRotator指定AdRotator

對象的名稱,此對象通過調用Server.CreateObject

創建。屬性Border指定廣告邊框的大小。Clickable指定廣告是否為超鏈接。TargetFrame指定顯示廣告的框架的名稱。方法GetAdvertisement從數據文件中獲取下一個計劃廣告的詳細說明并將其格式化HTML

格式。示例下面的示例在用戶每次查看Web

頁時顯示不同的廣告。<%

Set

ad

=

Server.CreateObject("MSWC.AdRotator")

%><%=

ad.GetAdvertisement("/ads/adrot.txt")

%>AD

Rotator

計劃文件文件包含Ad

Rotator

組件用于管理和顯示各種廣告圖象的信息。在該文件中,用戶可以指定廣告的細節,例如廣告的空間大小、使用的圖象文件以及每個文件的顯示時間所占百分比。文件由兩部分組成。第一部分設置應用于輪換安排中所有廣告圖象的參數;第二部分指定每個單獨廣告的文件和位置信息以及應當接收的每個廣告的顯示時間所占百分比。這兩部分由全是星號(*)

的一行隔開。例子:Adrot.txtREDIRECTadred.aspWIDTH

230HEIGHT

33BORDER

1*網易2新浪網3gamichlg.gif-Sponsored

by

Flyteworks3例子:在第一部分中有四個全局參數,每個參數都由一個關鍵字和值組成。所有的參數都是可選的。如果用戶未指定全局參數的值,則Ad

Rotator

將使用默認的值。在這種情況下,文件的第一行必須只有一個星號(*)。主文件:<%

Set

ad

=

Server.CreateObject("MSWC.AdRotator")

%><%=

ad.GetAdvertisement("/ads/adrot.txt")

%>二、用

Page Counter

組件統計訪問者PageCounter

組件創建PageCounter

對象,以記錄和顯示

Web

頁被打開的次數。每隔一定的時間,此對象將訪問次數寫入文本文件以便數據不會在服務器關機時丟失。語法<%

Set

oVar

=Server.CreateObject("MSWC.PageCounter")

%>參數oVar

指定通過調用Server.CreateObject

創建的PageCounter

對象的名稱。方法HitsPageHitReset顯示指定的URL被打開的次數。增加訪問次數。將指定的頁的訪問次數設置為0。例子:<HTML><HEAD><TITLE>頁面計數器示例</TITLE></HEAD><BODY><%Set

WHits=Server.CreateObject("MSWC.PageCounter")WHits.PageHit()%>此頁面被訪問了<%=WHits.hits%>次</Body></HTML>三、瀏覽器能力:實例:<HTML><HEAD><TITLE>瀏覽器能力檢測示例</TITLE></HEAD><BODY><%Set

MyBrow=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>文件存取組件一、File Access組件簡介File

Access

組件展示可用來訪問計算機

文件系統的方法和屬性。用戶可以使用

File

Access

組件創建FileSystemObject

對象,該對象提供用于訪問文件系統的方法、屬性和集合。File Access組件的對象二、文件的讀、寫創建并寫入文件首先,需要創建一個FileSystemObject對象,然后,利用CreateTextFile()以該對象創建一個

TextStream對象,最后利用TextStream對象的

WriteLine方法來寫入文件。從文本文件讀取數據首先,創建一個FileSystemObject對象,然后,利用OpenTextFile()以該對象創建一個

TextStream對象,最后利用TextStream對象的

ReadLine方法來讀取文件。CreateTextFile(文件名,[overwrite[,unicode]])參數:overwrite:對文件是否覆蓋

Unicode:指示該文件是否用ASC還是UNICODE碼實例(寫入文件):<%Setfobject=server.createobject(“scripting.filesystemObject”)Settfile=fobject.CreateTextFile(“c:\test\test.txt”)Tfile.writeLine(“ok寫入文件”)%>Writeline:在文件中添加字符串和分行符

Write:將一個字段寫入文本

writeBlankLine(lines):用戶在文件中指定分行符數目OpenTextFile(文件名,[IOmode],[Create],[format])IOmode:取值為ForReading;ForAppendingmode:

1為只讀打開;8為追加Create:如果文件不存在問是否創建,如果要創建則設為trueFormat

:-2:系統默認

;-1unicode; 0

:ASCII實例(讀取文件):<%Set

fobject=server.createobject(“scripting.filesystemObject”)Set

tfile=fobject.OpenTextFile(“c:\test\test.txt”)While

not

Tfile.AtEndOfStreamResponse.Write(Tfile.Readline)WendTfile.close%>參數(讀取文件):AtEndofLine:當光標在當前行的末尾時為真

AtEndOfStream:在流的末尾時,為真Column:(只讀的整數):統計從行首到當前光標的位置的字符數

LINE:只讀的整數:指明光標所在行在整個文件中的行號.方法:Read(字符數):指定從光標的當前位置開始從文本文件中讀取一定數量的字符ReadLine:讀取一行字符

ReadAll:讀取全部字符Skip(字符數):略過一定的字符

Close:關閉打開的文件OpenTextFile(文件名,[IOmode],[Create],[format])IOmode:取值為ForReading;ForAppendingmode:

1為只讀打開;8為追加Create:如果文件不存在問是否創建,如果要創建則設為trueFormat

:-2:系統默認

;-1unicode; 0

:ASCII文件的處理:FileSystemObject方法:CopyFile

source,destinationMoveFile

source,destinationDeleteFile

FileSpecifierFile對象Copy

newcopy,[overwrite]Move

newcopydelete:實例(文件的處理)1:<%Setfobject=server.createobject(“scripting.filesystemObject”)Set

tfile=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”%>實例(文件的處理)2:<%Setfobject=server.createobject(“scripting.filesystemObject”)Set

tfile=fobject.CreateTextFile(“c:\test\test.txt”)Tfile.writeLine(“ok寫入文件”)Tfile.closeSet

afile=tfile.GetFile(“c:\test\test.txt”)Afile.copy

“c:\test2.txt”Afile.move”c:\test3.txt”Afile.delete%>檢測文件的存在性:語法:FileExists(文件的物理地址)例子:<%Myself=request.ServerVariables(“PATH_TRANSLATED”)Set

fobject=server.createobject(“scripting.filesystemObject”)Tfile.writeLine(“ok寫入文件”)If(fobject.FileExists(myself)

thenResponse.write(“file

exist”)%>驅動器和文件夾操作例子:<%Set

fobject=server.createobject(“scripting.filesystemObject”)For

each

thing

in

fobject.drives%><br>Drive

letter:<%

=thing.Driveletter%><br>Drive

Total

Size:<%=thing.TotalSize%><br>

Drive

Available

Space:<%=thing.AvailableSpace%><hr><%

next%>文件操作綜合事例:<%@

Language=VBScript

%><%'

注意絕對路徑:

C:\Inetpub\home\asp\wuf23.asp

主頁路徑:C:\Inetpub\home'使用CreateObject

方法創建FileSystemObject

對象FSOSet

FSO

=Server.CreateObject("Scripting.FileSystemObject")Path=Server.MapPath("test") '返回test的物理目錄(絕對路徑)'就本例而言,下面這句與上面這句返回的Path完全一樣'Path

=Server.MapPath("\asp\test\")Response.Write

Path

&

"<Br>"'判斷該文件夾是否存在

'新建文件夾If

FSO.FolderExists(Path)

=falsethenFSO.CreateFolder(Path)End

If文件操作綜合事例:File=Path

&

"\asptest.txt"'寫文件操作If

FSO.FileExists(File)

=

TrueThen'建立TextStrea

溫馨提示

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

評論

0/150

提交評論