Mutt: post su facebook

[andy60]

Codice: [Seleziona]

Public Sub btPost_Click()

  Dim hfile As Stream
  Dim myemail As Process
  
  hFile = Open Application.Path & "/temp.txt" For Create
  Print #hFile, "" & TextEdit1.Text & ""
 
  myemail = Shell ("mutt - s 'Diario myZone4-" & Application.Version & "' " & hset["host/facebook"] & " < " & Application.Path & "/testo.txt")
  Message("Messaggio inviato a Facebook.")

End

non riesco a postare oltre al titolo su facebook. Nemmeno da linea di comando. Sbaglio la sintassi?

mi baso su questo post:
http://robrota.com/mail-da-riga-di-comando