仓酷云

标题: ASP网页设计ASP 3.0初级编程(二十七) [打印本页]

作者: 莫相离    时间: 2015-1-16 23:47
标题: ASP网页设计ASP 3.0初级编程(二十七)
强大的可扩展性。ASP具有强大的扩展性,可以实现与多种网络、硬件设备的连接:通过专用的通讯线路远程接入企业;通过远程拨号服务器为远程拨号客户提供服务;通过WAP为移动电话互联网客户服务。编程|初级6.2.10Tools组件
Tools组件供应了一些有效的办法,可在页面中反省文件是不是存在、处置一个HTML窗体、和发生一个随机整数,另有用于Macintosh盘算机的一些办法,还能够反省是不是存在某个服务器插件和反省用户是不是是网站的具有者。
1.Tools组件的成页
Tools组件供应了五个办法,个中两个依附于操纵体系,如表6-8所示:
表6-8Tools组件的办法及申明
方法
说明

FileExists(relative_url)
假如relative_url指定的文件存在,前往值为True,不然为False。必需给出假造绝对路径及文件名,而且文件必需存在于公布的Web网站目次中。

Random()
发生一个位于-32768~32767之间的随机整数。利用ABS函数(VBScript)或Math.abs(JScript)失掉在0~32768之间的正整数。利用Mod运算符(VBScript)或%运算符(JScript)失掉指定局限内的一个数值。比方:
intRand=(objTools.RandomMod76)+25
失掉一个在25~100之间的整数。

ProcessForm(output_url,
template_url,[insertion_point])
经由过程template_url指定的文件处置一个HTML窗体,而且拔出来自窗体中已提交给以后页面的数值。了局写进output_url指定的文件,假如指定了可选项insertion_point(字符串)参数的话,组件可在已存在的输入文件中找到这个字符串,并在该地位拔出新的内容。假如insertion_point参数没有指定,任何已存在的output_url文件则被新的输入代替

Owner
仅合用于Macintosh机,假如以后用户帐户是Web网站的具有者,前往值为True,不然前往值为False

PluginExists(plugin_name)
仅合用于Macintosh机,假如指定的服务器plugin_name安装在呆板上,前往值为True,不然为False

2.利用FileExists办法
在同意用户会见之前,可使用FileExists办法反省某些文件是不是存在于服务器中(注重这个办法和FileSystemObject.FileExists以一样的体例事情)。
上面的例子中,用户供应了网页的绝对URL,假如用户想经由过程在名为txtURL的文本框中键进URL翻开网页,在从头定向之前能够反省其是不是存在。
<%//inJscript:
varobjTools=Server.CreateObject(MSWC.Tools);
varstrURL=Request.Form(txtURL);//collectthepageURLtheyentered
if(objTools.FileExists(strURL))//seeifitexists
Server.Transfer(strURL)//ifitdoes,transfertoit
Else//orifnotdisplayamessage
Response.Write(Sorry,thepageyourequesteddoesnotexist);
%>
这里供应了一个示例页面(利用VBScript)来演示组件的三种办法(非Macintosh),能够从ASPInstallableComponents主菜单中运转,如-16所示:

-16运转Tools组件的办法的页面
网页的第一部分同意输出一个文件的绝对URL,并告知用户该文件是不是存在。示例供应的缺省值是检察网站的根目次中是不是有global.asa文件。点击按钮时,申明该文件是不是可找到的信息将放在页面的顶部,如-17所示:

