ASP网页程序设计中10个非常有用的实例代码

ASP网页程序设计中10个非常有用的实例代码

ASP可以与Web数据库以及其它程序进行交互，是一种简单、方便的编程工具。下面由我带来ASP网页程序设计中10个非常有用的实例代码。

1.如何用Asp判断你的网站的.虚拟物理路径

答：使用Mappath方法：<%= Server.MapPath("\")% >

2.我如何知道使用者所用的浏览器

答：使用the Request object方法：

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="arrowback.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 类型来传递变量

<% for each item in request.form % >

<input namee="<%=item% >" type="HIDDEN"

value="<%=server.HTMLEncode(Request.form(item)) % >" >

<% next % >

</form >

10.怎样才能使得htm文件如同asp文件一样可以执行脚本代码

答：Internet Sevices Manager - >选择default web site - >右鼠键- >菜单属性-〉主目录- >应用程序设置(Application Setting)- >点击按钮 "配置"- >app mapping - >点击按钮"Add" - >executable browse选择 \WINNT\SYSTEM32\INETSRV\ASP.DLL EXTENSION 输入 htm method exclusions 输入PUT.DELETE 全部确定即可。但是值得注意的是这样对htm也要由asp.dll处理，效率将降低。

'************************************************

'** 取得当前用户的IP地址

'************************************************

Private Function GetUserIP()

Dim strIP

'// 取得当前用户的返问IP

strIP = Request.ServerVariables("HTTP_X_FORWARDED_FOR")

If Len(strIP) = "" Or IsEmpty(strIP) Then

strIP = Request.ServerVariables("REMOTE_ADDR")

End If

'// 返回IP

GetUserIP = strIP

End Function

Response.write GetUserIP()

上面的是现实访问者IP，做判断的话，直接用like来匹配IP段，然后输出欢迎信息或者中断程序，中断程序的代码是response.End()

===================================================================

Cookies在ASP中的最常用的方法

1.如何写入Cookies？

Response.Cookies("字段名")=变量或字符串，例如：

Response.Cookies("name2")="Dingdang"

2.如何设置Cookies时间？

Response.Cookies("字段名").expires=时间函数+N，例如：

Response.Cookies("name2").expires=date+1，表示Cookies保存1天，再比如：

Response.Cookies("name2").expires=Hour+8，表示Cookies保存8小时。

Response.Cookies("name2").expires=dateadd("h",24,now())

3.在以往的ASP教程中，很少有介绍Cookies退出的方法。在“退出”这个ASP页中可以这样写：

Response.Cookies("字段名")=""

之后，在客户端的浏览器就清除了Cookies，并且Cookies文件会消失。注意有多少个字段，就要写多少句来清除。

4.如何读取Cookies？

变量名=Request.Cookies("字段名")，例如：

name2=Request.Cookies("name2")

如果网页中写入<%=name2%>这句，则会显示“Dingdang”。

也可以这样直接读取Cookies，<%=Request.Cookies("name2")%>

Cookies是属于Session对象的一种。但有不同，Cookies不会占服务器资源；而“Session”则会占用服务器资源。所以，尽量不要使用Session，而使用Cookies。

一、首先让我们了解一下Cookies的相关知识

Cookies中保存的信息片断以“名/值”对(name-value pairs)的形式储存，一个“名/值”对仅仅是一条命名的数据。一个网站只能取得它放在用户的电脑中的信息，它无法从其它的Cookies文件中取得信息，也无法得到用户的电脑上的其它任何东西。 Cookies中的内容大多数经过了加密处理，因此一般用户看来只是一些毫无意义的字母数字组合，只有相应网站的网页程序（客户端或服务器端程序）才知道它们真正的含义。

存储在用户电脑硬盘中的Cookies文件可以被Web浏览器读取，它的命名格式为：用户名@网站地址[数字].txt。

二、Cookies集合具有以下几种属性：

1.Expires属性：此属性用来给Cookies设置一个期限，在期限内只要打开网页就可以调用被保存的Cookies，如果过了此期限Cookies就自动被删除。如果一个Cookies没有设定有效期，则其生命周期从打开浏览器开始，到关闭浏览器结束，每次运行后生命周期将结束，下次运行将重新开始。

2.Domain属性：这个属性定义了Cookies传送数据的唯一性，指定了数据传送的域，而不是其他域。

3.Path属性：定义了Cookies只发给指定的路径请求，如果Path属性没有被设置，则使用缺省路径。

4.Secure属性：指定Cookies是否使用加密方式（SSL）传送。

5.Haskeys属性：如果所请求的Cookies是一个具有多个键值的Cookies字典，则返回True，它是一个只读属性。

三、Cookies的基本 *** 作

对于Cookies的 *** 作归根结底就是两种：写入和读取

在asp中使用Response来写入，用Request来读取。例如：

1.写入Cookies

Response.Cookies("CookiesName")=value

2.读取cookies

Request.Cookies("CookiesName")

四、Cookies的扩展应用

1.读写Cookies的子关键值（CookieSubName），示例如下：

Response.Cookies("VisitorName")("FirstName")="Martin"

Response.Cookies("VisitorName")("LastName")="Brawn"

firstName=Request.Cookies("VisitorName")("FirstName")

lastName=Request.Cookies(VisitorName")("LastName")

2.定义Cookies的域属性（Domain）：域属性表明cookie由哪个网站产生或者读取，默认情况下，cookie的域属性设置为产生它的网站，但也可以根据需要改变它。如：Response.Cookies("CookieName").Domain = "www.yourdomain.com"

3.定义Cookies的路径属性（Path）：路径属性可以实现更多的安全要求，通过设置网站上精确的路径，就能限制cookie的使用范围。例如：

Response.Cookies("CookieName").Path = "/maindir/subdir/path"

4.设置Cookies的到期时间

若不指定到期时间，当浏览器关闭时，cookie自动被删除。若指定了到期时间，则正常情况下Cookies将保存到到期时间之后被删除（非电脑故障或用户手动删除的）。若设置的到期时间小于当前时间，则与未设置到期时间同样的处理。

例如： Response.Cookies("UserName").Expires=#October 01, 2005#即：2005年10月1日过期

Response.Cookies("UserName")=Now()+1即：明天此时过期（保存一天）

5.Cookies的Secure属性：Secure属性的值只有True或False两种。如果Cookies数据指定成Secure=True，那么该数据会以SSL（Secure Sockets Layer）的方式提交：Response.Cookies(“UserName”).Secure=True

五、判断用户的浏览器是否开启了Cookies

在用户请求的页面中编写写入Cookies的代码，然后在读取这个Cookies，不为空则说明开启了Cookies，反之则没有开启。没有开启Cookies的浏览器也不支持Session。

因为我不用Cookies，而是用session，所以上面的是从别的地方找来的，希望对你有帮助

---