原文地址：http://hi.baidu.com/shushenfei/blog/item/01717b38589fd4f1b311c769.html

以下为代码部分:
Dim aData
aData = Array(3,2,4,1,6,0)

Call ResponseArray(aData, "原来顺序")
Call ResponseArray(SelectSort(aData), "选择排序")
Call ResponseArray(QuickSort(aData), "快速排序")
Call Respo

原文地址：http://www.aspzz.com.cn/Webdevelop/Asp/2009-09-08/12524017222286.html
<%
Set re= New RegExp
re.Pattern = "<img[^>]+src=""([^""]+)""[^>]*>"
re.Global = True
re.IgnoreCase = True
re.MultiLine = True

Set conn = CreateObject("ADODB.Connection")
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data So

原文地址：http://www.pcjx.com/Dotnet/ASP/71212.html
大家可能经常会遇到这种情况：
sql="select * from table"
set rs=conn.execute(sql)

以上这两句执行完之后，如果使用response.write rs.recordcount，就会得到结果-1，但这个时候，记录集rs当中其实是有记录的。为了得到正确的记录总数，我们使用getrows.

sql="select * from table"
set rs=conn.execute (sql)
arrA=rs.getrows '将记录集放在一个二维数

原文地址：http://info.codepub.com/2008/09/info-21768.html

ASP程序在同一个站点中,如果出现UTF-8编码的程序,又有GB2312的程序,在浏览完UTF-8编码的页面后,再浏览GB2312的页面,GB2312编码的页面就会出现乱码.

出现这样的问题,可能是:当你浏览UTF-8编码的时候,服务器默认用UTF-8的引擎来输出html,当你用再浏览GB2312的页面时,它还是用UTF-8来输出本应是GB2312编码的页面.所以会乱码.

如果要将他们转为同一种编码可能会很痛苦.

原文地址：http://www.q.cc/2009/01/07/13988.html
ContentType 属性指定服务器响应的 HTTP 内容类型。如果未指定 ContentType，默认为 text/html。

　　在ASP中使用它：

<% Response.ContentType = "text/HTML" %>


　　此类同Scripting.Dictionary对象的使用没有任何的区别,所以以前是根据Scripting.Dictionary来写的程序,不用怎样的修改就可以使用到此类上.此类并且还比Scri

Asp文件：Code.Asp
数据文件：body.Fix , Head.Fix
用法：<img src="code.asp">

程序代码:
Response.buffer = true
NumCode
Function NumCode()
Response.Expires = -1
Response.AddHeader "Pragma","no-cache"
Response.AddHeader "cache-ctrol","no-cache"
dim zNum,i,j
dim Ados,Ados1
Randomize timer

原文地址：http://info.codepub.com/2008/08/info-21110.html
<%
'###########################################################
'File: cls_Admin.asp
'Description: Admin类
'Author:      gaoshou
'Copyright: http://
'LastUpdate: 2007-10-20
'####################################################