E
Edwin Knoppert
I found this on the net.
If this works i'm sure i can manage the rest of it.
' /////////////////////////////////////////////////////////////////////////
' //
' // IShellFolder
' //
' /////////////////////////////////////////////////////////////////////////
<ComImport(), InterfaceType(ComInterfaceType.InterfaceIsIUnknown) ,
Guid("000214E6-0000-0000-C000-000000000046")> _
Public Interface IShellFolder
<PreserveSig()> _
Function GetAttributesOf(ByVal cidl As Integer, ByRef apidl As IntPtr, ByRef
rgfInOut As Integer) As Integer
End Interface
If this works i'm sure i can manage the rest of it.
' /////////////////////////////////////////////////////////////////////////
' //
' // IShellFolder
' //
' /////////////////////////////////////////////////////////////////////////
<ComImport(), InterfaceType(ComInterfaceType.InterfaceIsIUnknown) ,
Guid("000214E6-0000-0000-C000-000000000046")> _
Public Interface IShellFolder
<PreserveSig()> _
Function GetAttributesOf(ByVal cidl As Integer, ByRef apidl As IntPtr, ByRef
rgfInOut As Integer) As Integer
End Interface