jaké je řešení počítání řádků po zavolání selectu dle zadaných parametrů, např. where. Pomocí oDb.GetRecordCount() si mohu zjistit počet řádků v databázi. Tento prvek však nedbá na žádný dotaz, stačí mu být připojen v databázi. Existuje způsob, jak zjistit počet řádků po SELECTU...
- Code: Select all
'===============================================================================
' MPS01
'-------------------------------------------------------------------------------
' Funkčnost: Naplnění daty, které jsou potřeba k vizualizaci.
Dim Box_number, aData, pResult, oRs, n, s
Box_number = 1
oDb.Connect
oDb.OpenSQL = "SELECT * FROM tabulka Where BoxNumber = 6253422"
n = oDb.GetRecordCount()
Pm.Debug n
oDb.Open
s = oDb.GetFieldCount()
Pm.Debug s
Děkuji mnohokrát.
S pozdravem
Libor D.