Folge dem Video um zu sehen, wie unsere Website als Web-App auf dem Startbildschirm installiert werden kann.
Anmerkung: Diese Funktion ist in einigen Browsern möglicherweise nicht verfügbar.
Dim dirE As DirectoryEntry = New DirectoryEntry("WinNT:")
Dim dom As System.DirectoryServices.DirectoryEntry
For Each dom In dirE.Children
For Each entry As DirectoryEntry In dom.Children
If Not dom.Name = "Schema" Then
ListBox.Items.Add(dom.Name)
End If
Next
Next