DO recordsets have a handy little method called GetString that they inherited from RDO’s GetClipString. GetString returns the contents of a recordset into a formatted string. Here are three useful ways to use GetString. The official syntax of GetString is:
String= recordset.GetString([StringFormat], [NumRows],
[ColumnDelimiter], [RowDelimiter], [NullExpr])
|StringFormat||Currently the only supported format is AdClipString, which returns a row and column delimited string|
|NumRows||The number of rows to be returned|
|ColumnDelimiter||The character inserted between columns. It is not inserted before the first column, or after the last column. The default is a Tab character|
|RowDelimiter||The character inserted between rows. It is not inserted before the first row, or after the last row. The default is a Carriage Return character.|
|NullExpr||Expression to be used in place of a Null value. The default is an empty string|
An important thing to note about GetString is that it reads the recordset by moving the cursor from its current position to the end of the recordset. Therefore you should:
- Make sure the cursor is at a valid record before calling GetString.
- Save the current cursor position if you want to return to it.
- Move to the first record if you want read the entire recordset.
- Move to a valid record after GetString moves the cursor to the EOF after reading the last record.
To view the contents of a recordset quickly while in break mode, simply type into the Immediate window:
This will return the data in a table format using the default tab and carriage return delimiters. Remember to move back to the beginning of the recordset after you are done.
To display quickly the contents of a recordset in a MSFlexGrid, follow these steps:
1. Dimension the grid by setting the Cols property to the amount of fields in the recordset. Set the Rows property to either the estimated amount of rows or move to the last record to populate the RecordCount property. Note that not all recordsets support the RecordCount property and will always return -1.
2. Select all the rows and columns of the grid using the Rowsel and Colsel properties.
3. Set the Grid’s Clip property to the return value of GetStringHere’s sample code:
With Grid1 .Cols = rs.Fields.Count rs.MoveLast .Rows=rs.RecordCount rs.MoveFirst .Rowsel= .Rows-1 .Colsel = .Cols-1 .Clip= rs.GetStringEnd With
Quick Web Page
You can turn a recordset into an HTML table quickly and display it in a Web page. All you’ve got to do is specify HTML table tags as the row/column delimiter arguments of the GetString method. The
ColumnD = "
begin a row, begin a cell, this inserted after the ' last column on a row
and before the first column of the subsequent rowstrHeader="
|" 'begin the table, begin the first row, begin the first cellstrFooter= "|