24小时热门版块排行榜    

查看: 164  |  回复: 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 ]
回复此楼

» 猜你喜欢

做人要厚道啊!厚道啊!
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 zsglly 的主题更新
普通表情 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 289求调剂 +8 硕星赴 2026-03-23 8/400 2026-03-24 20:17 by peike
[考研] 收08调剂生 +6 komorebi69 2026-03-18 6/300 2026-03-24 19:09 by 汪!?!
[考研] 085602 289分求调剂 +5 WWW西西弗斯 2026-03-24 5/250 2026-03-24 18:51 by jhhcooi
[考研] 080500求调剂 +3 zzzzfan 2026-03-24 3/150 2026-03-24 16:38 by barlinike
[考研] 一志愿211 初试270分 求调剂 +5 谷雨上岸 2026-03-23 6/300 2026-03-24 16:32 by laoshidan
[考研] 276求调剂。有半年电池和半年高分子实习经历 +9 材料学257求调剂 2026-03-23 10/500 2026-03-24 07:36 by wangy0907
[考研] 306求调剂 +9 chuanzhu川烛 2026-03-18 9/450 2026-03-23 13:17 by luoyongfeng
[考研] 280分求调剂 一志愿085802 +4 PUMPT 2026-03-22 7/350 2026-03-22 22:13 by 星空星月
[考研] 寻找调剂 +4 倔强芒? 2026-03-21 4/200 2026-03-22 16:14 by 木托莫露露
[考研] 一志愿 西北大学 ,070300化学学硕,总分287,双非一本,求调剂。 +3 晨昏线与星海 2026-03-20 3/150 2026-03-22 16:00 by ColorlessPI
[考研] 一志愿华中科技大学071000,求调剂 +4 沿岸有贝壳6 2026-03-21 4/200 2026-03-22 07:21 by ilovexiaobin
[考研] 286求调剂 +10 Faune 2026-03-21 10/500 2026-03-21 23:34 by 314126402
[考研] 297求调剂 +3 喜欢还是不甘心 2026-03-20 3/150 2026-03-21 18:33 by 学员8dgXkO
[考研] 266求调剂 +3 哇呼哼呼哼 2026-03-20 3/150 2026-03-21 16:46 by barlinike
[考研] 265求调剂 +12 梁梁校校 2026-03-19 14/700 2026-03-21 13:38 by lature00
[考研] 一志愿武理材料305分求调剂 +6 想上岸的鲤鱼 2026-03-18 7/350 2026-03-21 01:03 by JourneyLucky
[考研] 22408 344分 求调剂 一志愿 华电计算机技术 +4 solanXXX 2026-03-20 4/200 2026-03-20 23:49 by alg094825
[考研] 330求调剂 +4 小材化本科 2026-03-18 4/200 2026-03-20 23:13 by JourneyLucky
[考研] 【同济软件】软件(085405)考研求调剂 +3 2026eternal 2026-03-18 3/150 2026-03-18 19:09 by 搏击518
[考研] 收复试调剂生 +4 雨后秋荷 2026-03-18 4/200 2026-03-18 14:16 by elevennnne
信息提示
请填处理意见