VCProject::CanAddActiveXReference Method (String^, Int32, Int32, Int32, String^)

Visual Studio 2015
 

Gets a value indicating whether to add the given ActiveX (COM) reference.

Namespace:   Microsoft.VisualStudio.VCProjectEngine
Assembly:  Microsoft.VisualStudio.VCProjectEngine (in Microsoft.VisualStudio.VCProjectEngine.dll)

C#
C++
F#
VB
Copy 
bool CanAddActiveXReference(
	String^ typeLibGuid,
	int majorVersion,
	int minorVersion,
	int localeID,
	String^ wrapper
)

Parameters

typeLibGuid
Type: System::String^

A string representing the type library GUID.

majorVersion
Type: System::Int32

An integer representing the major version number.

minorVersion
Type: System::Int32

An integer representing the minor version number.

localeID
Type: System::Int32

An integer representing the locale ID.

wrapper
Type: System::String^

A string representing the wrapper name. Can be blank.

Return Value

Type: System::Boolean

true if it will add the given ActiveX reference, false if not.

See How to: Compile Example Code for Visual C++ Code Model Extensibility for information about how to compile and run this example.

CanAddActiveXReference adds an ActiveX type library reference to your project based on the parameters that you supply, if it is possible.

VB
Copy 
Imports EnvDTE
Imports System.Diagnostics
Imports Microsoft.VisualStudio.VCProjectEngine

Public Module Module1
    Sub Test()
        Dim prj As VCProject
        Dim tlguid, wrapper As String
        Dim majver, minver, lcid As Integer

        ' Add the following values:
        ' tlguid = The guid for the EnvDTE COM type library.
        ' wrapper = The wrapper name for EnvDTE, taken from .vcxproj file.
        ' majver, minver = The major and minor versions of DTE, 
        '                  taken from the .vcxproj file.
        ' lcid = The localization ID. 1033 is English. 
        '        Each language has its own LCID.
        tlguid = "{80CC9F66-E7D8-4DDD-85B6-D9E6CD0E93E2}"
        wrapper = "primary"
        majver = 7
        minver = 0
        lcid = 1033
        prj = DTE.Solution.Projects.Item(1).Object
        If prj.CanAddActiveXReference(tlguid, majver, minver, lcid, _
          wrapper) Then
            prj.AddActiveXReference(tlguid, majver, minver, lcid, wrapper)
        Else
            MsgBox("Cannot add the specified ActiveX typelib reference.")
        End If
    End Sub
End Module
Return to top
Show: