Jak přidat text vyjadřující zřeknutí se práv v jazyka odchozí zprávy SMTP

Překlady článku Překlady článku
ID článku: 317327 - Produkty, které se vztahují k tomuto článku.
Microsoft Visual Basic Scripting Edition verzi tohoto článku naleznete 317680.
Rozbalit všechny záložky | Minimalizovat všechny záložky

Na této stránce

Úvod

Tento podrobný článek popisuje způsob použití SMTP jímky událostí přenosu odchozích e-mailových zpráv SMTP přidat text vyjadřující zřeknutí se práv.

Vytvoření jímky událostí

  1. Vytvořit nové ActiveX DLL jazyka Microsoft. Název projektu SMTPEventSink a název modulu Dementi.
  2. Ve skupinovém rámečku Project odkazy přidat Microsoft CDO pro knihovnu Exchange 2000 a přidat knihovnu COM Server Extension objekty.
  3. Vložte následující kód v modulu:
    Dim TextDisclaimer As String
    Dim HTMLDisclaimer As String
    
    Implements IEventIsCacheable
    Implements CDO.ISMTPOnArrival
    
    Private Sub IEventIsCacheable_IsCacheable()
        'Just returns S_OK.
    End Sub
    
    Private Sub Class_Initialize()
      'TODO: Replace the sample disclaimer text with your own text.
      TextDisclaimer = vbCrLf & "DISCLAIMER:" & vbCrLf & "Sample Disclaimer Text."
      HTMLDisclaimer = "<p></p><p>DISCLAIMER:<br>Sample Disclaimer Text"
    End Sub
    
    Private Sub ISMTPOnArrival_OnArrival(ByVal Msg As CDO.IMessage, EventStatus As CDO.CdoEventStatus)
        If Msg.HTMLBody <> "" Then
            Dim szPartI As String
            Dim szPartII As String
            Dim pos As Integer
            
            'Search for the "</body>" tag and insert the disclaimer before that tag.
            pos = InStr(1, Msg.HTMLBody, "</body>", vbTextCompare)
            szPartI = Left(Msg.HTMLBody, pos - 1)
            szPartII = Right(Msg.HTMLBody, Len(Msg.HTMLBody) - (pos - 1))
            Msg.HTMLBody = szPartI + HTMLDisclaimer + szPartII
        End If
    
        If Msg.TextBody <> "" Then
            Msg.TextBody = Msg.TextBody & vbCrLf & TextDisclaimer & vbCrLf
        End If
        
        'Commit the content changes to the transport ADO Stream object.
        Msg.DataSource.Save
        EventStatus = cdoRunNextSink
    End Sub
    					
  4. Ukázkové zřeknutí text nahradit vlastním textem zřeknutí a sestavit DLL.

Registrace jímky událostí

Registrace jímky událostí použijte soubor Smtpreg.vbs nainstalované Exchange software development kit (SDK).
  1. Na příkazovém řádku vyhledejte složku \Exchange SDK\SDK\Support\CDO\Scripts a zadejte následující: cscript smtpreg.vbs / add 1 OnArrival SMTPDisclaimer SMTPEventSink.Disclaimer "pošty from=*@your-domain-here.com"

    Tento příkaz úspěšný, obdržíte zprávu o úspěšné operaci, která je generována skript.
  2. Chcete-li zrušit registraci této události, zadejte následující: cscript smtpreg.vbs/remove 1 SMTPDisclaimer OnArrival
Další informace o správě vazeb událostí na webu Microsoft Developer Network (MSDN):
http://msdn2.microsoft.com/en-us/library/ms526620.aspx

Test jímky událostí

Test jímky událostí odeslat e-mailové zprávy SMTP příjemce, který je externí organizace. Příjemce obdrží upravenou zprávu s textem zřeknutí přidán na konec zprávy.

Poznámka: Pokud používáte klienta MAPI, jako je například Microsoft Outlook odeslat zprávu elektronické pošty příjemce neobdrží upravené e-mailové zprávy. Toto je, protože e-mailové zprávy odeslané pomocí MAPI není ve formátu SMTP při aktivaci události přenosu SMTP e-mailové zprávy. Kód události provedené změny tedy není trvalé.

Odkazy

Další informace získáte v následujícím článku znalostní báze Microsoft Knowledge Base:
273233Nelze změnit obsah zprávy MAPI ve CDO SMTP jímky událostí

Vlastnosti

ID článku: 317327 - Poslední aktualizace: 30. listopadu 2007 - Revize: 8.7
Informace v tomto článku jsou určeny pro produkt:
  • Microsoft Exchange Server 2003 Standard Edition
  • Microsoft Exchange Server 2003 Enterprise Edition
  • Microsoft Exchange 2000 Server Standard Edition
  • Collaboration Data Objects for Exchange 2000
  • Microsoft Collaboration Data Objects 2.0 na těchto platformách
    • Microsoft Windows Server 2003, Standard Edition (32-bit x86)
    • the operating system: Microsoft Windows 2000
Klíčová slova: 
kbmt kbhowtomaster KB317327 KbMtcs
Strojově přeložený článek
Důležité: Tento článek byl přeložen pomocí software společnosti Microsoft na strojový překlad, ne profesionálním překladatelem. Společnost Microsoft nabízí jak články přeložené překladatelem, tak články přeložené pomocí software na strojový překlad, takže všechny články ve Znalostní databázi (Knowledge Base) jsou dostupné v češtině. Překlad pomocí software na strojový překlad ale není bohužel vždy dokonalý. Obsahuje chyby ve skloňování slov, skladbě vět, nebo gramatice, podobně jako když cizinci dělají chyby při mluvení v češtině. Společnost Microsoft není právně zodpovědná za nepřesnosti, chyby nebo škody vzniklé chybami v překladu, nebo při použití nepřesně přeložených instrukcí v článku zákazníkem. Společnost Microsoft aktualizuje software na strojový překlad, aby byl počet chyb omezen na minimum.
Projděte si také anglickou verzi článku:317327

Dejte nám zpětnou vazbu

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com