PureBasic Forums - English

Posted: **Tue Jul 18, 2017 3:22 pm**

Greetings!
Simple way to send mail using your own mail manager client.

Procedure MailTo(address.s, subject.s, body.s)
;open your mail manager
  Protected ch.s="mailto:"+
                 address+
                 "?&subject="+ReplaceString(subject," ","%20")+
                 "&body="+ReplaceString(ReplaceString(body," ","%20"),Chr(13),"%0D%0A")
  RunProgram(ch)
EndProcedure

Posted: **Tue Jul 18, 2017 8:40 pm**

doesnt seem to work on my system..

Linux 4.9.35-1-MANJARO

Posted: **Tue Jul 18, 2017 11:05 pm**

Changed code:

Code: Select all

Procedure MailTo(address.s, subject.s, body.s)
;open your mail manager
  Protected ch.s="mailto:"+
                 address+
                 "?subject="+ ReplaceString(subject," ","%20")+
                   ^
                    
                 "&body=" + ReplaceString(ReplaceString(body, " ","%20"), Chr(13), "%0D%0A")
  RunProgram(ch)
EndProcedure

PureBasic Forums - English

External mail send [All OS]

External mail send [All OS]

Re: External mail send [All OS]

Re: External mail send [All OS]