访问个人邮箱中的未读邮件代码,Domino代码库,德仔网

代码语言

代码分类

【Domino】访问个人邮箱中的未读邮件

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


	Dim session As New NotesSession
	Dim db As NotesDatabase
	Dim view As NotesView
	Dim vc As NotesViewEntryCollection
	
	'you can choose other db, including mail db
	Set db = session.CurrentDatabase
	
	'choose the right view
	Set view = db.GetView("By Category")
	'Function of GetAllUnreadEntries returns a collection contains all unread entries in the view.Correspondingly, there is a function of 'GetAllReadEntries in lotutscript
	Set vc = view.GetAllUnreadEntries()
	
	'you can iterate the collection and do whatever you like.
	Call vc.PutAllInfolder("To Be Read")

试试其它关键字

　未读邮件　

同语言下

.LotusDomino页面自动注册用户
.多 Notes 文档中附件批量汇总到 Notes 文档中
.多 Notes 文档中附件批量导出到本地系统
.使用lotusscript获得群组中的用户列表_lotus notes
.利用程序增加角色
.关闭计算机
.检验数字域
.利用程序获取计算机名称及登陆用户名
.清理收件夹的代理Code for CleanupInbox agent
.邮箱中显示中文等价名

可能有用的

.C#实现的html内容截取
.List 切割成几份工具类
.SQL查询多列合并成一行用逗号隔开
.一行一行读取txt的内容
.C#动态修改文件夹名称(FSO实现，不移动文件)
.c# 移动文件或文件夹
.c#图片添加水印
.Java PDF转换成图片并输出给前台展示
.网站后台修改图片尺寸代码
.处理大图片在缩略图时的展示

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

.邮箱中显示中文等价名
.访问个人邮箱中的未读邮件