SaveAs(FileName As String,Flags As Long)

SaveAs(FileName As String,Flags As Long) ( Function )

Сохранить файл на диск с указанным именем или в указанную папку

Синтаксис:

objectvariable.SaveAs( FileName, Flags )

objectvariable - IDocFiles2

FileName - наименование файла с полным путем или только полный путь без имени файла (при этом будет использоваться имя файла, указанное в файловом составе документа)

Flags - значение из tagEnumFileOptions

Пример на VB Script:

Sub Test()
    Dim Files
    
    If TcsApp.Folders.RunModuleForSelect("Выберите документ", False) > 0 Then
    
        Set Files = TcsApp.Folders.Properties("FILES").AsIDispatch
    
        If Files.RunModuleForSelect("Выберите файл для выгрузки", False) > 0 Then
            Call Files.SaveAs( "d:\temp", 0 )
        End If
        
        Set Files = Nothing
        
    End If
    
End Sub