Script.Add

Add(nFuncID As Long) As Boolean

Parameters

nFuncID As Long

Function ID

Remarks

The Method adds a function to the script package by the corresponding function ID.

Sample:

Sub zenOn_ManageScriptFunctions()
	Dim zScript As Script

	'Initialize the script object with the first script in the scripts object (list)
	Set zScript = MyWorkspace.ActiveDocument.Scripts.Item(0)

	'Add the picSTART function to the script
	zScript.Add (MyWorkspace.ActiveDocument.RtFunctions.Item("picSTART").ID)
	
	'Remove the picSTART function from the script
	zScript.Remove (MyWorkspace.ActiveDocument.RtFunctions.Item("picSTART").ID)
End Sub

See Also

Script