since you are doing it on a text change object you don't need a lot of that.
dim sd as xpSceneDirector
scene.GetSceneDirectorByName("Change", sd)
sd.PlayRange(0, 60)
------------------------------
Simon Redmile
Senior Graphic Programmer & Designer
Ross Video
Bristol United Kingdom
------------------------------