关于PUBLIC FOLDER邮件规则
我的一个客户端用OUTLOOK作了一些邮件规则。都是关于PUBLIC FOLDER的,当接到一个邮件时就转发到PUBLIC FOLDER。现在要离开一段时间,但是这些规则又要继续运行。有什么好的解决办法没?我看了一下,EXCHANGE编程,是不是仅这个办法才能解决啊。 请原谅我抢沙发.不过,说真的不是很明白你要做什么,撤消RULE吗?
[ 本帖最后由 jackey-ho 于 2008-5-14 09:39 编辑 ] 不是撤消,是RULE要用。但是有什么别的办法能够起到一样的作用没?我看文档说,只要是关于公共文件夹的规则都是属于客户端的,不是服务端的,不打开OUTLOOK的话,这个规则就不会起作用。 个人认为:
EX本身只是集中收发,然后分发给各用户,至于用户的各项设置,只能用户自己根据自己的需要,以及客户端所提供的功能在客户端进行设置. 但确实只要你设置了规则,不是与公共文件夹有关的。就算是你不作登陆,也是起作用的 OUTLOOK设置RULE,用OWA打开还是可以按OUTLOOK设定的规则使用,如果换其它客户端这个没试过.
OUTLOOK设置的是OUTLOOK本身,不能更改EX用户设置吧. 没错OWA也支持建立规则。 谢谢回复。最后还是通过EVENTSINK来解决的。不过没有办法实现中文
Sub IEventIsCacheable_IsCacheable()
'To implement the interface, and return S_OK implicitly
End Sub
Sub ISMTPOnArrival_OnArrival(ByVal Msg, EventStatus)
Dim SubjectToFind
Dim SaveFolder
Dim MsgStream
Dim iFound
SubjectToFind="words"
SaveFolder="c:\"
iFound=InStr(1,Msg.Subject,SubjectToFind,1)
if iFound > 0 then
set MSGStream= Msg.Getstream
SaveFile=SaveFolder & Msg.Senton & iFound & msg.subject & ".eml"
SaveFile=Replace(SaveFile, "/", "_")
SaveFile=Replace(SaveFile, " ", "_")
SaveFile=Replace(SaveFile, ":", "_",3)
MsgStream.SaveToFile savefile,2
MsgStream.Close
Set MsgStream = Nothing
set objFSO = CreateObject("Scripting.FileSystemObject")
objFSO.MoveFile "c:\*.eml" , "M:\"
end if
End Sub
</SCRIPT>
页:
[1]
