C++ ADSI 增加IIS脚本映射

long CreateMimeType(/*[in]*/ const CMimeType& objCMimeType,/*[out]*/wstring& strErr) 
{ 
IADs* ptrADs= 0; 
HRESULT hr= S_FALSE; 
CComPtr<IISMimeType>ptrMimeType=0;
 _variant_t vntMimeMap; 
 //Reinitialise the error code 
 m_lError= 0;
  m_wstrMethodName=L"CreateMimeType"; 
  strErr=SUCCESS; 
  try {
  //Get the handle to the MimeMap     
  hr = ADsGetObject(L"IIS://LocalHost/MimeMap",IID_IADs,(void**) &ptrADs);    
  if(FAILED(hr))     
  {    
     
  strErr = ADS_GETOBJECT_FAILED;    
     
  throw hr;    
  }   
      
  hr = ptrADs->QueryInterface(IID_IISMimeType, (void **)&ptrMimeType );    
  if(FAILED(hr))     
  {    
  }   
      
  //Load the property MimeMap    
  hr = ptrADs->GetEx(L"MimeMap",&vntMimeMap);   
      
  SAFEARRAY* pArrMimeMap ;    
  //point the safearray to the array inside the variant..    
  pArrMimeMap = vntMimeMap.parray;   
      
  //*******************************************************    
  long lHigh;    
  SAFEARRAY *psa;   
     
   // The safearray    
  SAFEARRAYBOUND rgsabound[1];   
     
   // A one dimensional array    
  long * pData;    
  long lValue, lIndex;   
      
  _variant_t vntNewMimeType;   
      
  SafeArrayGetUBound(pArrMimeMap, 1, &lHigh);   
      
  rgsabound[0].lLbound=0;   
     
   // With lower bound 0;    
  rgsabound[0].cElements=lHigh + 1;    
  psa=SafeArrayCreate(VT_BSTR, 1, rgsabound);   
      
  //Copy the existing data into the new one...    
  SafeArrayCopyData(pArrMimeMap,psa);   
      
  //set the properties of the new mimetype object...    
  ptrMimeType->put_Extension((_bstr_t)objCMimeType.GetMimeExtension().c_str());    
  ptrMimeType->put_MimeType((_bstr_t)objCMimeType.GetMimeExtension().c_str());   
      
  //assign the mime type object to the variant...it is of type IDispatch...    
  vntNewMimeType.pdispVal = ptrMimeType;   
      
  //put the variant in safe array...    
  lIndex = lHigh-1;   
      
  SafeArrayPutElement(psa,&lHigh,(void*)&vntNewMimeType);   
      
  //now return the newly created safe array in the variant...    
  vntMimeMap.parray=psa;   
      
  //save the data..    
  hr= ptrADs->PutEx(ADS_PROPERTY_UPDATE,L"MimeMap",vntMimeMap);    
  if(FAILED(hr))     
  {    
     
  strErr = GRANT_BY_DEFAULT_FAILED;     
     
  //LOG_ERROR_MESSAGE(m_wstrClassName,m_wstrMethodName,GRANT_BY_DEFAULT_FAILED);    
     
  throw hr;    
  }   
      
  //********************************************************   
   }//end try CATCH_BLOCK1(m_lError,strErr)    
  //delete all the pointers...    
  //TRACE_END(m_wstrClassName,m_wstrMethodName)    
  return m_lError ; }