5154

ASP 查询或操作数据库全攻略

一、ASP 连接数据库基础

在 ASP 中连接数据库通常使用 ADO（ActiveX Data Objects）组件，以下是连接不同类型数据库的基本步骤和示例代码：

示例代码（以 Access 为例）：

<%
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=database.mdb;Persist Security Info=False"
%>

此代码创建了一个名为conn 的数据库连接对象，并使用指定的连接字符串打开一个 Access 数据库。

二、执行查询操作

（一）简单查询

1、单表查询

从一个名为users 的表中查询所有用户的姓名和年龄，可以使用以下代码：

<%
Set rs = Server.CreateObject("ADODB.Recordset")
sql = "SELECT name, age FROM users"
rs.Open sql, conn, adOpenStatic, adLockReadOnly
Do While Not rs.EOF
    Response.Write "姓名：" & rs("name") & "，年龄：" & rs("age") & "<br>"
    rs.MoveNext
Loop
rs.Close
Set rs = Nothing
%>

这里首先创建了一个记录集对象rs，然后定义了 SQL 查询语句sql，通过rs.Open 方法执行查询并打开记录集，循环遍历记录集输出结果，最后关闭记录集并释放对象。

2、多表查询

假设有两个表students（学生表）和scores（成绩表），若要查询每个学生的姓名及其对应的成绩，可以使用联合查询：

<%
sql = "SELECT students.name, scores.score FROM students INNER JOIN scores ON students.id = scores.student_id"
rs.Open sql, conn, adOpenStatic, adLockReadOnly
%>
<table border="1">
    <tr>
        <th>姓名</th>
        <th>成绩</th>
    </tr>
    <% Do While Not rs.EOF %>
    <tr>
        <td><%=rs("name")%></td>
        <td><%=rs("score")%></td>
    </tr>
    <% rs.MoveNext
    Loop %>
</table>
<%
rs.Close
Set rs = Nothing
%>

利用INNER JOIN 关键字将students 表和scores 表按id 和student_id 字段进行连接，查询出所需数据并以表格形式展示。

（二）带条件的查询

如果要查询年龄大于 20 岁的用户信息，可以这样写：

<%
sql = "SELECT * FROM users WHERE age > 20"
rs.Open sql, conn, adOpenStatic, adLockReadOnly
%>
<ul>
    <% Do While Not rs.EOF %>
    <li>ID: <%=rs("id")%>, 姓名: <%=rs("name")%>, 年龄: <%=rs("age")%></li>
    <% rs.MoveNext
    Loop %>
</ul>
<%
rs.Close
Set rs = Nothing
%>

通过在WHERE 子句中指定条件age > 20，筛选出满足条件的数据记录并展示。

三、插入数据操作

向数据库中的表插入数据使用INSERT INTO 语句，向users 表中插入一条新用户记录：

<%
sql = "INSERT INTO users (name, age) VALUES ('张三', 25)"
conn.Execute sql
%>

此代码将姓名为“张三”、年龄为 25 的用户信息插入到users 表中。

四、更新数据操作

更新表中的数据使用UPDATE 语句，比如将用户 ID 为 1 的年龄更新为 30：

<%
sql = "UPDATE users SET age = 30 WHERE id = 1"
conn.Execute sql
%>

这会将users 表中 ID 为 1 的记录的age 字段值修改为 30。

五、删除数据操作

删除表中的数据使用DELETE 语句，若要删除users 表中 ID 为 2 的用户：

<%
sql = "DELETE FROM users WHERE id = 2"
conn.Execute sql
%>

此操作会将users 表中 ID 为 2 的整条记录删除。

相关问题与解答

问题一：如何在 ASP 中防止 SQL 注入攻击？

答：在 ASP 中防止 SQL 注入可以采用参数化查询的方式，在使用Execute 方法执行带有参数的 SQL 语句时，像下面这样：

sql = "SELECT * FROM users WHERE name = ? AND age > ?"
Set cmd = Server.CreateObject("ADODB.Command")
cmd.ActiveConnection = conn
cmd.CommandText = sql
cmd.Parameters.Append cmd.CreateParameter("@name", adVarChar, adParamInput, 50, "张三")
cmd.Parameters.Append cmd.CreateParameter("@age", adInteger, adParamInput, , 20)
cmd.Execute

通过使用参数占位符（如?）并在执行前为参数赋值，避免了直接将用户输入拼接到 SQL 语句中，从而有效防止 SQL 注入攻击。

问题二：在连接数据库时出现“未找到数据源名称且未指定默认驱动程序”错误，可能是什么原因？

答：这种错误可能是由于以下几个原因导致的：

1、连接字符串中的驱动名称或提供程序名称错误，对于 SQL Server 数据库，如果写成了错误的驱动名称，就会引发此错误，应确保驱动名称正确无误，如"{SQL Server}"。

2、数据库服务器地址或数据库名称错误，检查连接字符串中的服务器地址和数据库名称是否与实际的数据库服务器配置相符。

3、没有正确安装相应的数据库客户端软件或驱动程序，如果是连接 SQL Server 数据库，需要确保安装了合适的 SQL Server Native Client 或 ODBC 驱动程序，如果没有安装或安装不正确，也会导致该错误，可以通过重新安装或修复相关数据库客户端软件来解决问题。