#regionCreate a new IIsWeb site///<summary> ///Add a site///</summary> Public stringCreatewebsite () {intSiteID =int. Parse (Getnewwebsiteid ()); Try{root=NewDirectoryEntry ("iis://"+ This. _server +"/w3svc"); if(Ensurenewsiteenavaible ( This. _serverip +":"+ This. _port +":"+ This. _domain) | | Ensurenewsiteenavaible ( This. _server +":"+ This. _port +":"+ This. _domain)) { return "The site already exists, please rename the site! "; } Else{DirectoryEntry site= (DirectoryEntry) root. Invoke ("Create","IIsWebServer", SiteID); Site. Invoke ("Put","ServerComment", This. _websitename); Site. Invoke ("Put","KeyType","IIsWebServer"); Site. Invoke ("Put","ServerBindings", This. _serverip +":"+ This. _port +":"+ This. _domain); Site. Invoke ("Put","serverstate",2); Site. Invoke ("Put","FrontPageWeb",1); Site. Invoke ("Put","DefaultDoc","default.aspx,index.aspx,index.html,index.htm,default.htm,default.html"); Site. Invoke ("Put","ServerAutoStart",1); Site. Invoke ("Put","ServerSize",1); Site. Invoke ("SetInfo"); Site.commitchanges (); Root.commitchanges (); DirectoryEntry Sitevdir= Site. Children.add ("Root","IIsWebVirtualDir"); sitevdir.properties["appisolated"][0] =2; sitevdir.properties["Path"][0] = This. _path; sitevdir.properties["AccessFlags"][0] =513; sitevdir.properties["FrontPageWeb"][0] =1; sitevdir.properties["AppRoot"][0] =string. Format ("/lm/w3svc/{0}/root", SiteID); sitevdir.properties["AppFriendlyName"][0] ="Default Application"; PropertyValueCollection propvalues= sitevdir.properties["MimeMap"]; Iisole.mimemapclass Newmimetype=NewIisole.mimemapclass (); Newmimetype.extension=". flv"; Newmimetype.mimetype="Flv-application/octet-stream"; Propvalues.add (Newmimetype); stringStrerror =@"400,*,file,c:\windows\help\iishelp\common\400.htm"+@"401,1,file,c:\windows\help\iishelp\common\401-1.htm"+@"401,2,file,c:\windows\help\iishelp\common\401-2.htm"+@"401,3,file,c:\windows\help\iishelp\common\401-3.htm"+@"401,4,file,c:\windows\help\iishelp\common\401-4.htm"+@"401,5,file,c:\windows\help\iishelp\common\401-5.htm"+@"401,7,file,c:\windows\help\iishelp\common\401-1.htm"+@"403,1,file,c:\windows\help\iishelp\common\403-1.htm"+@"403,2,file,c:\windows\help\iishelp\common\403-2.htm"+@"403,3,file,c:\windows\help\iishelp\common\403-3.htm"+@"403,4,file,c:\windows\help\iishelp\common\403-4.htm"+@"403,5,file,c:\windows\help\iishelp\common\403-5.htm"+@"403,6,file,c:\windows\help\iishelp\common\403-6.htm"+@"403,7,file,c:\windows\help\iishelp\common\403-7.htm"+@"403,8,file,c:\windows\help\iishelp\common\403-8.htm"+@"403,9,file,c:\windows\help\iishelp\common\403-9.htm"+@"403,10,file,c:\windows\help\iishelp\common\403-10.htm"+@"403,11,file,c:\windows\help\iishelp\common\403-11.htm"+@"403,12,file,c:\windows\help\iishelp\common\403-12.htm"+@"403,13,file,c:\windows\help\iishelp\common\403-13.htm"+@"403,15,file,c:\windows\help\iishelp\common\403-15.htm"+@"403,16,file,c:\windows\help\iishelp\common\403-16.htm"+@"403,17,file,c:\windows\help\iishelp\common\403-17.htm"+@"403,18,file,c:\windows\help\iishelp\common\403.htm"+@"403,19,file,c:\windows\help\iishelp\common\403.htm"+@"403,20,file,c:\windows\help\iishelp\common\403-20.htm"+@"404,*,url,/404.aspx"+@"404,2,file,c:\windows\help\iishelp\common\404b.htm"+@"404,3,file,c:\windows\help\iishelp\common\404b.htm"+@"405,*,file,c:\windows\help\iishelp\common\405.htm"+@"406,*,file,c:\windows\help\iishelp\common\406.htm"+@"407,*,file,c:\windows\help\iishelp\common\407.htm"+@"412,*,file,c:\windows\help\iishelp\common\412.htm"+@"414,*,file,c:\windows\help\iishelp\common\414.htm"+@"415,*,file,c:\windows\help\iishelp\common\415.htm"+@"500,12,file,c:\windows\help\iishelp\common\500-12.htm"+@"500,13,file,c:\windows\help\iishelp\common\500-13.htm"+@"500,15,file,c:\windows\help\iishelp\common\500-15.htm"+@"500,16,file,c:\windows\help\iishelp\common\500.htm"+@"500,17,file,c:\windows\help\iishelp\common\500.htm"+@"500,18,file,c:\windows\help\iishelp\common\500.htm"+@"500,19,file,c:\windows\help\iishelp\common\500.htm"; string[] strerrorlist = strerror. Split (' '); sitevdir.properties["httperrors"]. Value =strerrorlist; Sitevdir.invoke ("AppCreate",true); Root.commitchanges (); Sitevdir.commitchanges (); Site.commitchanges (); return "Create Site Success! "; } } Catch(Exception ex) {returnEx. Message; } } #endregion
Program code Create IIsWeb site