Macro for Ms Powerpoint 2003 on autosave

[lkh11lkh]

hi

i encountered problem n error when i insert code into macro in ms powerpoint 2003.

Sub AutoOpen()
    AutoSaving
End Sub
Sub AutoSaving()
    Application.OnTime Now + TimeValue("00:00:10"), "Saving"
End Sub
Sub Saving()
    ThisPresentation.Save
    AutoSaving
End Sub

Application.OnTime() is supported by Microsoft Excel. It is not available with PowerPoint. i should use Windows APIs SetTimer() and KillTimer(). but i m very new in vb script

is there anyone can help me on this.
please help.
thanks