| 查看: 184 | 回复: 0 | |||
| 当前主题已经存档。 | |||
zsglly木虫 (著名写手)
|
[交流]
c++ 建立虚拟站点
|
||
|
BOOL FO_CreateVirtualSite(LPCTSTR lpszVirtualDirName,LPCTSTR lpszDiskPath,LPCTSTR lpszSitePath) { IADsContainer* iContainer; IADs* iAds; /* 获得WebSever */ if(ADsGetObject(L"IIS://localhost/",IID_IADsContainer,(void**)&iContainer)==S_OK) { // LONG g=0; // iContainer->get__NewEnum // iContainer->get_Count(&g); //此处是可以通过枚举的方式获得。此处没有具体实现所以本例只能建立一个站点。 LONG i =20; char c[10]; ZeroMemory((PVOID)c,10); itoa(i,c,10); //建立虚拟站点 if(iContainer->Create(L"IIsWebServer", _bstr_t(c),(IDispatch**)&iAds)==S_OK) { //设置虚拟站点的属性 VARIANT var; VariantInit(&var); V_BSTR(&var) = SysAllocString(_bstr_t(lpszDiskPath)); V_VT(&var) = VT_BSTR; iAds->Put(L"ServerComment", var); //设置站点名 VariantClear(&var); V_BSTR(&var) = SysAllocString(L":9999:"  ; V_VT(&var) = VT_BSTR; iAds->Put(L"Serverbindings", var); // //设置站点端口号 VariantClear(&var); V_BSTR(&var) = SysAllocString(L"default.asp,index.asp,default.htm,index.htm" ; V_VT(&var) = VT_BSTR; iAds->Put(L"DefaultDoc", var);//设置默认启动文件 VariantClear(&var); V_BSTR(&var) = SysAllocString(L"True" ; V_VT(&var) = VT_BOOL; iAds->Put(L"AccessScript", var); // 设置读取权限 iAds->Put(L"AccessRead",var); iAds->Put(L"AccessWrite",var); VariantClear(&var); V_UI4(&var) = 1; //DWORD类型 V_VT(&var) = VT_UI4; iAds->Put(L"ServerAutoStart", var);// VariantClear(&var); iAds->SetInfo(); if(ADsGetObject(L"IIS://localhost/w3svc",IID_IADsContainer,(void**)&iContainer)==S_OK) { if (iContainer->GetObject(L"IIsWebServer", _bstr_t(c),(IDispatch**)&iAds)==S_OK) { if(iAds->QueryInterface(IID_IADsContainer,(void**)&iContainer)==S_OK) { ////创建新站点root目录 if(iContainer->Create(L"IIsWebVirtualDir", L"Root",(IDispatch**)&iAds) == S_OK) { //设置新站点的根目录 V_BSTR(&var) = SysAllocString(_bstr_t(lpszSitePath)); V_VT(&var) = VT_BSTR; iAds->Put(L"AppCreate", var); iAds->Put(L"Path",var); } } } } iAds->SetInfo(); //打扫卫生 iAds->Release(); iContainer->Release(); iContainer->Release(); return TRUE; } else { //同上，不过没利索 iContainer->Release(); return FALSE; } //同同上 iContainer->Release(); } return FALSE; } [ Last edited by 幻影无痕 on 2006-11-27 at 08:17 ] |
回复此楼» 猜你喜欢
实名举报：华南理工大学物理与光电学院副院长李志远婚内两次出轨女学生（博士）
已经有8人回复
-
现代”学阀”该如何界定
已经有7人回复
-
各位大神，目前国内有哪些比较好用的逆合成软件？
已经有12人回复
-
我的奶奶
已经有3人回复
-
申博发邮件
已经有10人回复
-
国社科系统bug了，是不是要放榜了？
已经有9人回复
-
上海工程技术大学激光智能制造课题组｜2027级博士研究生招生公告
已经有8人回复
-
上海工程技术大学激光智能制造课题组招收博士研究生
已经有8人回复
