In order to save each file in the CATProduct document.I am Opening the file(Product/part) and using "Saveas" command. Performance of the code decreases because of opening of file.
This is the code i am using to save files
Dim DocsOfDelmia As Documents
Set DocsOfDelmia = DELMIA.Documents
set SourceDoc = DocsOfDelmia.Open(SourceFilepth) 'opening each file in a new window
SourceDoc.SaveAs (PreservefilePath) ' saving the file in a specific path
If any one Knows and alternative method to save File Please Reply.