Occurs when the server application notifies the control that the data has been saved.
Event ID |
Objects |
---|---|
pbm_omnsave |
OLE |
None
Long. Return code: Ignored
If you want to retrieve the ObjectData blob value of an OLE control during the processing of this event, you must post a user event back to the control or you generate a runtime error.
In this example, a table in a database tracks changes of OLE objects; when the user saves an Excel spreadsheet in an OLE control, this code puts the current date in a DataWindow so that the database table can be updated:
long ll_row
// Find the row with information for the Excel file
ll_row = dw_1.Find("file_name = 'expenses.xls'", &
1, 999)
IF ll_row > 0 THEN
// Make the found row current
dw_1.SetRow(ll_row)
// Put today's date in the last_updated column
dw_1.Object.last_updated[ll_row] = Today( )
// Update and refresh the DataWindow
dw_1.Update( )
dw_1.Retrieve( )
ELSE
MessageBox("Find", "No row found")
END IF