RaIIS IIS操作类 如何增加MIME 类型 ?

网上流传的多是以下代码 可不知道那个方法属性可以增加一个MIME 类型 如.isotry
    WebSite := CreateOleObject('IISNamespace');
    WebSite := WebSite.GetObject('IIsWebService', 'localhost/w3svc');
    WebServer := WebSite.GetObject('IIsWebServer', '1');
    WebRoot := WebServer.GetObject('IIsWebVirtualDir', 'Root');
    vdir := WebRoot.Create('IIsWebVirtualDir', strVirtualDir);
    vdir.AccessRead := True;    vdir.AccessScript := True; //执行许可为纯脚本
    vdir.DefaultDoc := 'index.asp,index.aspx,index.htm'; //默认文档
    vdir.EnableDirBrowsing := False;
    vdir.AppFriendlyName := strAppName; //应用程序名
    vdir.Path := strDir;
    vdir.AppCreate(True); //如果没有这句的话,虚拟目录就要人为的手工创建应用程序名
    vdir.SetInfo;
  except
    Result := False;
  end;如有知道的 请告知! 谢谢