Send email: Difference between revisions

Content added Content deleted
No edit summary
Line 533:
A Unicon-specific solution is:
<lang unicon>procedure main(args)
mail := open("mailto:"||args[1], "m", "Subject : " || args [2],
"X−NoteX-Note: automatically send by Unicon") |
stop("Cannot send mail to ",args[1])
every write(mail , !&input)
close (mail)
end</lang>
 
 
=={{header|Java}}==