ProjectFile.Update

Updates the file's data for the given target language if changes have been made to the source file.

Syntax:

Update_2( Language As String, ProtocolFile As Variant, DeletedItems As Variant, NewItems As Variant, ChangedItems As Variant ) As Boolean

Return: Boolean

Parameters:
Language: Language code (e.g. "en-US"). Target language data to be updated.
ProtocolFile [out]: Name of the corresponding protocol file to be returned.
DeletedItems [out]: Number of deleted items to be returned.
NewItems [out]: Number of new items to be returned.
ChangedItems [out]: Number of changed items to be returned.

Example:
Dim ProjFile As ProjectFile Dim RetVal As Boolean Dim ProtocolFile As Variant Dim DeletedItems As Variant Dim NewItems As Variant Dim ChangedItems As Variant Set ProjFile = Application.ActiveProjectFile If Not (ProjFiile Is Nothing) Then RetVal = ProjFile.Update_2( "fr", ProtocolFile, DeletedItems, NewItems, ChangedItems ) End if If Application.Errors.Count > 0 Then MsgBox ( Application.Errors.LastError ) End If

Syntax:	Update_2( Language As String, ProtocolFile As Variant, DeletedItems As Variant, NewItems As Variant, ChangedItems As Variant ) As Boolean
Return:	Boolean
Parameters:	Language: Language code (e.g. "en-US"). Target language data to be updated. ProtocolFile [out]: Name of the corresponding protocol file to be returned. DeletedItems [out]: Number of deleted items to be returned. NewItems [out]: Number of new items to be returned. ChangedItems [out]: Number of changed items to be returned.
Example:	Dim ProjFile As ProjectFile Dim RetVal As Boolean Dim ProtocolFile As Variant Dim DeletedItems As Variant Dim NewItems As Variant Dim ChangedItems As Variant Set ProjFile = Application.ActiveProjectFile If Not (ProjFiile Is Nothing) Then RetVal = ProjFile.Update_2( "fr", ProtocolFile, DeletedItems, NewItems, ChangedItems ) End if If Application.Errors.Count > 0 Then MsgBox ( Application.Errors.LastError ) End If