能不能在程序里动态创建虚拟目录？高手请指点！！

[happydeer]

[happydeer]

谢谢啦！

[jancky2001]

现在的asp功能上能够实现，但是非常复杂，刚出来的.net技术有很简单的方法实现这一功能。

[happy7]

happydeer:我是happy7
哈哈~~
我们交个朋友吧

[happy7]

这个我还不懂
呵呵
不能帮你了
好象要用到fso吧

[smalle]

用组件实现的。

[hydnoahark]

简单了。不过只使用于NT4.0(安装ADSI)和Win2k的机器：
<%
'创建物理目录
Set FS = Server.CreateObject( "Scripting.FileSystemObject" )
FS.CreateFolder "c:\testdir"

'创建虚拟目录
myServer = Request.ServerVariables( "SERVER_NAME" )
ADSIPath = "IIS://" & myServer & "/W3SVC/1/ROOT"
Response.Write "ADSIPath = " & ADSIPath
Set defaultSite = getObject( ADSIPath )
Set vDir = defaultSite.Create( "IISWebVirtualDir", "StellcomScripts" )
vDir.Path = "c:\testdir"

'设置虚拟目录属性
vDir.AccessRead = TRUE
vDir.AccessScript = TRUE
vDir.DefaultDoc = "index.asp"
vDir.SetInfo
Response.Write "Virtual Directory Created!"
%>