邮箱中显示中文等价名代码,Domino代码库,德仔网

代码语言

代码分类

【Domino】邮箱中显示中文等价名

作者:人豪 / 发布于2015/1/22/ 1515


	Dim item As NotesItem
	 Dim v As Variant
	 Dim s As String
	 Set item = maildoc.AppendItemValue( "$LangFrom", "zh-CN" ) '给$LangFrom赋值
	 s="@UserNamesList"
	 v=Evaluate(s)
	 maildoc.AltFrom=v(1) '给AltFrom赋值( CN=等价名/O=等价组织 )

　　

试试其它关键字

　中文等价名　

同语言下

可能有用的

人豪贡献的其它代码(2)

Copyright © 2004 - 2024 dezai.cn. All Rights Reserved 站长博客粤ICP备13059550号-3