IsUnderRevisionControl 属性

       

如果当前 WebEx 对象上使用了版本控制,则为 True。只读,Boolean 类型。

注释

若要使用版本控制,必须要有用 Microsoft Visual SourceSafe 或 Microsoft Office 创建的版本控制项目。

示例

本示例先创建版本控制项目,然后在第二个过程中检查 IsUnderRevisionControl 属性的状态。

Private Sub SourceControlProject()
    Dim myWeb As WebEx

    Set myWeb = ActiveWeb

    If Not (myWeb.IsUnderRevisionControl) Then
        myWeb.RevisionControlProject = _
            "<FrontPage-based Locking>"
    End If
End Sub

Private Sub GetRevisionState()
    Dim myWeb As WebEx
    Dim myRevCtrlProj As String
    Dim myIsRevCtrl As Boolean

    Set myWeb = ActiveWeb

    With myWeb
        myRevCtrlProj = .RevisionControlProject
        myIsUnderRevCtrl = .IsUnderRevisionControl 
    End With
End Sub