ImportGroupCommand.GetImportGroup Function

Remarks:

Syntax:

Set ImportedGroup = ImportGroupCommand.GetImportGroup

return value:

example:

Dim DBPath
DBPath = "c:\sample.fdb"

CreateDB(DBPath)
OpenDB(DBPath)

'Please ensure that the folder's path is exist.
Dim ImportFolderCmd
Set ImportFolderCmd = GetImportFolderCmd("ImportedFolder", "G:\Folder", CatalogDB.CatalogRoot)

ImportFolderCmd.Execute

Set ImportedGroup = ImportFolderCmd.GetImportGroup

If IsObject(ImportedGroup) Then MsgBox "The ImportFolderCmd.GetImportGroup Function is successful!"

See Also:

Import Group Command Object