VB.NET中怎么创建一个虚拟目录应用

VB.NET中怎么创建一个虚拟目录应用，针对这个问题，这篇文章详细介绍了相对应的分析和解答，希望可以帮助更多想解决这个问题的小伙伴找到更简单易行的方法。

VB.net创建虚拟目录代码示例：

Function CriaDiretorioVirtual(ByVal 
vdirname As String, ByVal serverID As 
String, ByVal vdirPath As String, 
ByVal criaApplication As Boolean) 
As DirectoryEntry   
Dim newvdir As DirectoryEntry   
Dim root As DirectoryEntry   
root = New DirectoryEntry("IIS://
localhost/W3SVC/" + serverID + "/Root")   
newvdir = root.Children.Add
(vdirname, "IIsWEBVirtualDir")   
newvdir.Properties("Path")(0) = 
vdirPath   
If criaApplication Then   
newvdir.Invoke("AppCreate", True)   
newvdir.Properties("AppFriendlyName")
(0) = vdirname   
newvdir.Properties("AppIsolated")(0) = 2   
End If   
newvdir.CommitChanges()   
Return newvdir   
End Function  

关于VB.NET中怎么创建一个虚拟目录应用问题的解答就分享到这里了，希望以上内容可以对大家有一定的帮助，如果你还有很多疑惑没有解开，可以关注编程网精选频道了解更多相关知识。