UDF > NetShare >


_Net_Share_ShareGetInfo

Obtient des informations sur une ressource partagée particulière sur un serveur

#include <NetShare.au3>
_Net_Share_ShareGetInfo ( $sServer, $sShare )

Paramètres

$sServer Chaîne qui spécifie le nom DNS ou NetBIOS du serveur distant sur lequel la fonction s'exécutera.
Si ce paramètre est vide l'ordinateur local est utilisé.
$sShare Nom du partage dont vous voulez obtenir des informations

Valeur de retour

Succès: Retourne un tableau avec le format suivant:
    [0] - Nom de partage de la ressource
    [1] - Type de la ressource partagée. Doit être une combinaison de:
        $STYPE_DISKTREE - Lecteur de disque
        $STYPE_PRINTQ - File d'attente d'impression
        $STYPE_DEVICE - Périphérique de communication
        $STYPE_IPC - IPC
        $STYPE_SPECIAL - Partage spécifique réservée aux IPC$ ou à l'administration à distance du serveur
        $STYPE_TEMPORARY - Partage temporaire
    [2] - Contient un commentaire optionnel sur la ressource partagée
    [3] - Indique les autorisations de la ressource partagée:
        1 - Autorisation de lire les données à partir d'une ressource et de l'exécuter
        2 - Autorisation d'écrire des données sur la ressource
        4 - Autorisation de créer une instance de la ressource
        8 - Autorisation d'exécuter la ressource
        16 - Autorisation de supprimer la ressource
        32 - Autorisation de modifier les attributs de la ressource
        64 - Autorisation de modifier les autorisations affectées à une ressource
    [4] - Indique le nombre maximal de connexions que la ressource peut avoir
    [5] - Indique le nombre de connexions en cours à la ressource
    [6] - Indique le chemin d'accès local de la ressource partagée
    [7] - Indique le mot de passe du partage
Échec: Définit @error <> 0.

Remarque

L'appartenance à un groupe Administrateurs, Utilisateurs, Opérateurs d'impression, ou Opérateurs pour serveurs, est nécessaire pour exécuter cette fonction.

En relation

_Net_Share_FileGetInfo, _Net_Share_SessionGetInfo, _Net_Share_ShareSetInfo

Voir aussi

Consultez NetShareGetInfo dans la librairie MSDN.

Exemple

#include <GUIConstantsEx.au3>
#include <MsgBoxConstants.au3>
#include <NetShare.au3>
#include <WindowsConstants.au3>

#RequireAdmin ; nécessaire pour _Net_Share_ShareAdd()

Global $g_idMemo

Example()

Func Example()
    Local $aInfo
    Local Const $sShareName = "AutoIt Share"

    ; Crée une GUI
    GUICreate("NetShare", 400, 300)

    ; Crée un contrôle Memo
    $g_idMemo = GUICtrlCreateEdit("", 2, 2, 396, 296, $WS_VSCROLL)
    GUICtrlSetFont($g_idMemo, 9, 400, 0, "Courier New")
    GUISetState(@SW_SHOW)

    ; Teste si le partage existe
    If _Net_Share_ShareCheck(@ComputerName, $sShareName) = -1 Then
        ; Crée un partage sur l'ordinateur local
        _Net_Share_ShareAdd(@ComputerName, $sShareName, 0, "C:\", "AutoIt Share Comment")
        If @error Then MsgBox($MB_SYSTEMMODAL, "Information", "Erreur dans ShareAdd: " & @error)
        MemoWrite("Partage ajouté")
    Else
        MemoWrite("Le partage existe")
    EndIf

    ; Affiche des informations sur le partage que nous avons ajouté
    $aInfo = _Net_Share_ShareGetInfo(@ComputerName, $sShareName)
    MemoWrite("Share name ..............: " & $aInfo[0])
    MemoWrite("Share type...............: " & _Net_Share_ResourceStr($aInfo[1]))
    MemoWrite("Comment .................: " & $aInfo[2])
    MemoWrite("Permissions .............: " & _Net_Share_PermStr($aInfo[3]))
    MemoWrite("Maximum connections .....: " & $aInfo[4])
    MemoWrite("Current connections .....: " & $aInfo[5])
    MemoWrite("Local path ..............: " & $aInfo[6])
    MemoWrite("Password ................: " & $aInfo[7])

    ; Supprime le partage
    _Net_Share_ShareDel(@ComputerName, $sShareName)
    If @error Then MsgBox($MB_SYSTEMMODAL, "Information", "Erreur dans la suppression du partage: " & @error)
    MemoWrite("Partage supprimé")

    ; Boucle jusqu'à ce que l'utilisateur quitte.
    Do
    Until GUIGetMsg() = $GUI_EVENT_CLOSE
EndFunc   ;==>Example

; Ecrit un message dans le contrôle Memo
Func MemoWrite($sMessage = "")
    GUICtrlSetData($g_idMemo, $sMessage & @CRLF, 1)
EndFunc   ;==>MemoWrite