Database.Type Property

The property can return any of the following BtInputDataFile constants:

'Declare and create a new instance of BarTender

Dim btApp As BarTender.Application

btApp = New BarTender.Application

'Declare a BarTender document variable

Dim btFormat As BarTender.Format

'Declare BarTender database variable

Dim btDb As BarTender.Database

'Set the BarTender application visible

btApp.Visible = True

'Open a BarTender document

btFormat = btApp.Formats.Open("c:\Format1.btw", False, "")

'Select the database

btDb = btFormat.Databases.GetDatabase(1)

'Display the type of database being used

MessageBox.Show(btDb.Type.ToString)

'End the BarTender process

btApp.Quit(BarTender.BtSaveOptions.btDoNotSaveChanges)

// Declare a BarTender application variable

BarTender.Application btApp;

// Declare a BarTender document variable

BarTender.Format btFormat;

// Declare a BarTender database variable

BarTender.Database btDb;

// Create a new instance of BarTender

btApp = new BarTender.Application();

// Set the BarTender application visible

btApp.Visible = true;

// Open a BarTender document

btFormat = btApp.Formats.Open("c:\\Format1.btw", false, "");

// Select the database

btDb = btFormat.Databases.GetDatabase(1);

// Display the type of database being used

MessageBox.Show(btDb.Type.ToString());

// End the BarTender process

btApp.Quit(BarTender.BtSaveOptions.btDoNotSaveChanges);

Version	BarTender 6.00 or later
Edition	Automation, Enterprise Automation