[SORTED]Shell Exe help..

[BefunMunkToloGen]

Out of pure boredom I just tried this:

Private Sub Command1_Click()
Dim PFEnvironVar As String
Dim FilePath As String
PFEnvironVar = Environ$("PROGRAMFILES")
FilePath = PFEnvironVar & "\MSN Messenger\mailtmpl.txt"
MsgBox FilePath
Shell FilePath, vbNormalFocus
End Sub

FilePath produces the right directory and everything, but the shell doesn't seem to work... Would like to know what i'm doing wrong

Thanks

Edit: I'm getting "File not found" but I know it exists...