IpfcModel.backup()

IpfcModel.backup()은 3D / 2D 모델을 특정 폴더에 저장 할수 있습니다.

1) 2D 모델을 BACKUP 하면, 포함된 3D 모델도 함께 BackUP 됩니다
2) 어셈블 파일을 BackUP 하면, 포함된 3D 모델도 함께 Copy 됩니다

Sub PrintDrawingWithPCF()

	Dim asynconn As New pfcls.CCpfcAsyncConnection	
	Dim conn As pfcls.IpfcAsyncConnection
	Set conn = asynconn.Connect("", "", ".", 5)
	Dim oSession As IpfcBaseSession
	Set oSession = conn.Session
	Dim oModel As IpfcModel
	Set oModel = oSession.CurrentModel
    
	Dim oModelDescriptorCreate As New CCpfcModelDescriptor
	Dim oModelDescriptor As IpfcModelDescriptor
	Set oModelDescriptor = oModelDescriptorCreate.CreateFromFileName(oModel.Filename)
   
	' 파일이 저장될 폴더 정의
	Dim oPathName As String
	oPathName = "F:\20Helth_Cycle\BACKUP_T2"
	oModelDescriptor.Path = oPathName

    Call oModel.backup(oModelDescriptor)
    
    'Disconnect with Creo
    conn.Disconnect (2)


End Sub

oModelDescriptor는 개체 입니다. 개체의 형식은 "F:\20Helth_Cycle\BACKUP_T2\top.asm" 입니다

---