' Creates a IIS virtual directory with the specified name,' and that points to the specified physical path' Note: requires a reference to the System.DirectoryServices.dll assembly' Note: exception handling (for example to catch an invalid path) should be ' added in the calling code.'' Example:' Try' CreateIISVirtualDirectory("MyTestDir", "d: emp empdir")' Catch ex As Exception' MessageBox.Show(ex.Message)' End TrySub CreateIISVirtualDirectory(ByVal name As String, ByVal path As String) ' get a reference to the default server's root dir Dim rootDir As New System.DirectoryServices.DirectoryEntry _ ("IIS://localhost/W3SVC/1/Root") ' create a child virtual directory Dim newDir As System.DirectoryServices.DirectoryEntry = _ rootDir.Children.Add(name, rootDir.SchemaClassName) ' set the virtual directory's physical path newDir.Properties("Path")(0) = path ' save the virtual directory newDir.CommitChanges()End Sub



Top 5 B2B SaaS Marketing Agencies for 2023
In recent years, the software-as-a-service (SaaS) sector has experienced exponential growth as more and more companies choose cloud-based solutions. Any SaaS company hoping to stay ahead of the curve in this quickly changing industry needs to invest in effective marketing. So selecting the best marketing agency can mean the difference