关于编码的方式控制IIS问题总结！

绕了很大一个圈子，终于搞定了，最终还是采用比较成熟的adsi技术实现，之前总监发的通过CComPtr <IMSAdminBase>智能指针方式控制IIS只能在XP下，到了我用的WINB2003下就是不好用，可能是XP下的IIS5.1与Win2003下的IIS6.0 安全机制不同吧，没有做深入研究，转ADSI方式，顺利通过！小庆祝一下，等把代码重构完后发行来作为经验总结吧，免得以后再找了。

…………………………………………………………………………………………………………………………………………………

…………………………………………………………………………源码………………………………………………………………

…………………………………………………………………………………………………………………………………………………

interface.h

//interface.h #pragma once interface IISController { // 修改根目录 virtual bool ChangeRoot(CString) = 0; // 文档->启用默认内容文档 ，多个文件中间用逗号分隔例如：index.aspx,default.html virtual bool SetDefaultFile(CString) = 0; };

 

Adsi.h

#pragma once #include "Interface.h" #include <windows.h> #include <Iads.h> #include <comdef.h> #include <tchar.h> #include <stdio.h> #include <Adshlp.h> #pragma comment(lib,"ActiveDS") #pragma comment(lib,"adsiid") class CAdsi : public IISController { public: CAdsi(void); ~CAdsi(void); public: bool ChangeRoot(CString strPath); bool SetDefaultFile(CString); private: bool GetIIsWebVirtualDirIADs(void); private: IADsContainer* pIADsContainer; IADs* pIADs; IDispatch* pIDispatch; IADs* pIWebVirDir; };

 

Adsi.cpp

#include "StdAfx.h" #include "Adsi.h" CAdsi::CAdsi(void) { CoInitialize(NULL); } CAdsi::~CAdsi(void) { if(pIDispatch != NULL) { pIDispatch->Release(); } if(pIADs != NULL) { pIADs->Release(); } if(pIADsContainer != NULL) { pIADsContainer->Release(); } if(pIWebVirDir != NULL) { pIWebVirDir->Release(); } CoUninitialize(); } bool CAdsi::GetIIsWebVirtualDirIADs(void) { if(ADsGetObject(L"IIS://localhost/w3svc",IID_IADsContainer,(void**)&pIADsContainer) == S_OK) { _bstr_t bstrId("1"); HRESULT hr = pIADsContainer->GetObject(L"IIsWebServer", (bstrId), &pIDispatch); if (SUCCEEDED(hr)) { hr = pIDispatch->QueryInterface(IID_IADsContainer,(void**)&pIADsContainer); hr = pIADsContainer->GetObject(L"IIsWebVirtualDir", L"Root", &pIDispatch); if(SUCCEEDED(hr)) { hr = pIDispatch->QueryInterface(IID_IADs, (void**)&pIWebVirDir); if(SUCCEEDED(hr)) { return true; } } } } return false; } bool CAdsi::ChangeRoot(CString strPath) { if(GetIIsWebVirtualDirIADs()) { pIWebVirDir->Put(L"Path",_variant_t(strPath)); pIWebVirDir->SetInfo(); } return true; } bool CAdsi::SetDefaultFile(CString strFiles) { //IADs* pIWebVirDir(NULL); if(GetIIsWebVirtualDirIADs()) { pIWebVirDir->Put(L"DefaultDoc", _variant_t(strFiles)); pIWebVirDir->SetInfo(); } return true; }

 

 其它参数

//设置虚拟目录的属性 iAds->Put(_bstr_t("AccessRead"),_variant_t("True")); //可读属性 //iAds->Put(_bstr_t("AccessWrite"),_variant_t("True")); //可写属性，默认关闭 iAds->Put(_bstr_t("EnableDefaultDoc"),_variant_t("True")); iAds->Put(_bstr_t("AppAllowDebugging"),_variant_t("True")); //应用程序允许调试 iAds->Put(_bstr_t("AccessScript"),_variant_t("True")); //执行许可属性 iAds->Put(_bstr_t("AppFriendlyName"),_variant_t(VirtualDirName)); //应用程序名 iAds->Put(_bstr_t("DefaultDoc"),_variant_t("index.htm")); iAds->Put(_bstr_t("AppIsolated"),_variant_t("2")); iAds->Put(_bstr_t("Path"),_variant_t(Path)); //虚拟目录物理的根目录 iAds->Put(_bstr_t("ScriptMaps"),_variant_t(ScriptMapsName));