Set oWSH        = CreateObject( "WScript.Shell" )
Set oARGS       = WScript.Arguments
imgname         = oARGS( 0 )
width           = oARGS( 1 )
height          = oARGS( 2 )
Set oAB         = CreateObject( "Broker.Application" )
Set OAW         = oAB.ActiveWindow
rc              = OAW.ExportImage( imgname, width, height )