-17运转FileExists办法的了局
把页面的一切控件放在<FORM>中,提交回本页面,这已成为一种标准。在页面的入手下手,检察点击了哪一个按钮。假如是FileExists的按钮,就挪用组件的FileExists办法并显现符合的信息。
lookforacommandsentfromtheFORMsectionbuttons
IfLen(Request.Form("cmdExists"))Then
strFile=Request.Form("txtFile")
IfobjTools.FileExists(strFile)Then
Response.Write"Thefile<B>"&strFile&"</B>doesexist.<P>"
Else
Response.Write"Thefile"&strFile&"<B>doesnot</B>exist.<P>"
EndIf
EndIf
3.利用Tools.Random办法
在ASP页面中,偶然必要一个随机数来完成某些义务,比方,把用户从头定位到一个随机网页、选择色彩或显现逐日提醒。可使用VBScript中的Rnd函数,但要把所得数值变化成指定局限内的整数。Tools组件的Random办法更容易于利用,由于可以间接供应整数值。
Random办法的了局是一个在-32768~32767局限中的整数值,为了取得一个指定局限的整数,可使用剧本言语中的Abs函数并对下一个最年夜的整数取模。比方为了用VBScript言语创立0~20的正整数,可使用以下语句:
intRandom=Abs(objTools.Random)Mod21
为了失掉在50~100之间的数值,能够用:
intRandom=(Abs(objTools.Random)Mod51)+50
示例网页利用这项手艺天生随机数时,起首必要反省由用户输出的数值,以包管这些数值既是无效正整数又有准确的绝对干系。
IfLen(Request.Form("cmdRandom"))Then
intMin=-1presettoillegalvaluesandthen
intMax=-1onlysetifavalidnumberisentered
strMin=Request.Form("txtMinimum")
strMax=Request.Form("txtMaximum")
IfIsNumeric(strMin)ThenintMin=CStr(strMin)
IfIsNumeric(strMax)ThenintMax=CStr(strMax)
If(intMin>=0)And(intMax>intMin)Then
intRandom=(Abs(objTools.Random)Mod(intMax-intMin+1))+intMin
Response.Write"Yourrandomvalueis:<B>"&intRandom&"</B><P>"
Else
Response.Write"<B>Thenumbersyouenteredarenotvalid.</B><P>"
EndIf
EndIf
当页面从头调进时,了局显现在网页的顶部,如-18所示:

-18运转Random办法的了局
4.利用Tools.ProcessForm办法
Tools组件中最庞大的办法是ProcessForm,用来读</p>由于ASP提供的是一对多的服务,所以用户的一些特殊需求很难得到满足。
作者: 灵魂腐蚀    时间: 2015-1-19 21:12
ASP的语言不仅仅只是命令格式差不多,而是包含在<%%>之内的命令完全就是VB语法。虽然ASP也是做为单独的一个技术来提出的,但他就是完全继承了VB所有的功能。
作者: 山那边是海    时间: 2015-1-24 12:05
Session:这个存储跟客户端会话过程的数据,默认20分钟失效
作者: 透明    时间: 2015-1-30 11:01
他的语法和设计思路和VB完全相同,导致很多ASP的书都留一句“相关内容请参考VB的相关教材....”更糟糕的是,相当多的ASP教程混合了Javascript,VBscript等等脚本语言,搞的初学者。
作者: 飘飘悠悠    时间: 2015-2-1 17:06
Application:这个存储服务端的数据,如果不清除,会直到web应用程序结束才清除(例如重启站点)
作者: 第二个灵魂    时间: 2015-2-7 10:36
交流是必要的,不管是生活还是学习我们都要试着去交流,通过交流我们可以学到很多我们自己本身所没有的知识,可以分享别人的经验甚至经历。
作者: 若天明    时间: 2015-2-21 18:52
ASP.Net和ASP的最大区别在于编程思维的转换,而不仅仅在于功能的增强。ASP使用VBS/JS这样的脚本语言混合html来编程,而那些脚本语言属于弱类型、面向结构的编程语言,而非面向对象,这就明显产生以下几个问题:
作者: 海妖    时间: 2015-3-6 21:00
我想问如何掌握学习节奏(先学什么再学什么)最好详细点?
作者: 因胸联盟    时间: 2015-3-20 17:29
你可以通过继承已有的对象最大限度保护你以前的投资。并且C#和C++、Java一样提供了完善的调试/纠错体系。




欢迎光临 仓酷云 (http://ckuyun.com/) Powered by Discuz! X3.2