link do pliku w mailu - jak go wstawic ??

Pytania, problemy, uwagi związane ze starszymi wersjami Microsoft Outlook 2003, 2002 (XP), 2000, 98

Moderator: Moderatorzy

link do pliku w mailu - jak go wstawic ??

Postprzez beats » Śr 26.10.2005 15:02

czy istnieje jakis sposob na to by w mailu wyslanym do uzytkownika tej samej sieci nie wpisywac recznie linka z dostepem do jakiegos pliku na serwerze tylko zeby to jakos automatycznie zrobic
np plik jest na server1\DATA\kowalski\01.doc
i chce to umiescic to musze wpisac
\\server1\DATA\kowalski\01.doc
czy mozna to jakos autmatycznie wybrac ?
niestety nie znalazlam tego w Outlooku moze ktos wie ???
beats
 
Posty: 1
Dołączył(a): Śr 26.10.2005 14:56

Postprzez m.bednarz » Śr 26.10.2005 15:52

Można, ale tylko w mailach o formacie RTF. Jeśli maila musisz wysłać w innym formacie to możesz zrobić to trochę dookoła. Najpierw napisać maila w formacie RTF, powstawiać pliki jako linki, a potem zmienić format maila na zwykły tekst albo HTML.

Aby wstawić plik jako link w mailu RTF wybierz z menu wiadomości: Wstaw | Plik. Przejdź do szukanego pliku, zaznacz go i kliknij strzałkę obok przycisku Wstaw. Wybierz "Wstaw jako hiperłącze". Ścieżka zostanie wstawiona do treści maila. Nie usuwaj znaków < > otaczających ścieżkę jeśli zawiera spacje.

Zakładam, że nie używasz Word'a jako edytora wiadomości.
m.bednarz
 

Postprzez OShon » N 23.09.2007 18:22

No ;]
Też dochodziłem do tego (bez Worda)...
Jak by komu sie przydało (z poziomu VBA)
Przy użyciu pętelki i tablicy można pobrać nazwy załączników i zapisując je na dysku (we wskazane miejsce) usunąć z wiadomości, pozostawiając ładny link do tych zasobów (nie pozbawiając się treści maila).

Kod: Zaznacz cały
                If oMail.HTMLBody <> "" Then
                            komunikat_w_mailu = komunikat_w_mailu & _
                                    "Orginalny załacznik został usunięty.</BR>" & _
                                    "Jego miejsce przechowywania: " & _
                                    "<A href=" & Chr(34) & Replace(gdzie, " ", "%20") & Chr(34) & _
                                    ">" & gdzie & "</A></BR>" & _
                                    " ____Outlook Vera-Instaler____</BR></BR>"
                Else
                            komunikat_w_mailu = komunikat_w_mailu & vbCrLf _
                                   & "Orginalny załącznik został usunięty." & vbCrLf _
                                   & "Jego miejsce przechowywania: " & gdzie & vbCrLf _
                                   & "file:///" & Replace(gdzie, " ", "%20") & vbCrLf _
                                   & "____Outlook Vera-Instaler____" & vbCrLf
                End If


Gdzie "gdzie" to ścieżka jaką można pobrać lub podstawić pod stałą.
Kod: Zaznacz cały
                    If oMail.HTMLBody <> "" Then
                        oMail.HTMLBody = komunikat_w_mailu & vbCrLf & oMail.HTMLBody
                    Else
                        oMail.Body = komunikat_w_mailu & vbCrLf & oMail.Body
                    End If


Oczywiście w moim przykładnie ograniczę sie do tematu posta.
..Ale jeśli ktoś sam chciałby pokombinować podpowiem że dodanie daty wysyłki do nazwy maila (jako opcja) oraz utworzenia katalogu docelowego o nazwie folderu (opcja) bardzo pomaga.
Pozdrawiam ;]
Obrazek
Oskar Shon - MVP Office Dev. 11/20, 3x MCC, 4/9/22 TechNet
Forum moderator: Outlook.pl | ExcelForum.pl | MSDN dział VBA
Zobacz fajne dodatki: Outlooka, Excela, Worda lub PowerPointa
OShon
 
Posty: 10348
Dołączył(a): Cz 19.10.2006 08:31
Lokalizacja: Projekt autorski VBATools.pl


Powrót do Microsoft Outlook

Kto przegląda forum

Użytkownicy przeglądający ten dział: Brak zidentyfikowanych użytkowników i 2 gości

cron