ASP page displaying SQL table data
am 23.03.2007 19:28:08 von studentI am struggling with this asp page. I need to solve this as part of a class
project. It is designed to simply read a SQL table and display the data in
the browser. But it will only show one record based on ID at a time. So if I
have multiple records with the same ID such as page.asp?ID=9734, it would
show all records using that ID in the browser.
The result set would display a table with a title header like Guest Name and
Description
Below that would be a table with three columns. Reading from left to right
it would show...
Program ID Guest Name Guest Description
9734 Name some description here
The actual table called T_ProgramGuests has several records with this 4
digit number but only one shows up in the browser when tested. I need it to
show all of them but I'm not sure if I should be adding a Loop or IF Then
Else section to my page. I sure could use some help with the code. See below
the entire ASP page code.
[CODE]
<%
set con = Server.CreateObject("ADODB.Connection")
con.Open "File Name=E:\webservice\Company\Company.UDL"
set recProgram = Server.CreateObject("ADODB.Recordset")
strSQL = "SELECT *, T_ProgramGuests.ProgramID AS Expr1 FROM T_ProgramGuests
INNER JOIN T_Programs ON T_ProgramGuests.ProgramID = T_Programs.ID WHERE
(T_ProgramGuests.ProgramID = 9726)"
'strSQL = "SELECT *, T_ProgramGuests.ProgramID AS Expr1 FROM T_ProgramGuests
INNER JOIN T_Programs ON T_ProgramGuests.ProgramID = T_Programs.ID WHERE
T_ProgramGuests.ProgramID = & Request("ID")
' <-- THE BELOW VERSION WORKS. THE ABOVE VERSION KEEPS FAILING -->
'strSQL = "SELECT *, T_ProgramGuests.ProgramID AS Expr1 FROM T_ProgramGuests
INNER JOIN T_Programs ON T_ProgramGuests.ProgramID = T_Programs.ID WHERE
(T_ProgramGuests.ProgramID = 9734)"
recProgram.Open strSQL,con
%>
Program ID | Guest Name | Guest Description |
---|---|---|
<%=recProgram.Fields("ProgramID")%> | <%=recProgram.Fields("GuestName")%> | <%=recProgram.Fields("GuestDescription")%> |
<%
recProgram.Close
con.Close
set recProgram = nothing
set con = nothing
%>