Follow @dporton

JustCode : Add / unlock a version in your MDD

When you are playing arround with MDD files you may need to add or unlock the version. This simple code shows you how to do it.

' ****************************************
' Designed by : Smarter Dimensions
' Last Updated : 4th July 2009
' Sub to unlock a MDD version.
' ****************************************

Dim oMDM,oVar,oElement,sLabel
Set oMDM = CreateObject("MDM.Document")
oMDM.Open("c:\temp\short_drinks.mdd", , openConstants.oREADWRITE)
oMDM.Versions.AddNew()
oMDM.Save()

Leave a Comment

%d bloggers like this: