SQL Query String... getting field headers

[infinitium]

hey guys,

I've got an ASP-SQL query as follows:

<%
<!--#include file="inc-dbconnection.asp"--> <% 'connect to a d/base
Set objRS = objConn.Execute (SQLcode) %>

<table cellpadding=5 border=1>
<tr>
<td><b>STD_ID</b></td>
<td><b>STD_FNAME<b></td>
<td><b>STD_MNAME</b></td>
<td><b>STD_LNAME</b></td>
<td><b>STD_FACULTY</b></td>
<td><b>STD_COMMITMENT</b></td>

</tr>

<%Do While Not objRS.EOF%>
<tr>
<td><%=objRS("STD_ID")%></td>
<td><%=objRS("STD_FNAME")%> </td>
<td><%=objRS("STD_MNAME")%> </td>
<td><%=objRS("STD_LNAME")%> </td>
<td><%=objRS("STD_FACULTY")%> </td>
<td><%=objRS("STD_COMMITMENT")%> </td>
</tr>
<% objRS.MoveNext
Loop
objRS.Close

</table> %>

The problem now is that I've got to manually type in the field headers into my table. Is there a way to have the query return the SELECTed statements, as well as all related field headers?

[DaveMaxwell]

This should get you what you want....

Response.Write "<tr>" & vbCrLf
for i = 0 to (objRS.fields.count - 1)
	Response.Write "	<td>" & rsColumns.fields(i).Name & "</td>" & vbCrLf 
next
Response.Write "</tr>"

[infinitium]

thanks again Dave...

[DaveMaxwell]

Not a problem. Glad to share....