Scripts

Remarks:

This object manages scripts.

Properties:

Methods:

DynProperties:

Samples:

Sub zenOn_ScriptsExample()
	'************ Use this script in the editor ************

	Dim zScripts As Scripts
	Dim i As Integer

	'Initialize the scripts object with the current scripts
	Set zScripts = MyWorkspace.ActiveDocument.Scripts

	'For every script available in the scripts object...
	For i = 0 To zScripts.Count - 1
		'...output the name
		Debug.Print i + 1 & ". Script: " & zScripts.Item(i).Name
	Next i

End Sub