ResetShapes function on diagram

[SVanSchoonlandt]

I'm trying to run a script that executes the resetshapes function on diagrams so that the new font colour is applied on all the shapes. However the resetshape function always crashes my application with following error message

exception 0xc0000005: EXCEPTION_ACCESS_VIOLATION
try to read at 0x458b05a9
 at address 0x458b05a9 : <Symbol not found>

my script is

oRoot = megaDb()

colDiagram = oRoot.GetSelection("Select [Diagram] Where [Nature] ='BPMNFLOWCHART'")

print colDiagram.Count

i = 1

for each oDiagram in colDiagram

set drw = oDiagram.drawing

drw.ResetShapes

print i

i = i +1

next

I'm running MEGA 2009 SP5 CP11. Any ideas?

thanks

[SVanSchoonlandt · Accepted solution]

I found the solution thanks to the post of Ki6i in the forum. Thanks ki6i 🙂

oDiagram.drawing("RW") I should use, I forgot about that.