1'******發送人在郵箱中顯示中文等價名****** 2???? Dim item As NotesItem 3???? Dim v As Variant 4???? Dim s As String 5???? Set item = maildoc.AppendItemValue( "$LangFrom", "zh-CN" )??'給$LangFrom賦值 6???? s="@UserNamesList" 7???? v=Evaluate(s) 8???? maildoc.AltFrom=v(1)???????? '給AltFrom賦值( CN=等價名/O=等價組織 ) 9'******發送人在郵箱中顯示中文等價名******

總結

以上是生活随笔為你收集整理的发送邮件时，如何附带上中文等价名信息的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。