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 DirectoryEntryDim 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) =
vdirPathIf criaApplication Then
newvdir.Invoke("AppCreate", True)
newvdir.Properties("AppFriendlyName")
(0) = vdirnamenewvdir.Properties("AppIsolated")(0) = 2
End If
newvdir.CommitChanges()
Return newvdir
End Function
关于VB.NET中怎么创建一个虚拟目录应用问题的解答就分享到这里了,希望以上内容可以对大家有一定的帮助,如果你还有很多疑惑没有解开,可以关注行业资讯频道了解更多相关知识。