CreateOrUpdateRevisionLinks Method

Syntax

Visual Basic
Public Function CreateOrUpdateRevisionLinks( _ ByVal bstrInputFileName As String, _ ByVal bstrRevisedFromFileName As String, _ ByVal bstrRevisionRootFileName As String _ ) As Long

Parameters

bstrInputFileName: File name inside which links are to be created or updated.
bstrRevisedFromFileName: Name of the file from which this file is revised.
bstrRevisionRootFileName: Name of the file which root of all revisions in given tree.

Example

Example (VB.NET)
Example (C#)

Imports System.Runtime.InteropServices
Public Class Form1
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim m_oDesignManager As DesignManager.Application = Nothing
        Dim strInputFileName As String
        Dim strRevisedFromFileName As String = String.Empty
        Dim strRevisionRootFileName As String = String.Empty

        Try
                            
                Try
                    m_oDesignManager = GetObject(, "DesignManager.Application")
                Catch ex As Exception
                    m_oDesignManager = New DesignManager.Application()
                End Try
                
            
            m_oDesignManager.Visible = True
            strInputFileName = "D:\\SIEM00000003_A.par"
            m_oDesignManager.GetRevisionLinkInfo(strInputFileName,
                                             strRevisionRootFileName,
                                             strRevisedFromFileName)

            strRevisedFromFileName = "D:\\RenamedPart2.par"

            m_oDesignManager.CreateOrUpdateRevisionLinks(
                                              strInputFileName,
                                              strRevisedFromFileName,
                                              strRevisionRootFileName)
        Catch ex As Exception
            MsgBox("Exception occurred in CreateOrUpdateRevisionLinks - " & ex.Message)
        End Try

    End Sub
End Class

using System;
using System.Windows.Forms;
using System.Runtime.InteropServices;
public class Form1
{
    private void Button1_Click(object sender, EventArgs e)
    {
        DesignManager.Application m_oDesignManager = null;
        string strInputFileName = null;
        string strRevisedFromFileName = string.Empty;
        string strRevisionRootFileName = string.Empty;

        try
        {

                try
                {
                    m_oDesignManager = Microsoft.VisualBasic.Interaction.GetObject(null, "DesignManager.Application");
                }
                catch (Exception ex)
                {
                    m_oDesignManager = new DesignManager.Application();
                }


            m_oDesignManager.Visible = true;
            strInputFileName = "D:\\SIEM00000003_A.par";
            m_oDesignManager.GetRevisionLinkInfo(strInputFileName, strRevisionRootFileName, strRevisedFromFileName);

            strRevisedFromFileName = "D:\\RenamedPart2.par";

            m_oDesignManager.CreateOrUpdateRevisionLinks(strInputFileName, strRevisedFromFileName, strRevisionRootFileName);
        }
        catch (Exception ex)
        {
            MessageBox.Show("Exception occurred in CreateOrUpdateRevisionLinks - " + ex.Message);
        }

    }

    public Form1()
    {
        SubscribeToEvents();
    }


    private bool EventsSubscribed = false;
    private void SubscribeToEvents()
    {
        if (EventsSubscribed)
            return;
        else
            EventsSubscribed = true;

        Button1.Click += Button1_Click;
    }

}