| Forum: VB.NET |
Thema:
Re: Computerverwaltung |
Von:
Raphael Crivelli (
03.03.2005 16:09) |
Hallo
Vielleicht hilft dir dieser Code ein bisschen weiter:
Const Max_Connections As Integer = 10
Const IsFileShare As Integer = 0
Dim Share_Info As String() = {"C:\Freigabe", "Freigabe", IsFileShare, Max_Connections, "Mein Freigabekommentar"}
Dim Win_Shares As ManagementClass = New ManagementClass("Win32_Share")
Gruss Raffi
Antworten
Vorsicht bei der Eingabe: Die Zeichen ' oder -- sind nicht erlaubt!
