Click or drag to resize

IRelationSave Method

Persist the object to the database. May throw an error if you are not allowed to save changes to the object. Saves the changes you made to the project model to the database, does not return the new data from the database.

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

Save

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
    result = MsgBox ("There have been no programmatically changes to your current relation." & vbCrLf & "But, by pushing 'YES' this will save the changes on your current relation, are you sure?", vbInformation + vbYesNo, "SuperCOM")
    if result = vbYes then
        objSO.CurrentRelation.Save
    else
        MsgBox "The relation change were not saved.", vbInformation + vbOkOnly, "SuperCOM"
    end if
else
    msgbox "unable to connect to database"
end if

See Also