Несколько таблиц, связанных по идентификатору - PullRequest
Новая
       1

Несколько таблиц, связанных по идентификатору

0 голосов
/ 25 марта 2011

Мне нужно написать страницу ASP, которая имеет соединение с 1 базой данных, а затем запросить две таблицы, в одной из которых есть подробности заголовка, а затем во вторую - строки заказа, каждая таблица имеет ORDER_NUMNER.

В этих таблицах содержатся заказы на продажу, которые мне нужно распечатать на HTML-странице, и любая помощь по этому вопросу будет полезна, поскольку ASP не является моим основным языком.

Ответы [ 2 ]

1 голос
/ 25 марта 2011

В общем:

Создание и открытие соединения с базой данных: (см. Www.connectionstrings.com для получения дополнительной информации) 

dim conn
conn.open "your connection string goes here"

Открытие набора записей для основной таблицы и таблицы сведений:

dim rst
rst.open "select * from tblMaster left join tblDetail on tblMaster.ORDER_NUMBER = tblDetail.ORDER_NUMBER where ORDER_NUMBER = 4",conn,1,3

Выйти из него нет записей 

if rst.eof then
   rst.close
   conn.close
   Response.end
end if

Печать информации заголовка (для полей order_date, order_number и order_company: 

response.write "Company: " & rst.fields("order_company") & "<br>"
response.write "Date: " & rst.fields("order_date") & "<br>"
response.write "Order Number: " & rst.fields("order_number") & "<br>"

Циклическая запись записей, чтение всех записей из подробной таблицы: (для полей item_desc, item_qty, item_cost) 

while not rst.eof
    response.write "Item: " & rst.fields("item_desc") & "<br>"
    response.write "Qty: " & rst.fields("item_qty") & "<br>"
    response.write "Cost: " & rst.fields("item_cost") & "<br>"
    rst.MoveNext
wend

Закрыть набор записей 

rst.close

Закрыть соединение 

conn.close
0 голосов
/ 25 марта 2011 
<%
    Set objConn = Server.CreateObject("ADODB.Connection")
        objConn.Mode = 3      
        objConn.Open "driver definition and connection string"

        SQLStrJ = "SELECT * FROM table1 t1 JOIN table2 t2 ON t1.ORDER_NUMBER=t2.ORDERNUMBER;"

        Set objRS = Server.CreateObject("ADODB.Recordset")
        objRS.Open SQLStrJ, objConn, 1, 3

Do Until objRS.EOF = True %>
  <html><%=objRs("field")%></html>
<%
  objRs.MoveNext
Loop
%>

Вы увидите в цикле пример сброса данных поля в HTML. Возможно, вы захотите поместить определение соединения и набора записей в включаемую функцию, в которую вы можете просто передать строку SQL, так как вы будете часто ее использовать. И не забудьте закрыть соединение, когда закончите. Удачи .. классический ASP немного беспорядок.

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.

Нет похожих вопросов

...