Follow

Return the total number of records of a given table

*/ Instantiate end set the database location.

oBiz = createobject("bizinfo.application")

oBiz.cDatabasePath = "C:\WinBIZ Data"

oBiz.nCompany = 1000

oBiz.nYear = 2017

*/ Define a script that opens a table and that returns the number of records of the table.

EOL = chr(10) + chr(13)

oBiz.cScript = cScript + [ oSession.TableOpen("Adresses") ] + EOL

oBiz.cScript = cScript + [ return reccount() ]

*/ Execute the script. The returned value is the number of records.

? oBiz.ScriptExecute()

Was this article helpful?
0 out of 0 found this helpful
Have more questions? Submit a request

Comments