none
letra da unidade RRS feed

  • Pergunta

  •  

    Boa noite pessoal,

    Encontrei o script abaixo, que muda a letra de uma unidade de disco.

    Fiz os testes aqui mas está dando erro na linha 6.. a que está marcada em vermelho.... alguém sabe porque? ou se tem alguma outra forma de alterar a letra de uma unidade de disco?

    strComputer = "."
    Set objWMIService = GetObject("winmgmts:" _
        & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
    Set colVolumes = objWMIService.ExecQuery _
        ("Select * from Win32_Volume Where Name = 'f:\\'")
    For Each objVolume in colVolumes
        objVolume.DriveLetter = "g:"
        objVolume.Put_
    Next

    Encontrei esse abaixo também, mas dá o mesmo erro, na mesma linha:

    strComputer = "."
    Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
    Set colVolumes = objWMIService.ExecQuery _
        ("Select * from Win32_Volume Where Name = 'f:\\'")
    For Each objVolume in colVolumes
        objVolume.DriveLetter = "g:"
        objVolume.Put_
    Next

    No aguardo,

    quinta-feira, 18 de janeiro de 2007 21:37

Respostas

  • Acabo de ver que mandei uma sugestão errada... a saída que eu mostrei não vai ajudar muita coisa...

    Sugiro ler a documentação do diskpart:
    http://support.microsoft.com/default.aspx/kb/300415

    []s,

    Vinicius  
    sexta-feira, 19 de janeiro de 2007 21:29
    Moderador

Todas as Respostas

  • Eder, segundo o site da Microsoft esta classe não está acessível para Windows XP e sistemas anteriores a ele:
    Windows XP and earlier:  This class is not available.
    http://msdn2.microsoft.com/en-us/library/aa394515.aspx

    Grande abraço





    quinta-feira, 18 de janeiro de 2007 22:49
  • Que pena... precisava disso... Será que não existe outro método para fazer isso?

    quinta-feira, 18 de janeiro de 2007 23:39
  • Tem sim. Você pode obter as letras de unidade usando ferramentas do próprio Windows Script Host:

    Set objFSO = CreateObject("Scripting.FilesystemObject")
    Set objDiscos = objFSO.Drives

    Depois, com algum trabalho adicional, você pode executar outra ferramenta de linha de comando para manipular os discos... talvez o diskpart ou similar.

    []s,


    sexta-feira, 19 de janeiro de 2007 12:15
    Moderador
  • Não entendo muito de script... acredito que até essa parte que você passou vai me ajudar muito. Mas com o conhecimento que tenho, não consigo continuar a partir daqui.
    sexta-feira, 19 de janeiro de 2007 15:47
  • Acabo de ver que mandei uma sugestão errada... a saída que eu mostrei não vai ajudar muita coisa...

    Sugiro ler a documentação do diskpart:
    http://support.microsoft.com/default.aspx/kb/300415

    []s,

    Vinicius  
    sexta-feira, 19 de janeiro de 2007 21:29
    Moderador
  • Opa... pelo DISKPart funcionou... muito obrigado mais uma vez
    quinta-feira, 25 de janeiro de 2007 13:25