K
kathir@vsea
We have a Visio plug-in application to manipulate our Visio drawings. Visio
crashes while we are calling Application.Documents.OpenEx(<filename>,
visOpenCopy) to open the copy of a file. We are unable to proceed with usage
of our plug-in application. Please provide us the solution.
If you install the latest service pack 1 (SP1) for Office 2007. Visio
crashes when running the below code snippet for opening the copy of a
document using Documents.OpenEx(<stencilname>, visOpenCopy). I think legacy
Code Snippet:
Dim appVisio As Object
Dim BlankStencilObj As Visio.Document 'Blank stencil created using Visio
2003
Set appVisio = GetObject(, "visio.application")
Set BlankStencilObj = appVisio.Documents.OpenEx("BLANKSTENCIL.VSS",
visOpenCopy)
If I am trying to achieve the same action using
Document.AddEx(<Stencilname>) also crashes the Visio.
Set BlankStencilObj = appVisio.Documents.AddEx("BLANKSTENCIL.VSS",
visMSDefault)
This does not happen when the Service Pack 1 is not installed.
crashes while we are calling Application.Documents.OpenEx(<filename>,
visOpenCopy) to open the copy of a file. We are unable to proceed with usage
of our plug-in application. Please provide us the solution.
If you install the latest service pack 1 (SP1) for Office 2007. Visio
crashes when running the below code snippet for opening the copy of a
document using Documents.OpenEx(<stencilname>, visOpenCopy). I think legacy
Code Snippet:
Dim appVisio As Object
Dim BlankStencilObj As Visio.Document 'Blank stencil created using Visio
2003
Set appVisio = GetObject(, "visio.application")
Set BlankStencilObj = appVisio.Documents.OpenEx("BLANKSTENCIL.VSS",
visOpenCopy)
If I am trying to achieve the same action using
Document.AddEx(<Stencilname>) also crashes the Visio.
Set BlankStencilObj = appVisio.Documents.AddEx("BLANKSTENCIL.VSS",
visMSDefault)
This does not happen when the Service Pack 1 is not installed.