Reference3.SubType (Propiedad)
Establece u obtiene el subtipo de ensamblado.
Espacio de nombres: VSLangProj80
Ensamblado: VSLangProj80 (en VSLangProj80.dll)
Sintaxis
'Declaración
Property SubType As String
Get
Set
string SubType { get; set; }
property String^ SubType {
String^ get ();
void set (String^ value);
}
abstract SubType : string with get, set
function get SubType () : String
function set SubType (value : String)
Valor de propiedad
Tipo: System.String
Valor de cadena que representa el subtipo del ensamblado.Para los proyectos Visual Basic o Visual C# de SQL Server, esta propiedad se establece en SQLCLR si la referencia se recuperó del servidor SQL Server de destino.
Comentarios
Esta propiedad sólo es útil en proyectos de Visual Basic o Visual C# de SQL Server.
Ejemplos
En este ejemplo se agrega una referencia a un proyecto de Visual Basic o Visual C# abierto y se muestra el subtipo de la referencia, si existe. Para ejecutar este ejemplo como complemento, vea Cómo: Compilar y ejecutar los ejemplos de código del modelo de objetos de automatización.
Las rutas de acceso predeterminadas para la referencia agregada son: <unidad>:\Archivos de programa\Microsoft SQL Server\90\COM. En el ejemplo, reemplace <file path> por esta u otra ruta de acceso de archivo, según corresponda.
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);
}
Seguridad de .NET Framework
- Plena confianza para el llamador inmediato. Un código de confianza parcial no puede utilizar este miembro. Para obtener más información, vea Utilizar bibliotecas de código que no es de plena confianza.