当前位置: 首页 > 图文教程 > 网络编程 > ASP > ASP 编程中 15 个非常有用的例子

ASP
Web程序中网页间数据传递方法小结
加速ASP程序的显示速度
一个求最大值与最小值的函数
对Session和Cookie的区分与理解
ASP VBScript 函数速查表
用Asp隐藏文件路径,实现防盗链
如何使用ASP生成HTML文件
常用Email组件发送函数
用asp实现QQ在线查询
创建一个ASP通用分页类(一)
创建一个ASP通用分页类(二)
如何使用ASP制作类似安装向导的页面?
远程注册自己的组件
浅谈ASP中Request对象获取客户端数据的顺序
一个拷贝整个文件夹(包括子文件夹)的方法
十天学会ASP之第一天
十天学会ASP之第二天
十天学会ASP之第三天
十天学会ASP之第四天
十天学会ASP之第五天

ASP 编程中 15 个非常有用的例子


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-11-03   浏览: 193 ::
收藏到网摘: n/a

  1.如何用Asp判断你的网站的虚拟物理路径  
答:使用Mappath方法  
< p align="center" >< font size="4" face="Arial" >< b >  
The Physic
al path to this virtual website is:  
< /b >< /font >  
< font color="#FF0000" size="6" face="Arial" >  
< %= Server.MapPath("\")% >  
< /font >< /p >  

2.我如何知道使用者所用的浏览器?  
答:使用the Request object方法  
strBrowser=Request.ServerVariables("HTTP_USER_AGENT")  
If Instr(strBrowser,"MSIE") <  > 0 Then  
  Response.redirect("ForMSIEOnly.htm")  
Else  
  Response.redirect("ForAll.htm")  
End If  

3.如何计算每天的平均反复访问人数  
答:解决方法  
< % startdate=DateDiff("d",Now,"01/01/1990")  
if strdate< 0 then startdate=startdate*-1  
avgvpd=Int((usercnt)/startdate) % >  
显示结果  
< % response.write(avgvpd) % >  
that is it.this page have been viewed since November 10,1998  

4.如何显示随机图象  
< % dim p,ppic,dpic  
ppic=12  
randomize  
p=Int((ppic*rnd)+1)  
dpic="graphix/randompics/"&p&".gif"  
% >  
显示  
< img src="< %=dpic% >" >  

5.如何回到先前的页面  
答:< a href="< %=request.serverVariables("Http_REFERER")% >" >preivous page< /a >  
或用图片如:< img src="/upload/tech/20091103/20091103101738_f9028faec74be6ec9b852b0a542e2f39.gif"" alt="< %=request.serverVariables("HTTP_REFERER")% >" >  

6.如何确定对方的IP地址  
答:< %=Request.serverVariables("REMOTE_ADDR)% >  

7.如何链结到一副图片上  
答:< % @Languages=vbscript % >  
< % response.expires=0  
strimagename="graphix/errors/erroriamge.gif"  
response.redirect(strimagename)  
% >  

8.强迫输入密码对话框  
答:把这句话放载页面的开头  
< % response.status="401 not Authorized"  
response.end  
% >  
9.如何传递变量从一页到另一页   
答:用 HIDDEN 类型来传递变量  
< % form method="post" action="mynextpage.asp" >  
< % for each item in request.form % >  
< input namee="< %=item% >" type="HIDDEN"  
value="< %=server.HTMLEncode(Request.form(item)) % >" >  
< % next % >  
< /form >  

10.为何我在 asp 程序内使用 msgbox,程序出错说没有权限   
答:由于 asp 是服务器运行的,如果可以在服务器显示一个对话框,那么你只好等有人按了确定之后,你的程序才能继续执行,而一般服务器不会有人守着,所以微软不得不禁止这个函数,并胡乱告诉你 (:) 呵呵) 没有权限。但是ASP和客户端脚本结合倒可以显示一个对话框,as follows:   
< % yourVar="测试对话框"% >  
< % script language=''javascript'' >  
alert("< %=yourvar% >")  
< /script >  

11.有没有办法保护自己的源代码,不给人看到  
答:可以去下载一个微软的Windows Script Encoder,它可以对asp的脚本和客户端javascript/vbscript脚本进行加密。。。不过客户端加密后,只有ie5才能执行,服务器端脚本加密后,只有服务器上安装有script engine 5(装一个ie5就有了)才能执行。  

12.怎样才能将 query string 从一个 asp 文件