Hi,
I have a sample code to copy component(file from Drive) to clipboard
but present code is working only on one component at once,
can anyone make it to multiple components at once
' NX 10.0.2.6
' Journal created by gashaik on Fri Aug 19 11:29:31 2016 India Standard Time
'
Option Strict Off
Imports System
Imports System.IO
'Imports NXOpen.UI
Imports NXOpen
Imports NXOpen.Assemblies
Imports System.Windows.Forms
Module NXJournal
Sub Main (ByVal args() As String)
Dim theSession As NXOpen.Session = NXOpen.Session.GetSession()
Dim workPart As NXOpen.Part = theSession.Parts.Work
Dim displayPart As NXOpen.Part = theSession.Parts.Display
Dim theUI As UI = UI.GetUI()
Dim components1(0) As NXOpen.Assemblies.Component
components1(0) = CType(theUI.SelectionManager.GetSelectedObject(0), NXOpen.Assemblies.Component)
Dim c_part As Part = Nothing
c_part = components1(0).Prototype
Dim directory As String = Path.GetDirectoryName(c_part.FullPath)
Dim pth as string= c_part.FullPath
Dim f() As String = {pth}
Dim d As New DataObject(DataFormats.FileDrop, f)
Clipboard.Clear()
Clipboard.SetDataObject(d, True)
MessageBox.Show("File Copied to Clipboard From : "& pth)
'System.Diagnostics.Process.Start("explorer.exe", "/select,"& pth)
End Sub
End Module