Mega Code Archive

 

Categories / VisualBasic Script / Access

 

Get Workspaces count and name

Sub test()          MsgBox "Workspace Count: " & DBEngine.Workspaces.Count     MsgBox "Workspace Name: " & DBEngine.Workspaces(0).Name End Sub