2012-06-27 33 views
1

我們正在從一臺服務器遷移到另一臺服務器,並使用VBA腳本保存正在工作的附件已放棄新服務器上的重影。規則保存傳入電子郵件上的附件不工作在全新安裝的Outlook上

這是全新安裝的Outlook。

腳本如下:

Public Sub saveAttachmentAll(itm As Outlook.MailItem) 
Dim objAtt As Outlook.Attachment 
Dim saveFolder As String 

saveFolder = "D:\www\phones" 
For Each objAtt In itm.Attachments 

    objAtt.SaveAsFile saveFolder & "\" & objAtt.DisplayName 

    Set objAtt = Nothing 

    Next 

End Sub 

我測試過的Outlook規則和Outlook正在執行就可以了其他的行動,但這個腳本不能正常工作!

+0

文件夾'D:\ www \ phones'是否存在? – stuartd

+0

是的,它裏面還有其他文件。這是全新的Outlook安裝,那麼有什麼我需要做的,以允許腳本在Outlook本身運行? – franglais

回答

1

所以事實證明,我必須禁用宏安全(這不是最好的)並重新啓動Outlook。相當簡單,但我一直在撓頭......!

相關問題