Set bg = AddBookmarkGroup(BookmarkGroupName, ParentGroup)
Dim DBPath DBPath = "c:\sample.fdb" CreateDB(DBPath) OpenDB(DBPath)
Set bg = AddBookmarkGroup("Bookmark", CatalogDB.CatalogRoot) If IsOK Then MsgBox "The execution of AddBookmarkGroup Function is successful!"
AddUsergroup Function