After reading your post again I realized you wanted to create code.
Here is what I came up with:
Private Sub CommandBrowse_Click()
Me.Photo.SetFocus 'Set Focus to the Field Named "Photo".
SendKeys "%{I}", True 'Send Keystroke ALT I for Insert
SendKeys "{O}", True 'Send Keystroke O for Object
End Sub
This will work from an OnClick Event Procedure for a CommandButton.
Ruel