Excel客户端到服务器端

下午好。

我工作的YMCA正在考虑在我们的会员服务部门进行无纸化设置。 我们将使用Adobe Sign来获取签名的文档,然后将.PDF文件发送到默认的电子邮件地址。

我发现一个客户端VBA脚本自动发送附件到一个硬盘文件夹,但我正在寻找如何将其更改为服务器端的帮助。

客户端VBA是:

Public Sub saveAttachtoDisk(itm As Outlook.MailItem) Dim objAtt As Outlook.Attachment Dim saveFolder As String saveFolder = "c:\temp\" For Each objAtt In itm.Attachments objAtt.SaveAsFile saveFolder & "\" & objAtt.DisplayName Set objAtt = Nothing Next End Sub 
  1. 我怎样才能得到这个服务器端,所以它发送到networking文件夹?