Option Explicit

Dim Tracer
Set Tracer = CreateObject("Zaks.Trace")

Tracer "This is a debug output from script (1)."
Tracer.Trace "This is a debug output from script (2)."

Set Tracer = Nothing