DBDisConnect Method Example

The following example is a script associated with a command button that, when clicked, disconnects from the data provider selected in the Data ObjectvxData1.

Private Sub CommandButton1_Click()

vxData1.DBDisConnect

NOTES (CIMPLICITY USERS ONLY):

• The name of the subroutine shown here follows standard VBA naming convention, which does not apply to CimEdit Basic script language.
• In CIMPLICITY, the following additional code must precede the first reference of vxData1 in its scope:

Dim vxData1 As Object
Set vxData1 = CimGetScreen.Object.Objects.Item("vxData1").OleObject