Reference3.SubType – vlastnost
Nastaví nebo získá podtyp sestavení.
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: System.String
Řetězec představující podtyp sestavení.Pro SQL Server Visual Basic nebo Visual C# projekty, je vlastnost nastavena na SQLCLR Pokud odkaz byla získána ze serveru SQL server cíl.
Poznámky
Tato vlastnost je užitečná pouze na serveru SQL Server Visual Basic nebo Visual C# projekty.
Příklady
Tento příklad přidá odkaz na otevřený Visual Basic nebo Visual C# projektu a podtyp odkaz zobrazí, pokud existuje.Chcete-li spustit tento příklad-in, viz Jak: kompilace a spuštění příkladů kódu automatizace objektu modelu.
Je výchozí cesty pro odkaz přidán: <drive>: \Program Files\Microsoft SQL Server\90\COM.Nahradit < cesta > v příkladu s cestou tento nebo jiný příslušný soubor.
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.