|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
asp可以轻松地实现对页面内容的动态控制,根据不同的浏览者,显示不同的页面内容。而浏览者一点觉察不出来,就像为他专门制作的页面一样。使用各种各样的组件,asp可以完成无比强大的功能。 本文的内容是利用ASP的ActiveXServerComponents(组件)。
1、BrowserCapabilitiesComponent(扫瞄器才能组件):
我们晓得,分歧的扫瞄器大概撑持分歧的功效,若有些扫瞄器撑持框架,有些不撑持。使用这个组件,能够反省扫瞄器的才能,使你的网页争对分歧的扫瞄器显现分歧的页面(如对不撑持Frame的扫瞄器显现不含Frame的网页)。该组件的利用很复杂,需注重的是,要准确利用该组件,必需包管Browscap.ini文件是最新的(实在每个扫瞄器及其特征都列在这个文件中,本人翻开看看就分明了),不然了局大概相往甚远,如Win98第二版所带的IE5.0,鄙人例中显现为Netscape。这个文件一样平常位于Web服务器的“WinntSystem32InetSrv”下,最新的版本可往http://www.asptracker.com/或http://www.cyscape.com/browscap下载。
例:wuf22.asp
<html>
<BODY>
‘注重:组件的利用与工具相似,可是组件在利用前必需先创立,而利用内置工具前不用创立。
<%SetBrowsCap=Server.CreateObject("MSWC.BrowserType")%>
请稍候......
<P>
<TABLEBORDER=1CELLPADDING=10>
<TR><TD>扫瞄器范例</TD><TD><%=BrowsCap.Browser%></TD></TR>
<TR><TD>扫瞄器版本</TD><TD><%=BrowsCap.version%></TD></TR>
<TR><TD>是不是撑持表格</TD><TD><%=BrowsCap.tables%></TD></TR>
<TR><TD>是不是撑持ActiveX控件</TD><TD><%=BrowsCap.activexcontrols%></TD></TR>
<TR><TD>是不是撑持JavaApplets</TD><TD><%=BrowsCap.javaapplets%></TD></TR>
<TR><TD>是不是撑持JavaScript</TD><TD><%=BrowsCap.javascript%></TD></TR>
<TR><TD>是不是撑持Cookies</TD><TD><%=BrowsCap.Cookies%></TD></TR>
<TR><TD>是不是撑持Frames</TD><TD><%=BrowsCap.Frames%></TD></TR>
<TR><TD>操纵体系</TD><TD><%=BrowsCap.Platform%></TD></TR>
<TR><TD>是不是撑持VBScript</TD><TD><%=BrowsCap.vbscript%></TD></TR>
</TABLE>
<%SetBrowsCap=Nothing%>
</BODY>
</HTML>
注重:在本例中我们也打仗了Server工具的CreateObject办法,Server.CreateObject用于创立已注册到服务器上的ActiveX组件(申明:另有其他办法能够创立组件)。不外别忘了用“Set工具=Nothing”来实时开释资本,这应当成为一个习气。
2、FileAccess组件
FileAccess组件由FileSystemObject工具和TextStream工具构成,利用FileSystemObject工具,能够创建、检索、删除目次及文件,而TextStream工具则供应读写文件的功效。
实例wuf23.asp。夸大:只要经由过程理论才干加深了解,理论和对照程序运转了局是疾速把握编程技能的最好办法。
<%@Language=VBScript%>
<%OptionExplicit
注重相对路径:C:Inetpubhomeaspwuf23.asp主页路径:C:Inetpubhome
DimPath,File,FSO,CTF,Str,StrHTML,StrNoHTML
利用CreateObject办法创立FileSystemObject工具FSO
SetFSO=Server.CreateObject("Scripting.FileSystemObject")
Path=Server.MapPath("test")前往test的物理目次(相对路径)
就本例而言,上面这句与下面这句前往的Path完整一样
Path=Server.MapPath("aspest")
Response.WritePath&"<Br>"
IfFSO.FolderExists(Path)=falsethen判别该文件夹是不是存在
FSO.CreateFolder(Path)新建文件夹
EndIf
File=Path&"asptest.txt"
写文件操纵
IfFSO.FileExists(File)=TrueThen判别该文件是不是存在
创建TextStream工具CTF
SetCTF=FSO.OpenTextFile(File,8,False,0)翻开文件,详见申明
Else
SetCTF=FSO.CreateTextFile(File,False,False)新建文件
EndIf
CTF.Write"<P>第一个字符串;"写字符串
CTF.WriteLine"第二个字符串;"写字符串,并加上一个换行符
CTF.Write"第三个字符串;"
CTF.Close注重要封闭文件
读文件操纵
SetCTF=FSO.OpenTextFile(File,1,,0)
DoWhileCTF.AtEndOfStreamTrue辨别是不是文件开头(轮回语句)
Str=CTF.ReadLine(每次)读取一行
StrNoHTML=StrNoHTML&Str&"<BR>"&VbCrLf
StrHTML=StrHTML&Server.HTMLEncode(Str)&"<BR>"&VbCrLf
Loop
Response.WriteStrNoHTML
Response.WriteStrHTML
CTF.Close
SetCTF=Nothing开释工具
SetFSO=Nothing
%>
CTF=FSO.OpenTextFile(File,8,False,0),括号内第一个参数为文件名;第二个参数为8,暗示在原文件后追加内容,若为1暗示只读,为2则会重写原文件;第三个参数false暗示,若指定文件不存在,也不新建文件,若为True,暗示指定文件不存在,则新建该文件;第四个参数0暗示以ASCII文件格局翻开,若为-2,则暗示以本来的格局翻开。
CTF=FSO.CreateTextFile(File,False,False),第二个参数false暗示不掩盖已有文件,若为True,则暗示掩盖(OverWrite)已有文件;第三个参数为False暗示文件格局为ASCII,为True暗示文件格局为Unicode。
Server工具的MapPath办法将指定的假造路径转换为实在的文件路径。MapPath将“/”和“”字符视为不异。
Server工具的HTMLEncode办法同意你对特定的字符串举行HTML编码,大概说使扫瞄器中能够准确显现特定的字符。上例中,若未编码,则“<P>”显现不出来,而是被扫瞄器作为HTML标志,你能够对照一下运转了局。
实践上,FileAccess组件对文件、文件夹和驱动器的操纵仍是对照壮大的,也供应了较多的办法,假如必要用到这方面的常识,别忘了利用它。
别的,到如今为止,写一个网页计数器已是小菜一碟了吧,难怪那末多的网页供应收费计数器。怎样?本人写一个图形计数器碰运气,想怎样做弊就怎样做弊,完整本人说了算,爽呆!(小奥密:我的主页上有实例wuf24.asp)
3、ADRotator(告白翻转组件)
如今上彀,生怕最厌恶的是他人主页上的告白条,最喜好的是本人主页上的告白条,告白条好像渣滓邮件一样,屈指可数,防不堪防。你也能够本人下手打造如许的渣滓,ASP的ADRotator组件便可使每次翻开大概从头加载网页时,随机的显现告白。这个例子包含三部分:
例程w</p>ASP是依赖组件的,能访问数据库的组件好多就有好多种,再有就是你微软的工具可是什么都要收钱的啊! |
|