I use an ADO to connect to a table in an Access database.
To display the entire table I use a MSHFlexGrid component.
The problem is: number of records up to 2048 will be shown i MSHFlexGrid but when I have more records the exceeding records will be ignored (all records are in the physical table). Why missing records ?
My code:
Public JetOLEDB As String 'Provider og path
Public objcnn As New ADODB.Connection 'Connection til ADODB
Public objRst As New ADODB.Recordset 'Recordsæt til ADODB
JetOLEDB = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\Maalinger.mdb"
objcnn.Open JetOLEDB
StrSql = "SELECT * FROM Table1;"
objRst.Open StrSql, objcnn, adOpenStatic
Set MSHFlexGrid1.DataSource = objRst.DataSource
To display the entire table I use a MSHFlexGrid component.
The problem is: number of records up to 2048 will be shown i MSHFlexGrid but when I have more records the exceeding records will be ignored (all records are in the physical table). Why missing records ?
My code:
Public JetOLEDB As String 'Provider og path
Public objcnn As New ADODB.Connection 'Connection til ADODB
Public objRst As New ADODB.Recordset 'Recordsæt til ADODB
JetOLEDB = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\Maalinger.mdb"
objcnn.Open JetOLEDB
StrSql = "SELECT * FROM Table1;"
objRst.Open StrSql, objcnn, adOpenStatic
Set MSHFlexGrid1.DataSource = objRst.DataSource
