Database Search
If you can't find the information using the categories below, post a question over in our WinBatch Tech Support Forum.
TechHome
OLE COM ADO CDO ADSI LDAP
 | |
| |
| |
| |
| |
| |
| |
| |
| |
| |
| |
| |
| |
| |
| |
| |
| |
| |
| |
| |
| |
| |
| |
| |
| |
| |
| |
| |
| |
| |
| |
| |
| |
| |
| |
| |
| |
| |
|
- !! A List of Links to various OLE docs !!
- !! Understanding COM !!
- 1129 ObjectCreate
- 1129 OleInitiate Failed UAC
- 1129 OleInitiate Failed
- 1251 Ole - WIL Ole interface Dll not found
- Access to Excel Converter
- Access2000 Transaction Processing Demo
- Add Application to the Windows Firewall Exceptions List
- ADO vs ODBC
- ADO vs OLEDB vs ODBC
- Automatic Update from MicroSoft
- Bring up the RUN Dialog
- BYREF return parameters
- Close All Open OLE COM Objects
- Close an Object
- Closing Objects Explained
- Code to Create a Temporary DB
- Collaboration Data Objects Roadmap
- COM Constants for MS Office Applications
- COM Interfaces Explained
- COM Widestring Value Issue
- CommandTimeOut - lesson learned
- Connection String
- Convert Data Returned OLE
- Converting Pre 2004B OLE Scripts
- Copy Table Structure With SQL
- Create Object
- Create Recordset in Memory
- CreateObject Remote Computer
- Database ISAM Example
- dBase IV Creation
- Delete Mailbox in Exchange
- Determining if a Particular Update has Been Installed
- Determining Whether Automatic Updates is Enabled
- Display the Windows Run Dialog Box
- Does WinBatch Support 3rd party COM objects
- DSO Tabular Paging Demo
- Enumerate Citrix Applications
- Find Object Name and Properties
- Find User on Workstation
- ForEach Problem
- Generate GUIDs using ObjectType
- Get Audio File Information
- Get Information for IOMega Zip Drive
- Get Number of Records in Each Table
- Getting Multivalued Properties and Arrays
- GUID Create
- Handle Reassignment
- How to include an Office Assistant
- Insert Data into an SQL Server 2000
- Install CAPICOM on Win7
- Intcontrol 71 and Number of OLE Channels
- Interacting with Citrix
- IPCONFIG Results From STDOUT
- IsObject UDF
- List Components in Com Catalog
- List Databases on a Server
- List OLE DB Providers
- Load Data from ASCII File to a Java Applet Window
- MatLab COM Automation
- Method with Variant Parameters Explained
- Multi-Dimensional SafeArrays are NOT supported
- Named Parameters
- Object 101
- ObjectCreate Cannot Access Remote Server
- ObjectEventAdd Issue
- Office 2007 Driver Tips
- OLE COM Default Member Discussion
- OLE Explanation
- OLE Failing unless IE4 Installed - DCOM98
- OLE Property and Method Name Limit
- OLE Shell functions
- OLE2 Automation Tips
- Open DB and Permit Working with Tables
- Oracle Objects
- Pass ByRef Type Parameter
- Passing an Array as a Parameter to an OLE Method
- Passing Parameters
- Primer - Fabricated Hierarchical Recordsets
- Problems Writting a VB to WinBatch OLE Code Converter
- Read and Write to a Parallel Port
- RecordSets to HTML - with some Javascript
- Regular Expressions with WB
- Remotely Stop or Start COM Components
- Sample Code to Query a MIMSXServer
- Save Binary Streams to DB
- Set Proxy Server and Port
- Setting Group Policy Objects
- Shell ExtendedProperty
- Shell Helper Object
- SQL Server Update Stored Procedure
- Textract Problem
- textract test
- TextStream and Scripting.FileSystemObject
- Translate VB Default Member Name
- Trapping COM OLE Errors
- UDF to Return an Array of DB Table Types
- Un supported Variant Type Error With Concatenation
- Unicode Conversions with FileSystemObject
- Using the Object Browser
- Using the Visual Basic Object Browser
- Vbscript Array in WIL
- Virtual Server COM CoInitializeSecurity
- VT_DECIMAL Versus FLOAT
- WinBatch and Dot NET
- WinBatch Equivalent To VB Nothing
- WinBatch OnError
- Windows Firewall
- Windows Image Acquisition
- Working with Office Applications
- Write-Read DBF
Can't find the information you are looking for here? Then leave a message over on our WinBatch Tech Support Forum.
Get Number of Records in Each Table
Keywords: Row Count rowcount Number Records Tables
Sample code:
; ======= Winbatch: UDF to Return Records in Database Tables ============= ;
; 1. This Example uses ACCESS, but should work with other Providers ;
; 2. I use the SELECT COUNT instead of rowcount() as it will also ;
; work if an optional WHERE clause is sent as a parameter ;
; ;
; Stan Littlefield ( stanl@btitelecom.net ) July 1, 2001 ;
; ======================================================================== ;
#DefineFunction GetCount(cMDB,cat)
cConn = cat.ActiveConnection
nt = cat.Tables
nCnt = nt.count()
If nCnt==0
ObjectClose(cat)
Return(-1)
Endif
aTables = ArrDimension(nCnt,3)
BoxOpen(cMDB,"Table ")
For i=0 To nCnt-1
tbl = cat.Tables(i)
aTables[i,0] = tbl.Name
aTables[i,1] = tbl.Type
Boxtext(StrCat("Table ",aTables[i,0] ) )
Next
RS = ObjectOpen("ADODB.Recordset")
For i=0 To ncnt-1
If aTables[i,1] == "TABLE"
cSQL = StrCat( "SELECT COUNT (*) FROM ",aTables[i,0] )
RS.Open(cSQL,cConn,1,4)
fld = RS.Fields(0)
aTables[i,2] = fld.Value
RS.Close()
Endif
Next
BoxShut()
ObjectClose(RS)
ObjectClose(cat)
Return(aTables)
#EndFunction
; ==== Script Starts Here =============
cMDB = AskFileName("Select ACCESS Database",".\","MDB Files|*.mdb|","*.mdb",1)
If cMDB == ""
Return
Endif
cat = ObjectOpen("ADOX.Catalog")
cat.ActiveConnection = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=%cMDB%;"
aTables = GetCount(cMDB,cat)
If VarType(aTables) == 256
For i=0 To ArrInfo(aTables,1) -1
If aTables[i,1] == "TABLE"
message( StrCat("Table: ",aTables[i,0]),Strcat("Records: ",aTables[i,2]) )
Endif
Next
Else
message("Error in %cMDB%","No Tables in Database")
Endif
exit
Article ID: W15226
File Created: 2002:09:05:13:50:44
Last Updated: 2002:09:05:13:50:44