在网上看到很多这方面的代码，但是有些是不能用，有些是垃圾代码太多，我简单的修改了一下现在与大家共享一下。
<%
Option Explicit
dim databasename '定义数据库名称
databasename="database.mdb" '数据库名称
dim databasepath '定义数据库存放路径
databasepath="D:\office\jd\21\database\" '数据库绝对路径
dim databasever '定义数据库版本 2000 或者 97
databasever = "2000"
2009-01-04Lacoste Polo
Shirts
Function Createdfile(FilePath,FileName,Ver)
Dim Ca,dbver
select case ver
case "97"
dbver = "3.51"
case "2000"
dbver = "4.0"
end select
if dbver <> "" then
Set Ca = Server.CreateObject("ADOX.Catalog")
call Ca.Create("Provider=Microsoft.Jet.OLEDB." & dbver & &q ......
Active Server Pages 提供内建对象，这些对象使用户更容易收集通过浏览器请求发送的信息、响应浏览器以及存储用户信息（如用户首选项）。本文简要说明每一个对象。
Application 对象
可以使用 Application 对象使给定应用程序的所有用户共享信息。
Request 对象
可以使用 Request 对象访问任何用 HTTP 请求传递的信息，包括从 HTML 表格用 POST 方法或 GET 方法传递的参数、cookie 和用户认证。Request 对象使您能够访问发送给服务器的二进制数据，如上载的文件。
Response 对象
可以使用 Response 对象控制发送给用户的信息。包括直接发送信息给浏览器、重定向浏览器到另一个 URL 或设置 cookie 的值。
Server 对象
Server 对象提供对服务器上的方法和属性进行的访问。最常用的方法是创建 ActiveX 组件的实例 (Server.CreateObject)。其他方法用于将 URL 或 HTML 编码成字符串，将虚拟路径映射到物理路径以及设置脚本的超时期限。
Session 对象
可以使用 Session 对象存储特定的用户会话所需的信息。当用户在应用程序的页之间跳转时，存储在 Session 对象中的变量不会清除；而用户在应用程序中访问页时，这些变量始终存在。也可以使用 Session ......
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 ......
功能作用：ASP产生不重复的随机数（模拟游戏洗牌）
<%
function GetRnd(lowerNum,upperNum)
Dim unit,RndNum,Fun_X
unit = upperNum - lowerNum
Redim MyArray(unit)
For Fun_I=0 To unit
myArray(Fun_I)= lowerNum + Fun_I
Next
For Fun_I=0 To round(unit)
RndNum = getRndNumber(Fun_I,unit)
Fun_X = myArray(RndNum)
myArray(RndNum)=myArray(Fun_I)
myArray(Fun_I)=Fun_X
Next
GetRnd = myArray
end function
function getRndNumber(lowerbound,upperbound)
Randomize
getRndNumber=Int((upperbound-lowerbound+1)*Rnd+lowerbound)
end function
%> ......
首先，一般操作系统默认均不安装IIS服务，因此必须先安装IIS服务。安装过程中，需要用到操作系统的安装盘，有些系统还需要特定版本的补丁。比如XP需要SP2。
此处不再介绍网站的属性配置，因为有诸多的文章都会将这方面的内容。
1。VISTA HOME BASIC
不能安装IIS服务
2。WINDOWS XP
需要确保在ASP网站目录的安全设置中，将INTERNET来宾帐户选入。该帐户名为：IUSER_****，****为计算机名称。
3。2003
需要在扩展服务中，将ASP设置为允许。默认情况下，ASP页面是禁止的。
在网站的默认属性中选中“父路径”。
4。2008
参考http://alex2zone.spaces.live.com/blog/cns!2C5817625118574C!1763.entry
并且需要将连接池选择非默认的那一个(具体名字记不住了)。
本文来自CSDN博客，转载请标明出处：http://blog.csdn.net/happyparrot/archive/2008/11/11/3274849.aspx ......
前段时间给客户做了几个网页，客户要求在自己的网站中显示自己在新浪博客里的文章，作为网站的一部分。这样的情况可以解决，主要可以通过博客中的 XML来实现，通过用asp来读取博客中XML，将博客中的标题、发布时间等信息显示在网站中。但是在使用的过程中，出现了一个问题：当博客中添加文章后，在网页中读取博客中的XML后进行更新，但是却没有及时更新，查询了很多信息，发现是网站没有及时更新XML数据而造成的。如何解决？先是尝试清除网站的缓存，设置网站中的HTTP头：Cache-Control和值：no-cache。设置后进行测试，发现效果不好，主要问题是这样的设置只是清除了网站内所包含的图片，文本等缓存，没有更新XML缓存，所以没有解决前面的问题。
无奈只能再查找，所幸在CSDN中看到一篇文章，介绍清除缓存的好办法是改变思路，不是清除内容，而是强行加载要更新的内容。主要思路是在打开的路径中添加随机数，因为在iis中访问不同的路径时，内容是强行加载的，没有调用缓存。有了这个思路，改动程序就比较方便了。具体代码如下：
<%
dim xmlDoc
dim http
dim bitem
dim bi
dim title
dim link
dim pubdate
dim days ......
前段时间给客户做了几个网页，客户要求在自己的网站中显示自己在新浪博客里的文章，作为网站的一部分。这样的情况可以解决，主要可以通过博客中的 XML来实现，通过用asp来读取博客中XML，将博客中的标题、发布时间等信息显示在网站中。但是在使用的过程中，出现了一个问题：当博客中添加文章后，在网页中读取博客中的XML后进行更新，但是却没有及时更新，查询了很多信息，发现是网站没有及时更新XML数据而造成的。如何解决？先是尝试清除网站的缓存，设置网站中的HTTP头：Cache-Control和值：no-cache。设置后进行测试，发现效果不好，主要问题是这样的设置只是清除了网站内所包含的图片，文本等缓存，没有更新XML缓存，所以没有解决前面的问题。
无奈只能再查找，所幸在CSDN中看到一篇文章，介绍清除缓存的好办法是改变思路，不是清除内容，而是强行加载要更新的内容。主要思路是在打开的路径中添加随机数，因为在iis中访问不同的路径时，内容是强行加载的，没有调用缓存。有了这个思路，改动程序就比较方便了。具体代码如下：
<%
dim xmlDoc
dim http
dim bitem
dim bi
dim title
dim link
dim pubdate
dim days ......
最新文章 : asp