ASP 函数是一种用于在 ASP 页面中进行编程的工具。它们是一些预定义的代码块，可用于执行特定的操作。通过使用函数，我们可以轻松地完成常见的任务，如处理字符串和日期，以及与数据库的交互。
在本教程中，我们将介绍一些常用的 ASP 函数，并提供一些示例代码，以帮助您更好地理解它们的用途和功能。
- 字符串函数
字符串函数用于处理字符串，包括搜索、替换、剪裁和格式化等操作。下面是一些常用的字符串函数：
a. InStr：用于在字符串中查找一个子字符串，并返回其出现的位置。例如，以下代码将查找字符串 "Hello World" 中的 "World" 并返回其位置：
<%
Dim str
str = "Hello World"
Response.Write(InStr(str, "World"))
%>b. Left 和 Right：用于从字符串的左侧或右侧截取指定数量的字符。例如，以下代码将从字符串 "Hello World" 中截取前 5 个字符：
<%
Dim str
str = "Hello World"
Response.Write(Left(str, 5))
%>c. Replace：用于将字符串中的一个子字符串替换为另一个子字符串。例如，以下代码将字符串 "Hello World" 中的 "World" 替换为 "ASP"：
<%
Dim str
str = "Hello World"
Response.Write(Replace(str, "World", "ASP"))
%>- 日期函数
日期函数用于处理日期和时间，包括格式化、比较和计算等操作。下面是一些常用的日期函数：
a. Date：用于返回当前日期。例如，以下代码将返回当前日期：
<%
Response.Write(Date())
%>b. DateAdd：用于添加指定的时间间隔到日期中。例如，以下代码将在当前日期上加上 7 天：
<%
Dim d
d = Date()
d = DateAdd("d", 7, d)
Response.Write(d)
%>c. DateDiff：用于计算两个日期之间的时间间隔。例如，以下代码将计算当前日期和 2022 年 1 月 1 日之间的天数：
<%
Dim d1, d2
d1 = Date()
d2 = #1/1/2022#
Response.Write(DateDiff("d", d1, d2))
%>- 数据库函数
数据库函数用于与数据库进行交互，包括连接、查询和更新等操作。下面是一些常用的数据库函数：
a. Connection 和 Command：用于创建与数据库的连接和执行 SQL 命令。例如，以下代码将连接到名为 "MyDatabase" 的数据库，并查询其中的所有记录：
<%
Dim conn, rs, sql
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=MyDatabase.mdb;")
Set rs = Server.CreateObject("ADODB.Recordset")
sql = "SELECT * FROM MyTable"
rs.Open sql, conn
Do While Not rs.EOF
Response.Write(rs("Field1") & " " & rs("Field2") & "<br>")
rs.MoveNext
Loop
rs.Close
Set rs = Nothing
conn.Close
Set conn = Nothing
%>b. ExecuteScalar 和 ExecuteNonQuery：用于执行 SQL 命令并返回结果。ExecuteScalar 用于执行查询并返回结果集中的第一行第一列，而 ExecuteNonQuery 用于执行非查询命令（如插入、更新或删除）并返回受影响的行数。例如，以下代码将向名为 "MyTable" 的表中插入一条记录：
<%
Dim conn, cmd, sql, rowsAffected
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=MyDatabase.mdb;")
Set cmd = Server.CreateObject("ADODB.Command")
sql = "INSERT INTO MyTable (Field1, Field2) VALUES ("Value1", "Value2")"
cmd.ActiveConnection = conn
cmd.CommandText = sql
cmd.CommandType = adCmdText
cmd.Execute rowsAffected
Response.Write(rowsAffected & " rows affected.")
conn.Close
Set conn = Nothing
%>在本教程中，我们介绍了一些常用的 ASP 函数，并提供了一些示例代码。通过学习这些函数，您可以更轻松地编写 ASP 网站，并实现更多的功能。
