当前位置: 首页 > 图文教程 > 网络编程 > ASP > ASP编程经典例子

ASP
asp实现取得数组中的最大值的代码
asp 将日期格式化为需要的格式
asp 下产生任意位数随机密码的代码
asp下返回以千分位显示数字格式化的数值
asp重定向页面的方法总结
asp下去除数组中重复的项的方法
asp下实现 重新排序数字数组的代码
asp 验证输入网址是否有效并可以访问 与正则验证输入网址
asp验证Ip格式的函数
asp实现生成由数字,大写字母,小写字母指定位数的随机数
asp 格式化sql中的like字符串
asp 实现显示所有的服务器变量值的函数
asp 取得用户真实IP,对代理地址仍然有效的函数
asp 通用数据库连接过程函数
asp 字符串截取函数
asp下实现格式化文件大小以MB显示的函数
asp 下用正则表达式检测邮箱格式的函数
asp 实现检测字符串是否为纯字母和数字组合的函数
asp代码实现检测组件是否安装的函数
asp通过JMAIL实现通用发送函数

ASP编程经典例子


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

1.如何用Asp判断你的网站的虚拟物理路径 
答:使用Mappath方法 
< p align="center" >< font size="4" face="Arial" >< b > 
The Physical 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/20091103094351_3def184ad8f4755ff269862ea77393dd.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