#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")
#include <iiisext.h>
#include <iisext_i.c>
BOOL CreateWebServer(LPCTSTR bindaddress, LPCTSTR domain, LPCTSTR DiskPath);
void main()
{
CoInitialize(NULL);
if(TRUE == CreateWebServer(_T("192.168.105.119:80"), _T("auto"), _T("D:\\release")))/*D:\\sample\\website\\website*/
printf("create site ok/n");
else
printf("create site failed/n");
CoUninitialize();
system("pause");
}
BOOL CreateWebServer(LPCTSTR bindaddress, LPCTSTR domain, LPCTSTR pathname)
{
if(bindaddress == NULL || NULL == domain || NULL == pathname)
return FALSE;
IADsContainer *pCont = NULL;
IADs *pAds = NULL;
IADs *pVrAds = NULL;
IADsServiceOperations *pSrvOp = NULL;
IDispatch *pDisp = NULL;
IDispatch *pVrDisp = NULL;
_bstr_t WNumer = "123";
_bstr_t newBindings = _bstr_t(bindaddress) + ":" + "";
// _bstr_t newBindings = _bstr_t(bindaddress) + ":" + domain;
HRESULT hr;
if(ADsGetObject(L"IIS://localhost/w3svc", IID_IADsContainer, (void **)&pCont) == S_OK)
{
if(pCont->Create(L"IIsWebServer",WNumer, &pDisp) == S_OK)
{
hr = pDisp->QueryInterface(IID_IADs, (void **)&pAds);
hr = pDisp->QueryInterface(IID_IADsServiceOperations, (void **)&pSrvOp);
pAds->Put(L"ServerSize", _variant_t(long(1)));
pAds->Put(L"ServerComment", _variant_t(_bstr_t("auto")));
pAds->Put(L"ServerBindings", _variant_t(newBindings));
pAds->SetInfo();
hr = pCont->GetObject(L"IIsWebServer", (WNumer), &pDisp);
if(pDisp->QueryInterface(IID_IADsContainer, (void **)&pCont) == S_OK)
{
if(pCont->Create(L"IIsWebVirtualDir", L"Root", &pVrDisp) == S_OK)
{
hr = pVrDisp->QueryInterface(IID_IADs, (void **)&pVrAds);
pVrAds->Put(L"AccessRead", _variant_t(true));
//pVrAds->Put(L"AccessWrite", _variant_t(true));
//pVrAds->Put(L"AccessScript", _variant_t(true));
//pVrAds->Put(L"EnableDirBrowsing", _variant_t(true));
pVrAds->Put(L"AccessExecute", _variant_t(true));
pVrAds->Put(L"Path", _variant_t(pathname));
pVrAds->Put(L"AppRoot", _variant_t(pathname));
pVrAds->Put(L"DefaultDoc", _variant_t("index.htm,index.aspx"));
pVrAds->Put(_bstr_t("AppFriendlyName"),_variant_t("auto"));
pVrAds->SetInfo();
pVrAds->Release();
pAds->Release();
pCont->Release();
}
IADs *pADs = NULL;
hr = ADsGetObject( L"IIS://localhost/w3svc/123/root", IID_IADs, (void **)&pADs );
IISApp2 *pApp2 = NULL;
hr = pADs->QueryInterface( IID_IISApp2, (void **)&pApp2 );
IISApp3 *pApp3 = NULL;
hr = pADs->QueryInterface( IID_IISApp3, (void **)&pApp3 );
VARIANT varPool;
VariantInit( &varPool );
varPool.vt = VT_BSTR;
varPool.bstrVal = SysAllocString( L"MyAppPool" );
VARIANT varCreatePool;
VariantInit( &varCreatePool );
varCreatePool.vt = VT_BOOL;
varCreatePool.boolVal = VARIANT_TRUE;
hr = pApp3->AppCreate3(2, varPool, varCreatePool );
if ( pApp3 )
pApp3->Release();
if ( pADs )
pADs->Release();
hr = pSrvOp->Start();
hr = pSrvOp->Release();
}
}
}
IADs *pool = NULL;
hr = ADsGetObject( L"IIS://localhost/W3SVC/AppPools/MyAppPool", IID_IADs, (void **)&pool );
IISApplicationPool *applicationPool = NULL;
hr = pool->QueryInterface(IID_IISApplicationPool,(void **)&applicationPool );
if(hr==S_OK)
{
applicationPool->Stop();
applicationPool->Recycle();
applicationPool->Start();
printf("start current application pool");
}
return true;
}
using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using System.DirectoryServices;
namespace test
{
class Program
{
const string W3SVC_PATH = "IIS://localhost/W3SVC";
// Access Flags
const int MD_ACCESS_READ = 0x00000001; //Allow read access.
const int MD_ACCESS_SCRIPT = 0x00000200; // Allow script execution.
static void Main(string[] args)
{
CreateWebSite("xxxxxx","d:\\release");
Console.WriteLine("ok");
Console.Read();
}
public static void CreateWebSite(string siteName, string realPath)
{
if (string.IsNullOrEmpty(siteName))
{
throw new NullReferenceException("创建站点的站点名字不能为空");
}
if (string.IsNullOrEmpty(realPath))
{
throw new NullReferenceException("创建站点的站点真是路径不能为空");
}
DirectoryEntry root = new DirectoryEntry(W3SVC_PATH);
//判断站点是否已经存在,如果存在,则删除已有站点
int siteID = GetSiteID(siteName, "localhost");
if (siteID > 0)
{
throw new Exception("要创建的站点已经存在");
}
siteID = getNewWebSiteID();
DirectoryEntry currentWeb =
root.Children.Add(siteID.ToString(), "IIsWebServer");
currentWeb.CommitChanges();
//currentWeb.Properties["Location"].Value = "/LM/W3SVC/" + siteID.ToString();
currentWeb.Properties["AuthFlags"][0] = "0";
currentWeb.Properties["MaxBandwidth"][0] = "1048576";
currentWeb.Properties["MaxConnections"][0] = "10";
currentWeb.Properties["ServerAutoStart"][0] = "true";
currentWeb.Properties["ServerBindings"].Value = ":80:";// + siteName;
currentWeb.Properties["ServerComment"][0] = siteName;
// 添加web虚拟目录
DirectoryEntry virEntry = currentWeb.Children.Add("root", "IIsWebVirtualDir");
virEntry.CommitChanges();
//virEntry.Properties["Location"].Value = "/LM/W3SVC/"+siteID.ToString()+"/root";
virEntry.Properties["AccessFlags"][0] = MD_ACCESS_READ | MD_ACCESS_SCRIPT;
virEntry.Properties["AppFriendlyName"][0] = siteName;
virEntry.Properties["AppIsolated"][0] = "2";
virEntry.Properties["AppRoot"][0] = "/LM/W3SVC/" + siteID.ToString() + "/Root";
virEntry.Properties["AuthFlags"][0] = 1 | 7;// 设置目录的安全性，0表示不允许匿名访问，1为允许，3为基本身份验证，7为windows继承身份验证
virEntry.Properties["Path"][0] = realPath; //虚拟目录物理路径
//virEntry.Properties["AccessExecute"][0] = true;
virEntry.Properties["DefaultDoc"][0] = "index.aspx,index.htm";
virEntry.CommitChanges();
currentWeb.CommitChanges();
virEntry.Close();
currentWeb.Close();
root.Close();
}
public static int GetSiteID(string webSiteName, string serverIP)
{
int SiteID = 0;
try
{
DirectoryEntry root = new DirectoryEntry(@"IIS://" + serverIP + "/W3SVC");
foreach (DirectoryEntry Child in root.Children)
{
string WName = Child.Properties["ServerComment"][0].ToString();
if (webSiteName == WName)
{
SiteID = Convert.ToInt32(Child.Name);
return SiteID;
}
WName = "";
}
}
catch
{
SiteID = 0;
}
return SiteID;
}
public static int getNewWebSiteID()
{
using (System.DirectoryServices.DirectoryEntry rootEntry =
new System.DirectoryServices.DirectoryEntry(W3SVC_PATH))
{
int siteID = 1;
//得到现有的站点标识
foreach (System.DirectoryServices.DirectoryEntry entry in rootEntry.Children)
{
if (entry.SchemaClassName == "IIsWebServer")
{
int ID = Convert.ToInt32(entry.Name);
if (ID >= siteID)
{
siteID = ID + 1;
}
}
}
rootEntry.Close();
return siteID;
}
}
public static void CreateNewWebSite(string hostName)
{
//if (!EnsureNewSiteEnavaible(siteInfo.BindString))
//{
// throw new DuplicatedWebSiteException("已经有了这样的网站了。" + Environment.NewLine + siteInfo.BindString);
//}
string entPath = String.Format("IIS://{0}/w3svc", hostName);
DirectoryEntry rootEntry =new DirectoryEntry(entPath);
string newSiteNum = "135";
DirectoryEntry newSiteEntry = rootEntry.Children.Add(newSiteNum, "IIsWebServer");
newSiteEntry.CommitChanges();
newSiteEntry.Properties["ServerBindings"].Value = "192.168.105.119:80:" + "";
newSiteEntry.Properties["ServerComment"].Value = "testwetsite";
newSiteEntry.CommitChanges();
DirectoryEntry vdEntry = newSiteEntry.Children.Add("root", "IIsWebVirtualDir");
vdEntry.CommitChanges();
vdEntry.Properties["Path"].Value = "d:/release";
vdEntry.CommitChanges();
}
//DirectoryEntry appPool = new DirectoryEntry("IIS://localhost/W3SVC/AppPools");
//createAppPool("Abcxxx");
//foreach (DirectoryEntry a in appPool.Children)
//{
// Console.WriteLine(a.Name);
//}
//DirectoryEntry root = new DirectoryEntry("IIS://localhost/W3SVC");
//foreach (DirectoryEntry dir in root.Children)
//{
// if (dir.SchemaClassName == "IIsWebServer")
// {
// string ww = dir.Properties["ServerComment"].Value.ToString();
// Console.WriteLine(string.Format("IIS://localhost/W3SVC/{0}/ROOT/;{1}", dir.Name, ww));
// }
//}
//using (DirectoryEntry root = new DirectoryEntry("WinNT:"))
//{
// foreach (DirectoryEntry domain in root.Children)
// {
// Console.WriteLine("Domain | WorkGroup:\t" + domain.Name);
// foreach (DirectoryEntry computer in domain.Children)
// {
// Console.WriteLine("Computer:\t" + computer.Name);
// }
// }
//}
//Console.ReadLine();
static void createAppPool(string AppPoolName)
{
DirectoryEntry newpool;
DirectoryEntry apppools = new DirectoryEntry("IIS://localhost/W3SVC/AppPools");
newpool = apppools.Children.Add(AppPoolName, "IIsApplicationPool");
newpool.CommitChanges();
}
}
}
