IKE>STDMETHODIMP pmpPMPostProcessor::put_SourceFileDocument(IDispatch* a_p_idisp)
IKE>{
IKE>  HRESULT hr;

IKE>  a_p_idisp->QueryInterface(
IKE>    MSXML2::IID_IXMLDOMDocument2,
IKE>    (void**)&m_cp_xml_doc);

IKE>  //////////////
IKE>  CComPtr<MSXML2::IXMLDOMNode> m_comptr_current_node;

IKE>  // ЭТО НЕ РАБОТАЕТ !!!
IKE>  hr = m_cp_xml_doc->selectSingleNode(CComBSTR(L"/PROGRAM"),&m_comptr_current_node); // Строка должна быть BSTR
  
IKE>  // ЭТО РАБОТАЕТ!!!
IKE>  BSTR bstr_xml;
IKE>  m_cp_xml_doc->get_xml(&bstr_xml);

IKE>  //////////////

IKE>  return hr;
IKE>}
IKE>