shijiang1130 发表于 2008-5-14 09:17:19

关于PUBLIC FOLDER邮件规则

我的一个客户端用OUTLOOK作了一些邮件规则。都是关于PUBLIC FOLDER的,当接到一个邮件时就转发到PUBLIC FOLDER。现在要离开一段时间,但是这些规则又要继续运行。有什么好的解决办法没?我看了一下,EXCHANGE编程,是不是仅这个办法才能解决啊。

jackey-ho 发表于 2008-5-14 09:37:30

请原谅我抢沙发.
不过,说真的不是很明白你要做什么,撤消RULE吗?

[ 本帖最后由 jackey-ho 于 2008-5-14 09:39 编辑 ]

shijiang1130 发表于 2008-5-14 09:43:41

不是撤消,是RULE要用。但是有什么别的办法能够起到一样的作用没?我看文档说,只要是关于公共文件夹的规则都是属于客户端的,不是服务端的,不打开OUTLOOK的话,这个规则就不会起作用。

jackey-ho 发表于 2008-5-14 11:01:28

个人认为:
EX本身只是集中收发,然后分发给各用户,至于用户的各项设置,只能用户自己根据自己的需要,以及客户端所提供的功能在客户端进行设置.

shijiang1130 发表于 2008-5-14 11:08:52

但确实只要你设置了规则,不是与公共文件夹有关的。就算是你不作登陆,也是起作用的

jackey-ho 发表于 2008-5-14 11:35:03

OUTLOOK设置RULE,用OWA打开还是可以按OUTLOOK设定的规则使用,如果换其它客户端这个没试过.
OUTLOOK设置的是OUTLOOK本身,不能更改EX用户设置吧.

钉子 发表于 2008-5-15 23:26:33

没错OWA也支持建立规则。

shijiang1130 发表于 2008-5-27 09:56:55

谢谢回复。最后还是通过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]
查看完整版本: 关于PUBLIC FOLDER邮件规则