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