Click or drag to resize

IRelationCancelChanges Method

Undo any changes made since the object was loaded. If you made changes to the model that you don't want to be saved to the database, call the CancelChanges method

Namespace:  SuperOffice.COM.SuperOfficeDB
Assembly:  SuperOfficeDB.Interop (in SuperOfficeDB.Interop.dll) Version: 8.0.0.0
Syntax
void CancelChanges()

Implements

IModelBaseCancelChanges
Examples

CancelChanges

This text may be copied to the notepad, and saved as a *.vbs file. Remember to change the login information.

VB
Dim objSO
Set objSO = CreateObject("SuperOffice.Application")
If not (objSO is nothing) Then
    id = objSO.CurrentRelation.Identity
    objSO.CurrentRelation.Comment = "This text been changed"
    result = MsgBox ("The text of the current relation has been changed, do you want to save these changes?", vbInformation + vbYesNo, "SuperCOM")
    if result = vbYes then
        objSO.CurrentRelation.ChangeIdentity(id)
    else
        objSO.CurrentRelation.CancelChanges()
        msgbox "The changes on the current relation where not saved", vbInformation + vbOkOnly, "SuperCOM"
    end if
else
    MsgBox "Unable to connect to database"
end if
Set objSO = Nothing

See Also