| Platform SDK: CDO for Windows 2000 |
The INNTPOnPostFinal interface defines the interface between event sinks written with Microsoft Collaboration Data Objects for Windows 2000 (CDOSYS) and the Network News Transfer Protocol (NNTP) service OnPostFinal event dispatcher.
Method
| Name | Description |
|---|---|
| OnPostFinal | Called by the NNTP event dispatcher on registered OnPostFinal event sinks after a message or news feed has been posted by the NNTP service. |
To implement an NNTP OnPostFinal event sink using CDO, you create and register a local Component Object Model (COM) class that exposes the CDO INNTPOnPostFinal interface.
For more information on writing NNTP OnPostFinal event sinks, see SMTP/NNTP Transport Event Sinks with CDO.
The following code is an example how to use the Active Template Library (ATL) to implement an NNTP OnPostFinal event sink.
#include "StdAfx.h"
#include "sinkproj.h" // contains guids for this class
#include "resource.h"
#import "c:\program files\common files\system\ado\msado15.dll" no_namespace
#import <cdosys.dll> raw_interfaces_only no_namespace
class ATL_NO_VTABLE CMyClass :
public CComObjectRootEx<CComSingleThreadModel>,
public CComCoClass<CMyClass,&CLSID_MyClass>,
public IDispatchImpl<INNTPOnPostFinal,&__uuidof(INNTPOnPostFinal),&LIBID_MyClass>
{
public:
CMyClass() {}
DECLARE_REGISTRY_RESOURCEID(IDR_MyClass)
DECLARE_NOT_AGGREGATABLE(CMyClass)
BEGIN_COM_MAP(CMyClass)
COM_INTERFACE_ENTRY(INNTPOnPostFinal)
COM_INTERFACE_ENTRY(IDispatch)
END_COM_MAP()
// INNTPOnPostFinal
public:
STDMETHOD(OnPostFinal) (/* in */ IMessage* pMsg, /* in,out */ CdoEventStatus* pEventStatus);
private:
// any other custom methods you wish to use
};
CMyClass::OnPostFinal( IMessage* pMsg, CdoEventStatus* pEventStatus)
{
// TODO: add sink code here
}
' Reference to Microsoft ActiveX Data Objects 2.5 Library ' Reference to Microsoft CDO for Windows 2000 Library Implements CDO.INNTPOnPostFinal Public Sub INNTPOnPostFinal_OnPostFinal( ByVal Msg as CDO.Message, pEventStatus as CdoEventStatus ) REM Add sink code here End Sub
<SCRIPT LANGUAGE="VBScript"> Sub INNTPOnPostFinal_OnPostFinal( Msg, EventStatus ) ' code here End Sub </SCRIPT>