在 ASP 和 HTML 中使用 INNER JOIN

编程问答 2022-05-12

问题描述

初学者问题。 我有一个包含 2 个表的数据库文件 - 产品和订单，以及以下 sql：

SELECT Orders.OrderID,Orders.CustomerName,Products.ProductName,Products.Price
FROM Products
INNER JOIN Orders
ON Products.ProductID=Orders.PIDSelect
WHERE Orders.OrderID=1;

它在 Access 中运行良好，但 ASP 失败并出现乱码。

首先我有一个HTML文件要求输入订单ID，想用ASP生成sql结果。代码如下：

<%@ Language="JavaScript" %>
<!DOCTYPE html>
<html lang="en">
<head>
        <Meta charset="utf-8" />
</head>
<body>
    <%
        var OrderId = Request.Form("OrderId");
        var conn = new ActiveXObject("ADODB.Connection");
        var rs = new ActiveXObject("ADODB.Recordset");
        conn.Open("Provider=Microsoft.Jet.OLEDB.4.0; Data Source='...PATH....mdb'");
        rs.Open("SELECT Orders.OrderID,Products.Price FROM Products INNER JOIN Orders ON Products.ProductID = Orders.PIDSelect WHERE Orders.OrderID = '" + OrderId + "'",conn);
    %>
    
    <table>
            <tr>
                <th>Order ID</th>
                <th>Order Date</th>
                <th>Customer Name</th>
                <th>Product Name</th>
                <th>Price</th>
            </tr>
            <% while (rs.EOF != true) { %>
            <tr>
                <td><%response.Write(rs("Orders.OrderID")) %></td>
                <td><%response.Write(rs("Orders.TodayDate")) %></td>
                <td><%response.Write(rs("Orders.CustomerName")) %></td>
                <td><%response.Write(rs("Products.ProductName")) %></td>
                <td><%response.Write(rs("Products.Price")) %></td>
            </tr>
            <% rs.MoveNext();
                } %>
        </table>
    <%
        rs.close();
        conn.close();
    %>
</body>
</html>

我不知道如何修改代码。寻求帮助，谢谢！

解决方法

是否有理由将 ASP 转换为 Javascript？ 你为什么不使用纯ASP？所以你可以用 err.description 来捕捉错误。 Flakes 是对的：你忘记了orders.todayDate。 另一个错误可能是，您正在编写 <%Response.Write(rs("Orders.OrderID")) %> 如果两个表中都存在字段名，则您只能使用表名。

如果你愿意，你可以试试这个：

<!DOCTYPE html>
<html lang="en">
<head>
        <meta charset="utf-8" />
</head>
<body>
    <%
        OrderId = Request.Form("OrderId");
        SET conn = Server.CreateObject("ADODB.Connection")
        SET rs       = Server.CreateObject("ADODB.RecordSet")       
        
        ' Newer Version Requires database Engine 2010: conn.Open "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=c:\inetpub\database\access.accdb;Jet OLEDB:Database Password=XX;"
        conn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\inetpub\database\access.mdb;Jet OLEDB:Database;"
        rs.Open "SELECT Orders.OrderID,Orders.CustomerName,Orders.TodayDate,Products.ProductName,Products.Price FROM Products INNER JOIN Orders ON Products.ProductID = Orders.PIDSelect WHERE Orders.OrderID = '" & OrderId & "'",conn
    %>
    
    <table>
            <tr>
                <th>Order ID</th>
                <th>Order Date</th>
                <th>Customer Name</th>
                <th>Product Name</th>
                <th>Price</th>
            </tr>
            <% do while not rs.eof %>
            <tr>
                <td><%Response.Write(rs("OrderID")) %></td>
                <td><%Response.Write(rs("TodayDate")) %></td>
                <td><%Response.Write(rs("CustomerName")) %></td>
                <td><%Response.Write(rs("ProductName")) %></td>
                <td><%Response.Write(rs("Price")) %></td>
            </tr>
            <% 
            rs.MoveNext
            loop
            %>
        </table>
    <%
        rs.close
        conn.close
    %>
</body>
</html>

asp-classichtmlsqlsql