Reference3.SubType – vlastnost

Článek
05/16/2015

Nastaví nebo získá sestavení podtypu.

Obor názvů: VSLangProj80
Sestavení: VSLangProj80 (v VSLangProj80.dll)

Syntaxe

'Deklarace
Property SubType As String

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)

Hodnota vlastnosti

Typ: String
Řetězcovou hodnotu představující sestavení podtypu.Pro SQL Server Visual Basic nebo Visual C# projekty, tato vlastnost nastavena na SQLCLR Pokud odkaz byla získána od cílového serveru SQL.

Poznámky

Tato vlastnost je užitečná pouze v SQL Server Visual Basic nebo Visual C# projektů.

Příklady

V tomto příkladu přidá odkaz na otevřený Visual Basic nebo Visual C# projektu a zobrazí podtyp odkaz, pokud existuje.Chcete-li spustit tento příklad jako doplněk, viz Postupy: Kompilace a spuštění příkladů kódu objektu automatizace.

Výchozí cesty pro přidán odkaz je: < jednotka >: \Program Files\Microsoft SQL Server\90\COM.Nahraďte < cesta > v příkladu se cesta příslušného souboru v tomto nebo jiném.

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);
}

Zabezpečení rozhraní .NET Framework

Plná důvěra přímému volajícímu. Částečně zabezpečený kód nemůže tento člen použít. Další informace naleznete v tématu Používání knihoven z částečně důvěryhodného kódu.

Viz také

Referenční dokumentace

Reference3 Rozhraní

VSLangProj80 – obor názvů

Sdílet prostřednictvím