Dumping a Recordset to HTML
Written by Eric Smith, Northstar Computer Systems LLC
Here's a quick way to dump the contents of a recordset to HTML, including column headings for the table.
<%
Dim rsData ' As ADODB.Recordset
Dim objField ' As ADODB.Field
Set rsData = dcnDB.Execute("SELECT * FROM tblCustomers")
Response.Write "<TABLE><TR>"
For Each objField In rsData.Fields
Response.Write "<TH>" & objField.Name & "</TH>"
Next ' objField
Response.Write "</TR>"
Do While Not rsData.EOF
Response.Write "<TR>"
For Each objField In rsData.Fields
Response.Write "<TD>" & objField.Value & "</TD>"
Next ' objField
Response.Write "</TR>"
rsData.MoveNext
Loop
rsData.Close
Response.Write "</TABLE>"
%>
You may want to write an additional function to convert field names like "MemberID" to "Member ID".
Keywords: [
Uncategorized ASP Tips
]
Publication Date: 7/1/1999
|