Imports RevisionManager
Imports System.Runtime.InteropServices
Module Example
Sub Main()
Dim objPropertySets As SolidEdgeFileProperties.PropertySets = Nothing
Try
' Create a new instance of PropertySets.
objPropertySets = New SolidEdgeFileProperties.PropertySets
objPropertySets.Open("C:\Part1.par", True)
objPropertySets.Close()
Catch ex As Exception
' Write any errors to console.
Console.WriteLine(ex.Message)
Finally
' Release COM Objects.
If Not (objPropertySets Is Nothing) Then
Marshal.ReleaseComObject(objPropertySets)
objPropertySets = Nothing
End If
End Try
End Sub
End Module
using RevisionManager;
using System.Runtime.InteropServices;
internal static class Example
{
public static void Main()
{
SolidEdgeFileProperties.PropertySets objPropertySets = null;
try
{
// Create a new instance of PropertySets.
objPropertySets = new SolidEdgeFileProperties.PropertySets();
objPropertySets.Open("C:\\Part1.par", true);
objPropertySets.Close();
}
catch (Exception ex)
{
// Write any errors to console.
Console.WriteLine(ex.Message);
}
finally
{
// Release COM Objects.
if (objPropertySets != null)
{
Marshal.ReleaseComObject(objPropertySets);
objPropertySets = null;
}
}
}
}