%set bc=server.CreateObject("mswc.browsertype")%> 浏览器名称是browser:%=bc.browser%>br> 浏览器版本是version:%=bc.version%> br> 浏览器主版本是majorver:%=bc.majorver%> br> 浏览器辅版本是minorver:%=bc.minorver%> br> 浏览器的运行平台是platform:%=bc.platform%> br> |
%set bc=server.CreateObject("mswc.browsertype")%> %if bc.frames=true then%> 浏览器支持多窗口(frames)显示 %else%> 浏览器不支持多窗口(frames)显示 %end if%> br> %if bc.backgroundsounds=true then%> 浏览器可以播放背景音乐(backgroundsounds) %else%> 浏览器不能播放背景音乐(backgroundsounds) %end if%> br> %if bc.tables=true then%> 浏览器支持表格(tables)显示 %else%> 浏览器不支持表格(tables)显示 %end if%> br> %if bc.beta=true then%> 你的浏览器是一测试版(beta) %else%> 你的浏览器是一正式版 %end if%> br> %if bc.activexcotrols=true then %> 浏览器支持active控制 %else%> 浏览器不支持active控制 %end if%> br> %if bc.cookies=true then%> 浏览器支持cookie功能 %else%> 浏览器不支持cookie功能 %end if%> br> %if bc.vbscript=true then%> 浏览器支持vbscript %else%> 浏览器不支持vbscript %end if%> br> %if bc.jscript=true then%> 浏览器支持jscript %else%> 浏览器不支持jscript %end if%> |
%set bc=server.CreateObject("mswc.browsertype") if bc.frames then %> frameset rows="*,*"> frame src="http://www.google.com"> frame src="http://www.baidu.com"> /framest> %else%> 你的浏览器不支持框架 %end if%> |
redirect.asp?url=http://www.cnbruce.com/ cnbruce.com redirect.asp?url=http://www.blueidea.com/ blueidea.com redirect.asp?url=http://www.it365cn.com/ it365cn.com |
%Set objNextLink = Server.CreateObject("MSWC.Nextlink")%> % intCount = objNextLink.GetListCount("link.txt") For i = 1 To intCount %> a href="%=objNextLink.GetNthURL("link.txt", i) %>"> %=objNextLink.GetNthDescription("link.txt", i) %> /a> br> %Next%> |
% Response.Clear Response.Redirect Request.QueryString("url") %> |
1.asp ASP编程入门进阶(一) 2.asp ASP编程入门进阶(二) 3.asp ASP编程入门进阶(三) 4.asp ASP编程入门进阶(四) |
%Set Nextlink=Server.CreateObject("MSWC.NextLink") Response.write "当前文章索引号为" NextLink.GetListIndex("link1.txt") "br>" Response.write "上一章的标题:" NextLink.GetPreviousDescription("link1.txt") "br>" Response.write "下一章的标题:" NextLink.GetNextDescription("link1.txt") "br>" count = NextLink.GetListCount("link1.txt") Response.write "a href="""NextLink.GetNthUrl("link1.txt",1)""">""第一章""/a> " Response.write "a href="""NextLink.GetPreviousUrl("link1.txt")""">""上一章""/a> " Response.write "a href="""NextLink.GetNextUrl("link1.txt")""">""下一章""/a> " Response.write "a href="""NextLink.GetNthUrl ("link1.txt",count)""">""最后一章""/a>br>" %> |
GetListCount(目标文件名) 显示组件中包含的连接的文件数目。 GetListIndex(目标文件名) 显示当前页在这些连接文件中的前后位置索引值。 GetNextDescription(目标文件名) 显示连接文件中下一个的描述。 GetNextURL(目标文件名) 显示连接文件中的下一个文件的URL地址。 GetNthDescription(目标文件名, N) 显示连接文件中第N个网页的描述。 GetNthURL(目标文件名, N) 显示连接文件中第N个网页的文件URL地址。 GetPreviousDescription(目标文件名) 显示连接文件中前一个文件的描述。 GetPreviousURL(目标文件名) 显示连接文件中前一个文件的URL地址。 |
!--#include file="link1.inc"-->br> 以下是具体内容 |