| 查看: 174 | 回复: 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 ] |
回复此楼» 猜你喜欢
网络举报学术不端成为了男女之间情杀的手段了，真荒唐。。。
已经有3人回复
-
大龄残疾硕士的一点执念
已经有20人回复
-
2026年面上项目中了，2A+B, 会评顺利通过
已经有12人回复
-
Suzuki偶联中硼酸酯原料掉下的硼酸酯是否可以自身偶联，生成B2Pin2杂质
已经有3人回复
-
今年E04面上
已经有19人回复
-
刑法学论文投稿求助
已经有5人回复
-
Journal of Environmental Chemical Engineering
已经有3人回复
-
最后一年，祈求好运
已经有3人回复
-
风电环氧领域
已经有3人回复
