asp编程

迅速提升网站Alexa排名/网站流量/访问速度
asp与数据库的两中连接类型：
两种连接类型
ASP与 Access数据库 不用DSN连接：
<%@ language=VBscript%>
<% dim conn,mdbfile mdbfile=server.mappath("数据库名称.mdb") set conn=server.createobject("adodb.connection") conn.open "driver={microsoft access driver (*.mdb)};uid=admin;pwd=数据库密码;dbq="&mdbfile or <% Set conn = Server.CreateObject("ADODB.Connection") conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("xxx.mdb") %>
%>
ASP与SQL数据库不用DSN连接：
<%@ language=VBscript%>
<% dim conn set conn=server.createobject("ADODB.connection") con.open "PROVIDER=SQLOLEDB;DATA SOURCE=.;UID=sa;PWD=数据库密码;DATABASE=数据库名称 %>

建立记录集对象：
set rs=server.createobject("adodb.recordset")
rs.open SQL语句,conn,3,2
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
MS Access数据库连接
用DSN连接并且没有用户名和密码：
<% set conn = Server.CreateObject("ADODB.Connection") conn.open "YourDSNName" %>
用DSN连接并且有用户名和密码：
<% set conn = Server.CreateObject("ADODB.Connection") conn.open "YourDSNName","username","password" %>
MS SQL Server数据库连接
用DSN连接：
<% set conn = Server.CreateObject("ADODB.Connection") conn.open "DSN=MyDSN;UID=user;PWD=password;[DATABASE=databasename]" %>
FoxPro数据库连接
<% Set Conn = Server.CreateObject("ADODB.connection") ConnStr= "Driver=Microsoft Visual Foxpro Driver; UID=userID;SourceType=DBC;SourceDB=C:\yanhang\database.dbc" Conn.Open ConnStr %>
oracle数据库连接：
<% set conn=server.createobject("adodb.connection") conn.cursorlocation=adUseClient DSNTemp="Provider=MSDAORA.1;Password=xxxxx;User ID=yanhang;Data Source=xxx.world" conn.open DSNtemp %>

rs介绍：
1. ASP与SQL数据库连接：
　　

　　建立记录集对象：

　　set rs=server.createobject("adodb.recordset")
　　rs.open SQL语句,conn,3,2

　　2. SQL常用命令使用方法：

　　(1) 数据记录筛选：

　　sql="select * from 数据表 where 字段名=字段值 order by 字段名 "
　　sql="select * from 数据表 where 字段名 like ‘%字段值%‘ order by 字段名 "
　　sql="select top 10 * from 数据表 where 字段名 order by 字段名 "
　　sql="select * from 数据表 where 字段名 in (‘值1‘,‘值2‘,‘值3‘)"
　　sql="select * from 数据表 where 字段名 between 值1 and 值2"

　　(2) 更新数据记录：

　　sql="update 数据表 set 字段名=字段值 where 条件表达式"
　　sql="update 数据表 set 字段1=值1,字段2=值2 ...... 字段n=值n where 条件表达式"

　　(3) 删除数据记录：

　　sql="delete from 数据表 where 条件表达式"
　　sql="delete from 数据表" (将数据表所有记录删除)

　　(4) 添加数据记录：

　　sql="insert into 数据表 (字段1,字段2,字段3 ...) valuess (值1,值2,值3 ...)"
　　sql="insert into 目标数据表 select * from 源数据表" (把源数据表的记录添加到目标数据表)

　　(5) 数据记录统计函数：

　　AVG(字段名) 得出一个表格栏平均值
　　COUNT(*|字段名) 对数据行数的统计或对某一栏有值的数据行数统计
　　MAX(字段名) 取得一个表格栏最大的值
　　MIN(字段名) 取得一个表格栏最小的值
　　SUM(字段名) 把数据栏的值相加

　　引用以上函数的方法：

　　sql="select sum(字段名) as 别名 from 数据表 where 条件表达式"
　　set rs=conn.excute(sql)

　　用 rs("别名") 获取统的计值，其它函数运用同上。

　　(5) 数据表的建立和删除：

　　Create TABLE 数据表名称(字段1 类型1(长度),字段2 类型2(长度) ...... )

　　例：Create TABLE tab01(name varchar(50),datetime default now())

