C / C++ / MFC

MSHTML::IHTMLDocument2Ptr spDoc(m_ctlWeb1.GetDocument());
if (spDoc)
{
    IDispatchPtr spDisp(spDoc->GetScript());
    if (spDisp)
    {
        OLECHAR FAR* szMember = L"Populate";
        DISPID dispid;

        HRESULT hr = spDisp->GetIDsOfNames(IID_NULL, &szMember, 1, LOCALE_SYSTEM_DEFAULT, &dispid);
        if (SUCCEEDED(hr)) // found function
        {
            COleVariant vtResult;
            static BYTE params[] = VTS_BSTR;

            COleDispatchDriver dispDriver(spDisp);

            dispDriver.InvokeHelper(dispid, DISPATCH_METHOD, VT_VARIANT, (void*)&vtResult, params, strXML);

            BOOL bSuccess = vtResult.boolVal;
        }
    }
}

// create on page load to stop expensive load and unload of the XML Document COM object
var oXmlDoc = new ActiveXObject("MSXML2.DOMDocument.4.0");
function Populate(strXML)
{
   bSuccess = false;
   // create an xml document to load the XML into
   if (oXmlDoc)
   {
       oXmlDoc.async = false;
       oXmlDoc.resolveExternals = false;
       if (oXmlDoc.loadXML(strXML))
       {
           // success, now parse to see what we need to update
           var oNode = oXmlDoc.selectSingleNode("/update/field");
           if (oNode)
           {
               // get the element in the page
               var elField = document.getElementById("idField");
               if (elField) elField.innerText = oNode.innerText;
               bSuccess = true;
           }
       }
   }
   return bSuccess;
}

<br />
  ShellExecute(NULL, "Open",pathName,0,0,0);<br />

<br />
void CFindOwnerDlg::OnOK() <br />
{<br />
	 char szFilters[]=<br />
      "MyType Files (*.*)|All Files (*.*)|*.*||";<br />
<br />
	// TODO: Add extra validation here<br />
 // Create an Open dialog<br />
   CFileDialog fileDlg (TRUE, "*", "*.*",<br />
      OFN_FILEMUSTEXIST| OFN_HIDEREADONLY, szFilters, this);<br />
   <br />
   // Display the file dialog. When user clicks OK, fileDlg.DoModal() <br />
   // returns IDOK.<br />
   if( fileDlg.DoModal ()==IDOK )<br />
   {<br />
	ULONG uSizeSD ;        // Buffer size to store Owner's SID<br />
    PSID pOwner = NULL ; //            Pointer to the Owner's SID<br />
    char szName[MAX_PATH] ;// String           Name of the file owner<br />
    char  szDomain_name[MAX_PATH] ;// Name of the first domain for the owner<br />
<br />
	// use of MAX_PATH should be removed and replaced with memory allocation <br />
<br />
   ULONG uName_len ; //        Required length for the owner name<br />
   ULONG domain_len; //        Required length for the domain name<br />
   char *sdBuf; //          Buffer for Security Descriptor<br />
   SID_NAME_USE  deUse ; //            Pointer to a SID_NAME_USE enumerated<br />
<br />
<br />
	int 	bSuccess = 0;<br />
      szName[0] = 0;<br />
      szDomain_name [0] = 0;<br />
      uName_len = 0;<br />
      domain_len = 0;<br />
     // *pOwner = 0;<br />
 <br />
BOOL fOwnerExists = FALSE;<br />
<br />
<br />
<br />
	   CString pathName = fileDlg.GetFileName ();<br />
<br />
<br />
  bSuccess = GetFileSecurity( <br />
           pathName, <br />
           OWNER_SECURITY_INFORMATION, <br />
           0, <br />
           0, <br />
           &uSizeSD);<br />
  // its should fial here as the buffer is not big enough<br />
  if (bSuccess != 0) <br />
         MessageBox ("It should not happen as it should be an error  ");     <br />
  else<br />
  {<br />
	  sdBuf = new char [uSizeSD];<br />
<br />
	   bSuccess = GetFileSecurity( <br />
           pathName, <br />
           OWNER_SECURITY_INFORMATION, <br />
           sdBuf, <br />
           uSizeSD, <br />
           &uSizeSD);<br />
<br />
	   bSuccess = GetSecurityDescriptorOwner(sdBuf, &pOwner, &fOwnerExists);<br />
<br />
	   // this first run is to find out about the length<br />
<br />
	bSuccess = LookupAccountSid (NULL /*Empty for Local Host*/, pOwner /* Sid To Look info for*/,szName,  &uName_len, szDomain_name, &domain_len,  &deUse);<br />
	// the second one will tell them the size	<br />
	bSuccess = LookupAccountSid (NULL /*Empty for Local Host*/, pOwner /* Sid To Look info for*/,szName,  &uName_len, szDomain_name, &domain_len,  &deUse);<br />
	<br />
	if (bSuccess == 0) <br />
         MessageBox ("Error ");    // use get last error    <br />
    else<br />
  {<br />
	  CString msg;<br />
	  msg = szDomain_name ;<br />
	  msg= msg +  "\\";<br />
	msg =msg + szName;<br />
      MessageBox (msg);<br />
  }<br />
  }<br />
   }<br />
<br />
<br />
<br />
// P.S. remove allocated memeory <br />
<br />
}<br />