import win.ui;
import com; //引用com库
/*DSG{ {*/
mainForm = win.form(text="aardio工程11";right=959;bottom=591)
mainForm.add(
button={cls="button";text="button";left=69;top=138;right=244;bottom=178;z=1}
)
/*}}*/
mainForm.button.oncommand = function(id,event){
var CDOMail;
CDOMail = com.CreateObject("CDO.Message"); //创建对象
CDOMail.From = "shazhitime@163.com";//设置发信人的邮箱
CDOMail.To = "875300764@qq.com"; //设置收信人的邮箱
CDOMail.Subject = "主题:用CDO发送邮件试验"; //设定邮件的主题
CDOMail.TextBody = "文本内容";//使用文本格式发送邮件
CDOMail.HtmlBody = "当您看到此封邮件,表明CDO设置正确" //使用Html格式发送邮件
var STUl = "http://schemas.microsoft.com/cdo/configuration/" //微软服务器网址
wit