在IIS里创建虚拟目录

以下摘自http://www.eggheadcafe.com/articles/20040112.asp

using System;
using System.DirectoryServices;

namespace IISMgrAddin
{
 /// 

 /// Summary description for IISManager.
 /// 
 public class IISManager
 {
  /// 

  ///  Constructor
  /// 
  
  /// 

  ///  Default constructor uses localhost as default server
  /// 
  public IISManager()
  {
    
  }
 public string CreateVDir(string  WebSite, string VDirName, string Path, bool  RootDir, bool chkRead,bool chkWrite, bool chkExecute, bool chkScript, bool chkAuth, int webSiteNum, string serverName)
  {
   string sRet=String.Empty;
   System.DirectoryServices.DirectoryEntry IISSchema;
   System.DirectoryServices.DirectoryEntry IISAdmin;
   System.DirectoryServices.DirectoryEntry VDir;
   bool IISUnderNT;

   //
   // Determine version of IIS
   //
   IISSchema = new  System.DirectoryServices.DirectoryEntry("IIS://" +serverName + "/Schema/AppIsolated");
   if  (IISSchema.Properties["Syntax"].Value.ToString().ToUpper() == "BOOLEAN")
    IISUnderNT = true;
   else
    IISUnderNT = false;
   IISSchema.Dispose();

   //
   // Get the admin object
   //
   IISAdmin = new  System.DirectoryServices.DirectoryEntry("IIS://" +serverName + "/W3SVC/" + webSiteNum + "/Root");

   //
   // If we're not creating a root directory
   //
   if (!RootDir)
   {
    //
    // If the virtual directory already exists then delete it
    //
    
     foreach(System.DirectoryServices.DirectoryEntry v in IISAdmin.Children)
     {
      if (v.Name == VDirName)
      {
       // Delete the specified virtual directory if it already exists
       try
       {
        IISAdmin.Invoke("Delete", new string [] { v.SchemaClassName, VDirName });
        IISAdmin.CommitChanges();
       }
       catch(Exception ex)
       {
              sRet+=ex.Message;
       }
      }
     }
    }  

   //
   // Create the virtual directory
   //
   if (!RootDir)
   {
    VDir = IISAdmin.Children.Add(VDirName, "IIsWebVirtualDir");
   }
   else
   {
    VDir = IISAdmin;
   }

   //
   // Setup the VDir
   //
   VDir.Properties["AccessRead"][0] = chkRead;
   VDir.Properties["AccessExecute"][0] = chkExecute;
   VDir.Properties["AccessWrite"][0] = chkWrite;
   VDir.Properties["AccessScript"][0] = chkScript;
   VDir.Properties["AuthNTLM"][0] = chkAuth;
   VDir.Properties["EnableDefaultDoc"][0] = true;
   VDir.Properties["EnableDirBrowsing"][0] = false;
   VDir.Properties["DefaultDoc"][0] = true;
   VDir.Properties["Path"][0] = Path;

   //
   // NT doesn't support this property
   //
   if (!IISUnderNT)
   {
    VDir.Properties["AspEnableParentPaths"][0] = true;
   }

   //
   // Set the changes  
   //
   VDir.CommitChanges();

   //
   // Make it a web application
   //
   if (IISUnderNT)
   {
    VDir.Invoke("AppCreate", false);
   }
   else
   {
    VDir.Invoke("AppCreate", 1);
   }

    sRet+= "VRoot " +VDirName + " created!";
   return sRet;
  }

  
  #region Properties
  public string ServerName
  {
   get
   {
    return _serverName;
   }
   set
   {
    _serverName = value;
   }
  }
  #endregion
  
  public static string VirDirSchemaName = "IIsWebVirtualDir";
  
  #region Private Members 
        private string _serverName;
 
  #endregion
 }
}

下面是引用的方法：

public void Exec(string commandName, EnvDTE.vsCommandExecOption executeOption, ref object varIn, ref object varOut, ref bool handled)
{
 handled = false;
 if(executeOption == EnvDTE.vsCommandExecOption.vsCommandExecOptionDoDefault)
 {
 if(commandName == "MyAddin1.Connect.IISMgrAddin")
 {
 IISMgrAddin.frmISMgr frm = new IISMgrAddin.frmISMgr();
 frm.Show();
 handled = true;
 return;
 }
 }
}