Come faccio a impostare la quota della cartella di programmazione in vb.net
-
23-09-2019 - |
Domanda
Ho ambiente client-server e sviluppato un progetto di client-server.
Ho bisogno di condividere una cartella della mia macchina server di programmazione utilizzando VB.NET
Per favore mi aiuti.
Soluzione
Ecco un esempio che mostra il concetto utilizzando ManagmentClass . E 'C #, ma facilmente convertibili in VB.NET:
UPDATE:
Directory.CreateDirectory("C:\MyTestShare")
Dim managementClass As New ManagementClass("Win32_Share")
Dim inParams As ManagementBaseObject = managementClass.GetMethodParameters("Create")
inParams.Item("Description") = "My Files Share"
inParams.Item("Name") = "My Files Share"
inParams.Item("Path") = "C:\MyTestShare"
inParams.Item("Type") = 0
If (DirectCast(managementClass.InvokeMethod("Create", inParams, Nothing).Properties.Item("ReturnValue").Value, UInt32) <> 0) Then
Throw New Exception("Unable to share directory.")
End If
Altri suggerimenti
Ho codice che è simile a questo che funziona su computer Vista e Win2k3, ma quando provo sul server Windows 2008 R2 (con aggiornamenti più recenti) non riesce con un "accesso negato" errore. Ho provato il codice esatta e lo stesso risultato. Sono un amministratore sulla scatola e ho provato disabilitando UAC, ma senza alcun effetto.
(so che questo non è una risposta, non ho il potere di commentare)