Question

  • Creator
    Topic
  • #2152942

    Forward email to a network share

    Locked

    by sfisher ·

    Does anyone know if it’s possible (and how exactly) to forward/route an email address in Exchange 2003 to a network share folder?

    We’ve used public folders for this but now we need the emails to route to a network folder.

    Also, can just the attachment of an email be routed to a network share?

    TIA!
    Susan

All Answers

  • Author
    Replies
    • #2918584

      Clarifications

      by sfisher ·

      In reply to Forward email to a network share

      Clarifications

    • #2918568

      Go here for your answer…

      by Anonymous ·

      In reply to Forward email to a network share

      http://www.uleth.ca/exchange/

      Please post back if you have any more problems or questions.

      • #2927317

        not exactly what I was looking for

        by sfisher ·

        In reply to Go here for your answer…

        Thanks for the info, however this only shows how to forward an email to another email address. What I need is to forward (route) to a network share folder. OR route the email attachment to a network share folder.

        • #2927213

          You can not send an email to a network share..

          by Anonymous ·

          In reply to not exactly what I was looking for

          It has to be to an email address, if that email address is attached to the folder in question then it could work. But what you are trying to do is sending emails to a shared folder of which does not make sense. You will need to forward the email in question to a email address only, but i will keep on looking for a way on your issue.

          Please post back if you have any more problems or questions.

    • #2927312

      You can copy email anywhere

      by kenone ·

      In reply to Forward email to a network share

      Once an email hits a mailbox (any mailbox) you can send a copy anywhere you like, just create a rule with the rules wizard. I’m not sure about copying the attachment only, you’d have to experiment with that.

      • #2927224

        send copy to an Outlook folder only

        by sfisher ·

        In reply to You can copy email anywhere

        Thanks, I see what you’re talking about but unfortunately it only lets me copy the email to an Outlook folder, not a network shared folder.

        Is there any way to send it out of Outlook to a folder on the network?

    • #2927201

      I have asked around and the only option open to you is..

      by Anonymous ·

      In reply to Forward email to a network share

      Solution is to create forwarding rules only with email accounts and NOT Local or shared folders.

      Please post back if you have any more problems or questions.

      • #2916711

        Peconet – Thanks for the help!

        by sfisher ·

        In reply to I have asked around and the only option open to you is..

        Thanks so much for your time. I pretty much came to the same conclusion – that it’s not possible – but wanted to check with those in the “real world”. Long ago we had a third-party client program that would strip attachments out of an email and copy it to a share, so I may have to look into an updated version of that.

        Thanks again!

        • #2916698

          My brain just went into Overdrive mode.. here is the code you need..

          by Anonymous ·

          In reply to Peconet – Thanks for the help!

          To do just what you need to do with your emails.

          At my company, we’re constantly trying to keep our users’ mail file sizes down. One method we suggest is to extract large attachments out of their mail files and save them on their network drives. There, they can more easily spot and remove the duplicates (which often get sent back and forth in e-mail conversations). The files can then be burned to a CD, if necessary, and the CD given to the user so the network drive doesn’t get full.

          This agent will help make extracting attachments easier. The agent removes all attachments from the selected e-mails and places them into a folder chosen by the user. When the script encounters a filename conflict, it appends an 01, 02, etc., to the end of the filename, so that every attachment is saved and none are overwritten. The agent can be placed into the company’s custom mail template, or it can be added to any individual mail file design.

          To install, just create a new agent called “Mail Tools \\ Extract Attachments From Selected Emails,” or something else appropriate. The agent needs to operate on Selected Documents to work. Copy the code below into the appropriate sections of the agent, save it and then run it from the Actions menu with the mail file.

          (Declarations)
          Dim sDir As String
          Dim s As NotesSession
          Dim w As NotesUIWorkspace
          Dim db As NotesDatabase
          Dim dc As NotesDocumentCollection
          Dim doc As NotesDocument

          Sub Initialize

          Set s = New NotesSession
          Set w = New NotesUIWorkspace
          Set db = s.CurrentDatabase
          Set dc = db.UnprocessedDocuments
          Set doc = dc.GetFirstDocument
          Dim rtItem As NotesRichTextItem
          Dim RTNames List As String
          Dim DOCNames List As String
          Dim itemCount As Integer
          Dim sDefaultFolder As String
          Dim x As Integer
          Dim vtDir As Variant
          Dim iCount As Integer
          Dim j As Integer
          Dim lngExportedCount As Long
          Dim attachmentObject As Variant

          x = Msgbox(“This action will extract all
          attachments from the ” & Cstr
          (dc.Count) & _
          ” document(s) you have selected,
          and place them into the folder of your
          choice.” & _
          Chr(10) & Chr(10) & “Would you like
          to continue?”, 32 + 4, “Export
          Attachments”)
          If x <> 6 Then Exit Sub

          sDefaultFolder = s.GetEnvironmentString
          (“LPP_ExportAttachments_DefaultFolder”)
          If sDefaultFolder = “” Then sDefaultFolder = “F:”
          vtDir = w.SaveFileDialog( False, “Export
          attachments to which folder?”, “All
          files|*.*”, sDefaultFolder, “Choose
          Folder and Click Save”)
          If Isempty(vtDir) Then Exit Sub
          sDir = Strleftback(vtDir(0), “\”)
          Call s.SetEnvironmentVar
          (“LPP_ExportAttachments_DefaultFolder”, sDir)

          While Not (doc Is Nothing)

          iCount = 0
          itemCount = 0
          lngExportedCount = 0
          Erase RTNames
          Erase DocNames

          ‘Scan all items in document
          Forall i In doc.Items

          If i.Type = RICHTEXT Then
          Set rtItem = doc.GetfirstItem(i.Name)
          If Not Isempty(rtItem.EmbeddedObjects)
          Then
          RTNames(itemCount) = Cstr(i.Name)
          itemCount = itemCount +1
          End If
          End If

          End Forall

          For j = 0 To itemCount-1
          Set rtItem = Nothing
          Set rtItem = doc.GetfirstItem(RTNames(j))
          Forall Obj In rtItem.EmbeddedObjects
          If ( Obj.Type = EMBED_ATTACHMENT )
          Then
          Call ExportAttachment(Obj)
          Call Obj.Remove
          Call doc.Save( False, True )
          ‘creates conflict doc if conflict exists
          End If
          End Forall
          Next

          ‘Scan all items in document
          Forall i In doc.Items

          If i.Type = ATTACHMENT Then

          DOCNames(lngExportedCount) =
          i.Values(0)
          lngExportedCount = lngExportedCount + 1

          End If

          End Forall

          For j% = 0 To lngExportedCount-1
          Set attachmentObject = Nothing
          Set attachmentObject =
          doc.GetAttachment(DOCNames(j%))
          Call ExportAttachment(attachmentObject)
          Call attachmentObject.Remove
          Call doc.Save( False, True )
          ‘creates conflict doc if conflict exists
          Next

          Set doc = dc.GetNextDocument(doc)
          Wend

          Msgbox “Export Complete.”, 16, “Finished”

          End Sub

          Sub ExportAttachment(o As Variant)

          Dim sAttachmentName As String
          Dim sNum As String
          Dim sTemp As String

          sAttachmentName = sDir
          & “\” & o.Source
          While Not (Dir$(sAttachmentName, 0) = “”)
          sNum = Right
          (Strleftback(sAttachmentName, “.”), 2)
          If Isnumeric(sNum) Then
          sTemp = Strleftback(sAttachmentName, “.”)
          sTemp = Left(sTemp, Len(sTemp) – 2)
          sAttachmentName = sTemp
          & Format$(Cint(sNum) + 1, “##00”) & _
          “.” & Strrightback(sAttachmentName, “.”)
          Else
          sAttachmentName =
          Strleftback(sAttachmentName, “.”) & _
          “01.” & Strrightback(sAttachmentName, “.”)
          End If
          Wend

          Print “Exporting ” & sAttachmentName
          ‘Save the file
          Call o.ExtractFile( sAttachmentName )

          End Sub
          ………………………………….
          Happy computing. 🙂

          Please post back if you have any more problems or questions.

    • #2435312

      New solution for an old thread

      by sean.mcinnes ·

      In reply to Forward email to a network share

      I came across your thread and think I have a solution for you. Copying emails into network folders as they are received is possible with eFiler , but please contact me if you would like to know how to do it and I can explain further.

    • #2434464

      Save emails to network folders with eFiler

      by sean.mcinnes ·

      In reply to Forward email to a network share

      Hi Susan, we have a product called eFiler that saves emails from Outlook into network folders. You can use this along with the eFiler Cloud Sync feature and Outlook rules to automatically file emails into network folders. We are currently working on a rules feature which will further enhance this and allow you to deploy eFiler (and Outlook) rules to all machines across your network. Please message me or make contact if you want more information but feel free to download the free trial.
      Sean

Viewing 5 reply threads