　　Drop TABLE 数据表名称 (永久性删除一个数据表)
　　(6) 记录集对象的方法：
　　rs.movenext 将记录指针从当前的位置向下移一行
　　rs.moveprevious 将记录指针从当前的位置向上移一行
　　rs.movefirst 将记录指针移到数据表第一行
　　rs.movelast 将记录指针移到数据表最后一行
　　rs.absoluteposition=N 将记录指针移到数据表第N行
　　rs.absolutepage=N 将记录指针移到第N页的第一行
　　rs.pagesize=N 设置每页为N条记录
　　rs.pagecount 根据 pagesize 的设置返回总页数
　　rs.recordcount 返回记录总数
　　rs.bof 返回记录指针是否超出数据表首端，true表示是，false为否
　　rs.eof 返回记录指针是否超出数据表末端，true表示是，false为否
　　rs.delete 删除当前记录，但记录指针不会向下移动
　　rs.addnew 添加记录到数据表末端
　　rs.update 更新数据表记录

　　判断所填数据是数字型

　　if not isNumeric(request("字段名称")) then
　　response.write "不是数字"
　　else
　　response.write "数字"
　　end if

　　
　　经常使用到有关数据库的操作。包括连接代码、SQL命令等等，又不曾刻意去记忆它们（我本人是不愿意

　　去记这东东），所以常常在用到的时候又去查书本，翻来翻去。一些比较少用的数据库还不一定能顺利找

　　到，所以现在把它们全归纳到这里，提供大家参考。（个人水平有限，有缺陷之处，欢迎大家指正。）

　　<一>。数据库的连接方法：

　　1.Access数据库的DSN-less连接方法:

　　set adocon=Server.Createobject("adodb.connection")
　　adoconn.Open"Driver={Microsoft Access Driver(*.mdb)};DBQ="& _
　　Server.MapPath("数据库所在路径")

　　2.Access OLE DB连接方法：

　　set adocon=Server.Createobject("adodb.connection")
　　adocon.open"Provider=Microsoft.Jet.OLEDB.4.0;"& _
　　"Data Source=" & Server.MapPath("数据库所在路径")

　　3.SQL server连接方法：

　　set adocon=server.createobject("adodb.recordset")
　　adocon.Open"Driver={SQL Server};Server=(Local);UID=***;PWD=***;"& _
　　"database=数据库名;"
　　4.SQL server OLE DB连接方法:

　　set adocon=Server.Createobject("adodb.connection")
　　adocon.open"provider=SQLOLEDB.1;Data Source=RITANT4;"& _
　　"user ID=***;Password=***;"& _
　　"inital Catalog=数据库名"

　　5.Oracle 连接方法:

　　set adocon=Server.Createobject("adodb.connection")
　　adocon.open"Driver={microsoft odbc for oracle};server=oraclesever.world;uid=admin;pwd=pass;"

　　6.Oracle OLE DB 连接方法:

　　set adocon=Server.Createobject("adodb.connection")
　　adocon.open"Provider=OraOLEDB.Oracle;data source=dbname;user id=admin;password=pass;"

　　7.dBase 连接方法:

　　set adocon=Server.Createobject("adodb.connection")
　　adocon.open"Driver={microsoft dbase driver(*.dbf)};driverid=277;dbq=------------;"

　　8.mySQL 连接方法:

　　set adocon=Server.Createobject("adodb.connection")
　　adocon.open"Driver={mysql};database=yourdatabase;uid=username;pwd=yourpassword;option=16386;

　　"

　　9.Visual Foxpro 连接方法:

　　set adocon=Server.Createobject("adodb.connection")
　　adocon.open"Driver={microsoft Visual Foxpro

　　driver};sourcetype=DBC;sourceDB=*.dbc;Exclusive=No;"

　　10.MS text 连接方法:

　　set adocon=Server.Createobject("adodb.connection")
　　adocon.open"Driver={microsoft text driver(*.txt; *.csv)};dbq=-----;"&_
　　"extensions=asc,csv,tab,txt;Persist SecurityInfo=false;"

　　11.MS text OLE DB 连接方法:

　　set adocon=Server.Createobject("adodb.connection")
　　adocon.open"Provider=microsof.jet.oledb.4.0;data source=your_path;"&_
　　"Extended Properties'text;FMT=Delimited'"
　　<二>。常用的四种SQL命令：

