Adding a package with VB Script

[Jayson]

Believe it or not, even after having done a LOT of script I have NEVER used scripting to add a new package.

However, I now have the need to and am failing miserably for some reason.

My script looks like this:

Set m_rootPackage = Repository.GetElementByGUID(rootPackageGUID)
...
...
Set m_targetPackage = m_targetPackage
...
...
Set package = m_targetPackage.Packages.AddNew(m_packageName,"")
package.Update()
package.Packages.Refresh()

Unfortunately when I call Set package = m_targ.... I get the following error:

Object doesn't support thisproperty or method:'Packages'

Any help gratefully received :-)

[qwerty]

Set m_targetPackage = m_targetPackage

does nothing. You likely want

Set m_targetPackage = m_rootPackage

to add the new package to the root. Else if you want to add to another exiting package use

Set m_targetPackage = Repository.GetElementByGUID(myotherGUID)


Then you can add via

Set package = m_targetPackage.Packages.AddNew(m_packageName,"")


q.

[Geert Bellekens]

Set m_targetPackage = m_targetPackage

does nothing. You likely want

Set m_targetPackage = m_rootPackage

to add the new package to the root. Else if you want to add to another exiting package use

Set m_targetPackage = Repository.GetElementByGUID(myotherGUID)


Then you can add via

Set package = m_targetPackage.Packages.AddNew(m_packageName,"")


q.

Almost there. But you should get the package using

Code: [Select]

Set m_targetPackage = Repository.GetPackageByGuid(myotherGUID)  
This will result in an EA.Package element, which has the .Packages attribute.

If you use GetElementByGUID you get an EA.Element object, which doesn't have .Packages.

Geert

[qwerty]

That happens if you copy/paste without thinking

q.