调用OUTLOOK EXPRESS也可以,但要求由代码指定默认文件(HTML文件)作为邮件正文,并指定默认文件作为附件

解决方案 »

  1.   

    Set myOlApp = CreateObject("Outlook.Application")
    Set myItem = myOlApp.CreateItem(olMailItem)
    myItem.HTMLBody = "<html>...</html>" //可以把那个html读出来添在这里
    myItem.Send
      

  2.   

    kalling(kalling) :您的代码能用吧?
    如果可以,一定加分!
      

  3.   

    我的代码肯定能用,关于附件,可以用myItem.Attachments(是一个集合)
    具体的函数参考可以去msdn,office development
      

  4.   

    在你的邮件头里加上:
    Content-Type: text/html; charset="gb2312"然后在正文里把html文本发出去就是了
      

  5.   

    TO: yiwei(垃圾)
    请你代码详细点儿,OK?
    @_@
      

  6.   

    我已经搞定如何发送HTML邮件正文,明天奉献代码,需要者给分