CimResourceList.New (method)

Creates a new resource.
Syntax: Set CimResource = object.New ( ResourceID )
ResourceID As String - Name of the new resource
Description: CimResourceList.New returns a new CimResource object. This is the method to call to create a new resource. You must call CimResourceList.Save to save the resource to the project.


Dim project As CimProject
Set project = CreateObject("CimProject")
project.OpenLocalProject "d:\classes\classes.gef"
Dim resources As CimResourceList
Dim resource As CimResource
Set resources = project.Resources
Set resource = resources.New("AREA1")
resource.Description = "Area 1"
resources.Save resource, False