set sys = createobject("UltraMon.System")
sys.SavePositions 1