　　1.查询数据记录(Select)
　　语法：Select 字段串行 From table Where 字段=内容
　　例子：想从book表中找出作者为"cancer"的所有记录，SQL语句便如下：
　　select * from book where author='cancer'
　　"*"是取出book表所有的字段，如查询的字段值为数字，则其后的"内容"便无须加上单引号，

　　如是日期，则在Access中用(#)包括，而在SQL server中则用(')包括，
　　如:

　　select * from book where id=1
　　select * from book where pub_date=#2002-1-7# (Access)
　　select * from book where pub_date='2002-1-7' (SQL Server)

　　提示：
　　日期函数to_date不是标准sql文，不是所有的数据库适用，所以大家在使用的时候要参考数据库具体语法

　　另外如果是查询传入的变量，则如下：

　　strau=request.form("author")
　　strsql="select * from book where author='"&strau&"'"

　　如果查询的是数字，则：

　　intID=request.form("id")
　　strsql="select * from book where id="&intID

　　在很多数据库中，如：oracle，上面的语句是可以写成：
　　strsql="select * from book where id='"&intID&"'"的。
　　但是字符型一定不能按照数字格式写，需要注意。

　　2.添加记录(Insert)
　　语法：Insert into table(field1,field2,....) Values (value1,value2,....)
　　例子：添加一作者是"cancer"的记录入book表:
　　insert into book (bookno,author,bookname) values ('CF001','cancer','Cancer无组件上传程

　　序')
　　同样，如果用到变量就如下：

　　strno=request.form("bookno")
　　strau=request.form("author")
　　strname=request.form("bookname")
　　strsql="insert into book (bookno,author,bookname) values ('"&strno&"','"&strau&"','

　　"&strname&"')"

　　3.用Recordset对象的Addnew插入数据的方法:
　　语法：

　　rs.addnew
　　rs("field1").value=value1
　　rs("field2").value=value2
　　...
　　rs.update

　　4.修改数据记录(Update)
　　语法：update table set field1=value1,field2=value2,...where fieldx=valuex
　　例子：update book set author='babycrazy' where bookno='CF001'
　　如果用到变量就如下：

　　strno=request.form("bookno")
　　strau=request.form("author")
　　strsql="update book set author='"&strau&"' where bookno='"&strno"'"

　　5.Recordset对象的Update方法:
　　语法：

　　rs("field1").value=value1
　　rs("field2").value=value2
　　...
　　rs.update

　　注意：使用语法3和语法5的时候，一定要注意字段的类型（尤其是日期型）一致，否则出错的几率非常的高。

　　例子：

　　strno=request.form("bookno")
　　strau=request.form("author")
　　set adocon=server.createobject("adodb.connection")
　　adocon.open "Driver={Microsoft Access Driver(*.mdb)};DBQ=" & _
　　Server.Mappath=("/cancer/cancer.mdb")
　　strsql="select * from book where bookno='"&strno&"'"
　　set rs=server.createobject("adodb.recordset")
　　rs.open strsql,adconn,1,3
　　if not rs.eof then '如果有此记录的话
　　rs("author").value=strau
　　rs.update
　　end if
　　rs.close
　　set rs=nothing
　　adocon.close
　　set adocon=nothing

　　6.删除一条记录(Delete)
　　语法：Delete table where field=value
　　例子：删除book表中作者是cancer的记录

　　delete book where author='cancer'

　　(注意：如果book表中author字段的值为cancer的记录有多条，将会删除所有author为cancer的记录)
rs参数：
打开数据记录集方法其实不止一种，但是我们用的最多的就是
rs.open sql,1,1的方法，可是后面的数字参数很多人不解其意，下面我们来介绍一下。
其实open方法后面有多个参数
CursorType LockType CommandType
比如 rs.open sql,1,1
也可以写成
rs.cursorType = 1
rs.LockType = 1
rs.open sql
其中CursorType代表从一个表或者一个SQL查询结果返回的记录。
这个参数有四个值分别是：
adOpenForwardOnly 表示只允许在记录集内的记录间往前移动。这个是缺省值。
adOpenKeyset 反映由其它用户所做的对记录的改变或者删除动作，但并不反映由其它用户做作的添加新记录的动作。
adOpenDynamic 反映由其它用户所做的对记录的改变或者删除动作，包括添加的新记录
adOpenStatic 不反映其它用户对记录所做的修改，添加，删除动作。
这四个值VBSCRIPT预定义位
adOpenForwardOnly = 0
adOpenKeyset = 1
adOpenDynamic = 2
adOpenStatic = 3

lockType 表示当打开记录集时，数据提供者用于锁定数据库的类型：
adLockReadOnly 数据不能改变，这是缺省值！
adLockPessimistic 数据提供者在开始编辑数据的时候锁定记录
adLockOptimistic 仅当调用update方法时，数据提供者锁定记录
adLockBatchOptimistic 用于批处理修改

他们的常量值定义分别是：
adLockReadOnly = 1
adLockPessimistic = 2
adLockOptimistic = 3
adLockBatchOptimistic = 4

CommandType这个参数由于很少用到，这里就不罗嗦了
asp常用函数
Array()
　FUNCTION: 返回一个数组
　SYNTAX: Array(list)
　ARGUMENTS: 字符，数字均可
　EXAMPLE: <% Dim myArray() For i = 1 to 7 　 Redim Preserve myArray(i) 　 myArray(i) = WeekdayName(i) Next %>
　RESULT: 建立了一个包含7个元素的数组myArray
myArray("Sunday","Monday", ... ... "Saturday")
　
CInt()
　FUNCTION: 将一个表达式转化为数字类型
　SYNTAX: CInt(expression)
　ARGUMENTS: 任何有效的字符均可
　EXAMPLE: <% f = "234" response.write cINT(f) + 2 %>
　RESULT: 236
转化字符"234"为数字"234"，如果字符串为空，则返回0值　
　
CreateObject()
　FUNCTION: 建立和返回一个已注册的ACTIVEX组件的实例。
　SYNTAX: CreateObject(objName)
　ARGUMENTS: objName 是任何一个有效、已注册的ACTIVEX组件的名字.
　EXAMPLE: <% Set con = Server.CreateObject("ADODB.Connection") %>
　RESULT:　
　
CStr()
　FUNCTION: 转化一个表达式为字符串.
　SYNTAX: CStr(expression)
　ARGUMENTS: expression 是任何有效的表达式。
　EXAMPLE: <% s = 3 + 2 response.write "The result is: " & cStr(s) %>
　RESULT: 转化数字“5”为字符“5”。
　
Date()
　FUNCTION: 返回当前系统日期.
　SYNTAX: Date()
　ARGUMENTS: None.
　EXAMPLE: <%=Date%>
　RESULT: 8/4/99
　
DateAdd()
　FUNCTION: 返回一个被改变了的日期。
　SYNTAX: DateAdd(timeinterval,number,date)
　ARGUMENTS: timeinterval is the time interval to add; number is amount of
time intervals to add; and date is the starting date.
　EXAMPLE: <% currentDate = #8/4/99# newDate = DateAdd("m",3,currentDate) response.write newDate %>

<% currentDate = #12:34:45 PM# newDate = DateAdd("h",3,currentDate) response.write newDate %>
　RESULT: 11/4/99
3:34:45 PM

"m" = "month";
"d" = "day";

If currentDate is in time format then,
"h" = "hour";
"s" = "second";
　
DateDiff()
　FUNCTION: 返回两个日期之间的差值 。
　SYNTAX: DateDiff(timeinterval,date1,date2 [, firstdayofweek ][,
firstweekofyear]])
　ARGUMENTS: timeinterval 表示相隔时间的类型，如“M“表示“月”。
　EXAMPLE: <% fromDate = #8/4/99# toDate = #1/1/2000# response.write "There are " & _ 　 DateDiff("d",fromDate,toDate) & _ 　 " days to millenium from 8/4/99." %>
　RESULT: 从8/4/99 到2000年还有 150 天.
　
Day()
　FUNCTION: 返回一个月的第几日　.
　SYNTAX: Day(date)
　ARGUMENTS: date 是任何有效的日期。　
　EXAMPLE: <%=Day(#8/4/99#)%>
　RESULT: 4
　
FormatCurrency()
　FUNCTION: 返回表达式，此表达式已被格式化为货币值　
　SYNTAX: FormatCurrency(Expression [, Digit ][, LeadingDigit ][, Paren ][,
GroupDigit]]]])
　ARGUMENTS:　Digit 指示小数点右侧显示位数的数值。默认值为 -1，指示使用的是
计算机的区域设置; LeadingDigit 三态常数，指示是否显示小数值小数点前面的
零。　
　EXAMPLE: <%=FormatCurrency(34.3456)%>
　RESULT: $34.35
　
FormatDateTime()
　FUNCTION: 返回表达式，此表达式已被格式化为日期或时间
　SYNTAX: FormatDateTime(Date, [, NamedFormat])
　ARGUMENTS: NamedFormat 指示所使用的日期/时间格式的数值，如果省略，则使用
vbGeneralDate.
　EXAMPLE: <%=FormatDateTime("08/4/99", vbLongDate)%>
　RESULT: Wednesday, August 04, 1999
　
FormatNumber()
　FUNCTION: 返回表达式，此表达式已被格式化为数值.
　SYNTAX: FormatNumber(Expression [, Digit ][, LeadingDigit ][, Paren ][,
GroupDigit]]]])
　ARGUMENTS:　Digit 指示小数点右侧显示位数的数值。默认值为 -1，指示使用的是
计算机的区域设置。; LeadingDigit i指示小数点右侧显示位数的数值。默认值为 -
1，指示使用的是计算机的区域设置。; Paren 指示小数点右侧显示位数的数值。默认
值为 -1，指示使用的是计算机的区域设置。; GroupDigit i指示小数点右侧显示位数
的数值。默认值为 -1，指示使用的是计算机的区域设置。.
　EXAMPLE: <%=FormatNumber(45.324567, 3)%>
　RESULT: 45.325
　
FormatPercent()
　FUNCTION: 返回表达式，此表达式已被格式化为尾随有 % 符号的百分比（乘以
100 ）。 (%)
　SYNTAX: FormatPercent(Expression [, Digit ][, LeadingDigit ][, Paren ][,
GroupDigit]]]])
　ARGUMENTS: 同上.
　EXAMPLE: <%=FormatPercent(0.45267, 3)%>
　RESULT: 45.267%
　
Hour()
　FUNCTION: 以24时返回小时数.
　SYNTAX: Hour(time)
　ARGUMENTS:　
　EXAMPLE: <%=Hour(#4:45:34 PM#)%>
　RESULT: 16
(Hour has been converted to 24-hour system)
　
Instr()
　FUNCTION: 返回字符或字符串在另一个字符串中第一次出现的位置.
　SYNTAX: Instr([start, ] strToBeSearched, strSearchFor [, compare])
　ARGUMENTS: Start为搜索的起始值，strToBeSearched接受搜索的字符串　
strSearchFor要搜索的字符.compare比较方式（详细见ASP常数）
　EXAMPLE: <% strText = "This is a test!!" pos = Instr(strText, "a") response.write pos %>
　RESULT: 9
　
InstrRev()
　FUNCTION: 同上，只是从字符串的最后一个搜索起
　SYNTAX: InstrRev([start, ] strToBeSearched, strSearchFor [, compare])
　ARGUMENTS: 同上.
　EXAMPLE: <% strText = "This is a test!!" pos = InstrRev(strText, "s") response.write pos %>
　RESULT: 13

　
Int()
　FUNCTION: 返回数值类型,不四舍五入，注意取值是不大于它的整数。
　SYNTAX: Int(number)
　ARGUMENTS:　
　EXAMPLE: <%=INT(32.89)%>　 <%=int(-3.33)%>
　RESULT: 32　　-4
　
IsArray()
　FUNCTION: 判断一对象是否为数组，返回布尔值　.
　SYNTAX: IsArray(name)
　ARGUMENTS:　
　EXAMPLE: <% strTest = "Test!" response.write IsArray(strTest) %>
　RESULT: False
　
IsDate()
　FUNCTION: 判断一对象是否为日期，返回布尔值
　SYNTAX: IsDate(expression)
　ARGUMENTS: expression is any valid expression.
　EXAMPLE: <% strTest = "8/4/99" response.write IsDate(strTest) %>
　RESULT: True
　
IsEmpty()
　FUNCTION: 判断一对象是否初始化，返回布尔值.
　SYNTAX: IsEmpty(expression)
　ARGUMENTS:　
　EXAMPLE: <% Dim i response.write IsEmpty(i) %>
　RESULT: True
　
IsNull()
　FUNCTION: 判断一对象是否为空，返回布尔值.
　SYNTAX: IsNull(expression)
　ARGUMENTS:　
　EXAMPLE: <% Dim i response.write IsNull(i) %>
　RESULT: False
　
IsNumeric()
　FUNCTION: 判断一对象是否为数字，返回布尔值.
　SYNTAX: IsNumeric(expression)
　ARGUMENTS:　
　EXAMPLE: <% i = "345" response.write IsNumeric(i) %>
　RESULT: True
就算数字加了引号，ASP还是认为它是数字。
　
IsObject()
　FUNCTION: 判断一对象是否为对象，返回布尔值.
　SYNTAX: IsObject(expression)
　ARGUMENTS:　
　EXAMPLE: <% Set con = Server.CreateObject("ADODB.Connection") response.write IsObject(con) %>
　RESULT: True
　
LBound()
　FUNCTION: 返回指定数组维的最小可用下标.
　SYNTAX: Lbound(arrayname [, dimension])
　ARGUMENTS: ; dimension 指明要返回哪一维下界的整数。使用 1 表示第一维，2
表示第二维，以此类推。如果省略 dimension 参数，默认值为 1.
　EXAMPLE: <% i = Array("Monday","Tuesday","Wednesday") response.write LBound(i) %>
　RESULT: 0
　
LCase()
　FUNCTION:　 返回字符串的小写形式
　SYNTAX: Lcase(string)
　ARGUMENTS: string is any valid string expression.
　EXAMPLE: <% strTest = "This is a test!" response.write LCase(strTest) %>
　RESULT: this is a test!
　
Left()
　FUNCTION: 返回字符串左边第length个字符以前的字符（含第length个字符).
　SYNTAX: Left(string, length)
　ARGUMENTS:　
　EXAMPLE: <% strTest = "This is a test!" response.write Left(strTest, 3) %>
　RESULT: Thi
　
Len()
　FUNCTION: 返回字符串的长度.
　SYNTAX: Len(string | varName)
　ARGUMENTS:　
　EXAMPLE: <% strTest = "This is a test!" response.write Len(strTest) %>
　RESULT: 15
　
LTrim()
　FUNCTION: 去掉字符串左边的空格.
　SYNTAX: LTrim(string)
　ARGUMENTS:　
　EXAMPLE: <% strTest = " This is a test!" response.write LTrim(strTest) %>
　RESULT: This is a test!
　
Mid()
　FUNCTION: 返回特定长度的字符串(从start开始,长度为length).
　SYNTAX: Mid(string, start [, length])
　ARGUMENTS:　
　EXAMPLE: <% strTest = "This is a test! Today is Monday." response.write Mid(strTest, 17, 5) %>
　RESULT: Today
　
Minute()
　FUNCTION: 返回时间的分钏.
　SYNTAX: Minute(time)
　ARGUMENTS:　
　EXAMPLE: <%=Minute(#12:45:32 PM#)%>
　RESULT: 45
　
Month()
　FUNCTION: 返回日期.
　SYNTAX: Month(date)
　ARGUMENTS: date is any valid date expression.
　EXAMPLE: <%=Month(#08/04/99#)%>
　RESULT: 8
　
MonthName()
　FUNCTION: Returns a string identifying the specified month.
　SYNTAX: MonthName(month, [, Abb])
　ARGUMENTS: month is the numeric representation for a given month; Abb
(optional) is a boolean value used to display month abbreviation. True
will display the abbreviated month name and False (default) will not show
the abbreviation.
　EXAMPLE: <%=MonthName(Month(#08/04/99#))%>
　RESULT: August
　
Now()
　FUNCTION: Returns the current system date and time.
　SYNTAX: Now()
　ARGUMENTS: None
　EXAMPLE: <%=Now%>
　RESULT: 8/4/99 9:30:16 AM
　
Replace()
　FUNCTION: Returns a string in which a specified sub-string has been
replaced with another substring a specified number of times.
　SYNTAX: Replace(strToBeSearched, strSearchFor, strReplaceWith [, start
][, count ][, compare]]])
　ARGUMENTS: strToBeSearched is a string expression containing a sub-
string to be replaced; strSearchFor is the string expression to search for
within strToBeSearched; strReplaceWith is the string expression to replace
sub-string strSearchFor; start (optional) is the numeric character
position to begin search; count (optional) is a value indicating the
comparision constant.
　EXAMPLE: <% strTest = "This is an apple!" response.write Replace(strTest, "apple", "orange") %>
　RESULT: This is an orange!
　
Right()
　FUNCTION: 返回字符串右边第length个字符以前的字符（含第length个字符).
　SYNTAX: Right(string, length)
　ARGUMENTS: .
　EXAMPLE: <% strTest = "This is an test!" response.write Right(strTest, 3) %>
　RESULT: st!
　
Rnd()
　FUNCTION: 产生一个随机数.
　SYNTAX: Rnd [ (number) ]
　ARGUMENTS:　
　EXAMPLE: <% Randomize() response.write RND() %>
　RESULT: 任何一个在0 到 1 之间的数
　
Round()
　FUNCTION: 返回按指定位数进行四舍五入的数值.
　SYNTAX: Round(expression [, numRight])
　ARGUMENTS: numRight数字表明小数点右边有多少位进行四舍五入。如果省略，则
Round 函数返回整数.
　EXAMPLE: <% i = 32.45678 response.write Round(i) %>
　RESULT: 32
　
Rtrim()
　FUNCTION: 去掉字符串右边的字符串.
　SYNTAX: Rtrim(string)
　ARGUMENTS:　
　EXAMPLE: <% strTest = "This is a test!! " response.write RTrim(strTest) %>
　RESULT: This is a test!!
　
Second()
　FUNCTION: 返回秒.
　SYNTAX: Second(time)
　ARGUMENTS: .
　EXAMPLE: <%=Second(#12:34:28 PM#)%>
　RESULT: 28
　
StrReverse()
　FUNCTION: 反排一字符串
　SYNTAX: StrReverse(string)
　ARGUMENTS:　
　EXAMPLE: <% strTest = "This is a test!!" response.write StrReverse(strTest) %>
　RESULT: !!tset a si sihT
　
Time()
　FUNCTION: 返回系统时间.
　SYNTAX: Time()
　ARGUMENTS: .
　EXAMPLE: <%=Time%>
　RESULT: 9:58:28 AM
　
Trim()
　FUNCTION: 去掉字符串左右的空格.
　SYNTAX: Trim(string)
　ARGUMENTS: string is any valid string expression.
　EXAMPLE: <% strTest = " This is a test!! " response.write Trim(strTest) %>
　RESULT: This is a test!!
　
UBound()
　FUNCTION: 返回指定数组维数的最大可用下标.
　SYNTAX: Ubound(arrayname [, dimension])
　ARGUMENTS: ; dimension (optional) 指定返回哪一维上界的整数。1 表示第一
维，2 表示第二维，以此类推。如果省略 dimension 参数，则默认值为 1.
　EXAMPLE: <% i = Array("Monday","Tuesday","Wednesday") response.write UBound(i) %>
　RESULT: 2
　
UCase()
　FUNCTION: 返回字符串的大写形式.
　SYNTAX: UCase(string)
　ARGUMENTS:　
　EXAMPLE: <% strTest = "This is a test!!" response.write UCase(strTest) %>
　RESULT: THIS IS A TEST!!
　
VarType()
　FUNCTION: 返回指示变量子类型的值
　SYNTAX: VarType(varName)
　ARGUMENTS:　
　EXAMPLE: <% i = 3 response.write varType(i) %>
　RESULT: 2(数字)详见"asp常数"
　
WeekDay()
　FUNCTION: 返回在一周的第几天.
　SYNTAX: WeekDay(date [, firstdayofweek])
　ARGUMENTS: .
　EXAMPLE: <% d = #8/4/99# response.write Weekday(d) %>
　RESULT: 4(星期三)
　
WeekDayName()
　FUNCTION: 返回一周第几天的名字.
　SYNTAX: WeekDayName(weekday [, Abb ][, firstdayofweek]])
　ARGUMENTS: Abb可选。Boolean 值，指明是否缩写表示星期各天的名称。如果省
略， 默认值为 False，即不缩写星期各天的名称.firstdayofweek指明星期第一天的
数值
　EXAMPLE: <% d = #8/4/99# response.write WeekdayName(Weekday(d)) %>
　RESULT: Wednesday
　
Year()
　FUNCTION: 返回当前的年份.
　SYNTAX: Year(date)
　ARGUMENTS:　
　EXAMPLE: <%=Year(#8/4/99#)%>
　RESULT: 1999