Article ID: 171952
Article Last Modified on 3/2/2005
'Replace MY_SERVER with an appropriate SQL pubs database DSN.
Data1.Connect = "ODBC;DSN=MY_SERVER;Username=<username>;PWD=<strong password>;"
Data1.RecordSource = "SELECT * FROM TITLES"
Data1.Refresh
'Number of rows in the Recordset.
MsgBox Data1.Recordset.RecordCount
'Number of rows in MSFlexGrid1 excluding the title row.
MsgBox MSFlexGrid1.Rows - 1
Additional query words: kbVBp500 kbVBp kbWinOS98 kbDSupport kbdse kbNoKeyWord
Keywords: kbprb KB171952