将“root”更改为什么可以建立二级虚拟目录哪？ (50分)

各位：在程序当中怎样建立二级虚拟目录？
下面这个代码可以建立一级虚拟目录.
将“root”更改为什么可以建立二级虚拟目录哪？


ADs := IADs(I.GetObject('IIsWebServer','1'));
i:=ADs as IADsContainer;
ADs := I.GetObject('IIsWebVirtualDir','Root') as IADs;
i:=ADs as IADsContainer;
ADs := I.Create('IIsWebVirtualDir',Edit3.Text) as IADs;



可视化窗口当中很简单，可是在程序当中怎么建立？
或者二级虚拟目录的标记写在注册表的什么地方？

ADs := I.GetObject('IIsWebVirtualDir','Root/DirName') as IADs;
i:=ADs as IADsContainer;

这个问题我已经解决了
可是怎样创建二级虚拟目录的“应用程序名称”？并且设置“应用程序保护” 为 “高级”