none
comando net share RRS feed

  • Pergunta

  • olá pessoal,

    eu sei q se executar o camando net share ele mostra os compartilahmentos locais inclusive os de segurança, mas oq quero saber com faço façopara saber os compartilhamentos de uma máquina da rede por linha de comando
    grato.
    MCP
    sábado, 5 de dezembro de 2009 18:57

Respostas

  • Olá,

    Verifique o exemplo abaixo:


    Set objNetwork = CreateObject("Wscript.Network")

    strServer = objNetwork.computername

    strServer = InputBox("Nome do Computador: "," Compartilhamentos", strServer)


    if strServer <> "" Then
       set objFs = GetObject("WinNT://" & strServer & "/LanmanServer,FileService")


       For Each objShare In objFs
          strList = strList & vbCr & LCase(objShare.name) & " " & vbTab & UCase(objShare.Description)
       Next

       WScript.Echo strList
    End if



    Salve com a extensão .vbs e execute.

    Até mais,

    Jesiel

    Obs.: Se útil, classifique
    • Marcado como Resposta Hudson Schumaker quarta-feira, 30 de março de 2011 17:17
    segunda-feira, 7 de dezembro de 2009 10:41