Shortcut to Disk Management

  • Thread starter Thread starter Rick Altman
  • Start date Start date
R

Rick Altman

I have a regular need to remove and reassign a drive letter to a volume in
my system and I would like to know if the Disk Management function within
the Computer Management console has a command line interface (so that I can
write a batch file) or if a VBA script could automate a procedure whereby I
assisn and unassign a specific drive letter to a particular volume.

Any input would be appreciated...
 
Rick Altman said:
I have a regular need to remove and reassign a drive letter to a volume in
my system and I would like to know if the Disk Management function within
the Computer Management console has a command line interface (so that I can
write a batch file) or if a VBA script could automate a procedure whereby I
assisn and unassign a specific drive letter to a particular volume.

Any input would be appreciated...
Click to expand...

You can create a shortcut to diskmgmt.msc.
 
On 12/18/2007 3:26 PM On a whim, Rick Altman pounded out on the keyboard
I have a regular need to remove and reassign a drive letter to a volume in
my system and I would like to know if the Disk Management function within
the Computer Management console has a command line interface (so that I can
write a batch file) or if a VBA script could automate a procedure whereby I
assisn and unassign a specific drive letter to a particular volume.

Any input would be appreciated...
Click to expand...

Hi Rick,

This should help you get the job done:
http://support.microsoft.com/kb/300415/

--
Terry R.

***Reply Note***
Anti-spam measures are included in my email address.
Delete NOSPAM from the email address after clicking Reply.
 
--changeDtoQ.vbs--cut here--
strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")

Set colVolumes = objWMIService.ExecQuery _
("Select * from Win32_Volume Where Name = 'D:\\'")

For Each objVolume in colVolumes
objVolume.DriveLetter = "Q:"
objVolume.Put_
Next
--cut here--
 
On 12/18/2007 10:41 PM On a whim, Rick Altman pounded out on the keyboard
Perfect, Terry! Just what I was looking for. Thank you very much!



RA




Terry R. said:
On 12/18/2007 3:26 PM On a whim, Rick Altman pounded out on the keyboard


Hi Rick,

This should help you get the job done:
http://support.microsoft.com/kb/300415/
Click to expand...

You're quite welcome.

--
Terry R.

***Reply Note***
Anti-spam measures are included in my email address.
Delete NOSPAM from the email address after clicking Reply.
Click to expand...
 
Back
Top