Creates a new resource. | |
Syntax: | Set CimResource = object.New ( ResourceID ) |
Parameters: |
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. Examples 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 |