VB.NET中怎么创建一个虚拟目录应用-成都创新互联网站建设

关于创新互联

多方位宣传企业产品与服务 突出企业形象

公司简介 公司的服务 荣誉资质 新闻动态 联系我们

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

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

公司主营业务:成都网站设计、网站制作、移动网站开发等业务。帮助企业客户真正实现互联网宣传,提高企业的竞争能力。成都创新互联公司是一支青春激扬、勤奋敬业、活力青春激扬、勤奋敬业、活力澎湃、和谐高效的团队。公司秉承以“开放、自由、严谨、自律”为核心的企业文化,感谢他们对我们的高要求,感谢他们从不同领域给我们带来的挑战,让我们激情的团队有机会用头脑与智慧不断的给客户带来惊喜。成都创新互联公司推出托克逊免费做网站回馈大家。

VB.NET创建虚拟目录代码示例:

  1. Function CriaDiretorioVirtual(ByVal 
    vdirname As String, ByVal serverID As 
    String, ByVal vdirPath As String, 
    ByVal criaApplication As Boolean) 
    As DirectoryEntry   

  2. Dim newvdir As DirectoryEntry   

  3. Dim root As DirectoryEntry   

  4. root = New DirectoryEntry("IIS://
    localhost/W3SVC/" + serverID + "/Root")   

  5. newvdir = root.Children.Add
    (vdirname, "IIsWebVirtualDir")   

  6. newvdir.Properties("Path")(0) = 
    vdirPath   

  7. If criaApplication Then   

  8. newvdir.Invoke("AppCreate", True)   

  9. newvdir.Properties("AppFriendlyName")
    (0) = vdirname   

  10. newvdir.Properties("AppIsolated")(0) = 2   

  11. End If   

  12. newvdir.CommitChanges()   

  13. Return newvdir   

  14. End Function  

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


当前文章:VB.NET中怎么创建一个虚拟目录应用
标题路径:http://kswsj.cn/article/ijspeh.html

其他资讯