Open online email with attachment

How can i open an online email program, yahoo, gmail, etc with a rtf attachment
I open a web page like this:

Code:

---

Private Sub Label4_Click()
    Dim webpage As String
    Dim ret&   
   
      webpage = "http://www.Mywebsite.com/" '   
   
      ret& = ShellExecute(Me.hwnd, "Open", webpage, "", gMyPath, 2)
     
    End Sub

---

can this be done?