topic Re: iLogic. Copy a drawing file in one folder and save it in another folder in Inventor Programming Forum

iLogic. Copy a drawing file in one folder and save it in another folder

smart-cad — Fri, 16 Apr 2021 11:52:52 GMT

Good afternoon everyone!
How can I copy a drawing file in one folder and save it in another folder?

Dim Filedata As String
Dim Filework As String
	
Filedata = ThisDoc.Path + "\DATA\Drawing_1.idw"
Filework = ThisDoc.Path + "\Drawing_1.idw"	
	
	

Select Case OPTION_C
	Case "OPTION-C0"
					
	InventorVb.Application.FileManager.DeleteFile(Filework)				
					
	Case "OPTION-C1"

					
	ThisApplication.Documents.Open(Filedata, False)
	ThisDoc.Document.SaveAs(Filework, True)
	ThisDoc.Document.Close(True)

	Case Else 
		'MessageBox.Show("***", "Title") 
End Select

Re: iLogic. Copy a drawing file in one folder and save it in another folder

WCrihfield — Fri, 16 Apr 2021 13:18:37 GMT

You can use the following method:

Dim oOldNamePath As String = "C:\Temp\MyFolder\MyDrawing.idw" Dim oNewNamePath As String = "C:\Temp\MyDrawing.idw" System.IO.File.Copy(oOldNamePath, oNewNamePath, False)

System.IO.File.Copy()

If this solved your problem, or answered your question, please click ACCEPT SOLUTION.
Or, if this helped you, please click (LIKE or KUDOS) 👍.

If you want and have time, I would appreciate your Vote(s) for My IDEAS 💡or you can Explore My CONTRIBUTIONS

Re: iLogic. Copy a drawing file in one folder and save it in another folder

WCrihfield — Fri, 16 Apr 2021 15:11:17 GMT

Here's another similar method that can be used in the same way in iLogic (vb.net):

FileIO.FileSystem.CopyFile()

Re: iLogic. Copy a drawing file in one folder and save it in another folder

smart-cad — Fri, 16 Apr 2021 16:40:57 GMT

My.Computer.FileSystem.CopyFile(Filedata, Filework, False) - works well!
Thank you so much )))

Re: iLogic. Copy a drawing file in one folder and save it in another folder

dusan.naus.trz — Mon, 03 Jul 2023 17:54:04 GMT

I love you all. I love this site. It's so inspiring. Thanks for being here guys.