set growl = WScript.CreateObject("Growl.COM.Connector")
growl.ConfigureLocal ""		' you must call ConfigurLocal() or ConfigureRemote before .Register or .Notify will work

' create the sending app information
dim appName
appName = "VBScript Test"
set app = WScript.CreateObject("Growl.COM.Application")
app.Name = appName

' register
dim types(0)
set types(0) = WScript.CreateObject("Growl.COM.NotificationType")
with types(0)
 .Name = "notify"
 .DisplayName = "notify"
 .Enabled = True
end with
growl.Register2 (app), (types)	' the extra () are required for some reason (related to COM Interop, but i am not sure why)

WScript.Sleep 500

' send notification
set n = WScript.CreateObject("Growl.COM.Notification")
n.ApplicationName = "Firefox"
n.Title = "test"
n.Text = "test"
n.Type = "test"

Set c = nothing
'Set c = WScript.CreateObject("Growl.COM.CallbackContext")	' you can optionally set up a callback object as well
'c.Url = "http://www.google.com"

growl.Notify appName, (n), (c)	' the extra () are required for some reason (related to COM Interop, but i am not sure why)

WScript.Sleep 500

WScript.Echo("notification sent")