Reference3.SubType Property
Important
Some information relates to prerelease product that may be substantially modified before it’s released. Microsoft makes no warranties, express or implied, with respect to the information provided here.
Sets or Gets the assembly subtype.
public:
property System::String ^ SubType { System::String ^ get(); void set(System::String ^ value); };public:
property Platform::String ^ SubType { Platform::String ^ get(); void set(Platform::String ^ value); };[System.Runtime.InteropServices.DispId(121)]
public string SubType { [System.Runtime.InteropServices.DispId(121)] get; [System.Runtime.InteropServices.DispId(121)] set; }[<System.Runtime.InteropServices.DispId(121)>]
[<get: System.Runtime.InteropServices.DispId(121)>]
[<set: System.Runtime.InteropServices.DispId(121)>]
member this.SubType : string with get, setPublic Property SubType As StringA string value representing the assembly's subtype. For SQL Server Visual Basic or Visual C# projects, this property is set to SQLCLR if the reference was retrieved from the target SQL server.
- Attributes
This example adds a reference to an open Visual Basic or Visual C# project and displays the reference subtype, if one exists. To run this example as an add-in, see How to: Compile and Run the Automation Object Model Code Examples.
The default paths for the reference added is: <drive>:\Program Files\Microsoft SQL Server\90\COM. Replace <file path> in the example with this or another appropriate file path.
Imports VSLangProj
Imports VSLangProj2
Imports VSLangProj80
Public Sub OnConnection(ByVal application As Object, _
ByVal connectMode As ext_ConnectMode, ByVal addInInst As Object, _
ByRef custom As Array) Implements IDTExtensibility2.OnConnection
applicationObject = CType(application, DTE2)
addInInstance = CType(addInInst, AddIn)
DisplaySubType(applicationObject)
End Sub
Sub DisplaySubType(ByVal dte As DTE2)
Dim aProject As Project
Dim aVSProject As VSProject2
aProject = applicationObject.Solution.Projects.Item(1)
aVSProject = _
CType(applicationObject.Solution.Projects.Item(1).Object, _
VSProject2)
' Add an Assembly reference and display its subtype.
Dim newRef As Reference3
' Replace <file path> with an actual file path.
newRef = CType(aVSProject.References.Add _
("<file path>\sqldistx.dll "), Reference3)
MsgBox("Added an assembly reference, named: " & newRef.Name)
MsgBox("The SubType of " & newRef.Name & " is " _
& newRef.SubType)
End Sub
using System.Windows.Forms;
using VSLangProj;
using VSLangProj2;
using VSLangProj80;
public void OnConnection(object application,
ext_ConnectMode connectMode, object addInInst, ref Array custom)
{
applicationObject = (DTE2)application;
addInInstance = (AddIn)addInInst;
DisplaySubType(((DTE2)applicationObject));
}
public void DisplaySubType(DTE2 dte)
{
// The first project is a Visual Basic or C# project.
VSProject2 vsProject =
((VSProject2)(applicationObject.Solution.Projects.Item(1).Object));
Reference3 aRef = null;
// Add an Assembly reference and display its subtype.
// Replace <file path> with an actual file path.
aRef = (Reference3)vsProject.References.Add
((@"<file path>\sqldistx.dll"));
MessageBox.Show("Added reference, named: "
+ aRef.Name);
MessageBox.Show("The SubType of " + aRef.Name + " is "
+ aRef.SubType);
}
This property is useful only on SQL Server Visual Basic or Visual C# projects.