July 04, 2003

Output Names of Columns in Tables...

"...take a given recordset (which may or may not contain multiple recordsets) and output every column (with column names) and every row neatly, without having to know ANYTHING about the data returned." (from GnomeCODE submission by a reader) 
1:     function outputRS(oRs)

2:     { count = 1;

3:       while( oRs )

4:       {

5:     Response.Write("<table style=
'font-size:10px;' border='1' cellspacing='0'
 cellpadding='2' bordercolor='#555555'>");


6:       Response.Write("<tr bgcolor=
'#dddddd'><td colspan=" + oRs.Fields.Count + "><b>RecordSet
" + count + "</b></td></tr><tr bgcolor=#eeeeee>");

7:       for( i = 0; i < oRs.Fields.Count; i++ ){

8:        Response.Write("<th>" + oRs.Fields(i).Name + "</th>");

9:       }

10:      Response.Write("</tr>");

11:      while( !oRs.EOF )

12:      { Response.Write("<tr>");

13:       for( i = 0; i < oRs.Fields.Count; i++ ){

14:       if( new String(oRs.Fields(i)) != "undefined" )

15:       { Response.Write("<td>" + oRs.Fields(i) + "</td>");

16:       }

17:       else

18:       { Response.Write("<td> </td>");}

19:       }

20:       Response.Write("</tr>");

21:       oRs.MoveNext();

22:      }

23:      Response.Write("</table><BR><BR>");

24:      count++;

25:      try{ oRs = oRs.NextRecordset(); }catch(e){ }

26:    }

27:    }

28:    var oConn = Server.CreateObject("ADODB.Connection");

29:    oConn.ConnectionString = your_DB_Connection_String;

30:    oConn.Open();

31:    var multipleRS = Server.CreateObject("ADODB.CreateRecordset");

32:    multipleRS.ActiveConnection = oConn;

33:    queryString = "Northwind.dbo.prReturnMultipleRecordsets";

34:    multipleRS.Open(queryString);

35:    outputRS(multipleRS);

36:


Posted by sachauncey at July 4, 2003 05:28 AM