Code: Select all
sMailAddress.s = "xxxxx@xxxxx.xx"
sMailSubject.s = "Test"
sMailBody.s = "<html><body><p>Click here for more information: <a href=" + "%22" + "http://www.testsite.com/" + "%22" + ">Test Software</a></body></html>"
Tmp_Mail = ShellExecute_(0, "Open", "mailto:" + sMailAddress + "?subject=" + sMailSubject + "&body=" + sMailBody, 0, 0, #SW_SHOWNORMAL)
Little_man