S
student
I 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.
Any help with this is much appreciated
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
%>
<body>
<TABLE BORDER="1" CELLPADDING="2" CELLSPACING="1" WIDTH="100%">
<p><b>Guest Name and Description:</b></p>
<tr>
<th width="15%" align="left">Program ID</th>
<th width="35%" align="left">Guest Name</th>
<th width="55%" align="left">Guest Description</th>
<tr>
<TD headers="t1"><%=recProgram.Fields("ProgramID")%></TD>
<TD headers="t2"><%=recProgram.Fields("GuestName")%></TD>
<TD headers="t3"><%=recProgram.Fields("GuestDescription")%></TD>
</tr>
</table>
<%
recProgram.Close
con.Close
set recProgram = nothing
set con = nothing
%>
</body>
</html>
Any help with this is much appreciated