Code:
Function MyBBList() As DAO.Database
Set MyBBList = DAO.OpenDatabase("\\Win10-pc\Desktop\TestBBTableMay2020 (1222a).mdb", False, False)
End Function
Code:
Function GetBBPrefixAndLC(y, Title) As DAO.Recordset
Dim sql As String
'Construct sql
With MyBBList.CreateQueryDef("", sql)
If .OpenRecordset.RecordCount > 0 Then
.OpenRecordset.MoveLast
.OpenRecordset.MoveFirst
End If
Set GetBBPrefixAndLC = .OpenRecordset
.Close
End With
End Function
But in this case it's not. It's always 100. Can I get the 'correct' count somehow?