Powerpoint VisualBasic Script

Sub openPre()
    Presentations.Open FileName:="C:\Time.ppt", ReadOnly:=msoFalse
End Sub
'Saving a Presentation