Win7 下 VHD 文件右键增强

veteran

拷贝以下VBS代码，保存为：c:\windows\system32\vdm.vbs

1. Select Case Wscript.Arguments(0)
   
2. 
   
3.         Case "/H"
   
4.                 Set objShell = WScript.CreateObject("Wscript.Shell")
   
5.                 objShell.Run "cscript.exe " & Wscript.ScriptFullName & " " _
   
6.                         & WScript.Arguments(1) & " " _
   
7.                         & WScript.Arguments(2), 0, TRUE
   
8.                 WScript.Quit(0)
   
9.                
   
10.         Case "/A"                 
    
11.                 Set objShell = CreateObject("Shell.Application")
    
12.                 objShell.ShellExecute "wscript.exe", WScript.ScriptFullName & " /H " _
    
13.                         & WScript.Arguments(2) & " " _
    
14.                         & WScript.Arguments(3), "", "runas", 1
    
15.                 WScript.Quit(0)
    
16.                
    
17.         Case "/M"
    
18.                 Set objShell = WScript.CreateObject("Wscript.Shell")
    
19.                 Set objExec = objShell.Exec("c:\windows\system32\diskpart.exe")
    
20.                
    
21.                 objExec.StdIn.WriteLine "select vdisk file=" & WScript.Arguments(1) & ""
    
22.                 objExec.StdIn.WriteLine "attach vdisk"
    
23.                 objExec.StdIn.WriteLine "exit"
    
24. 
    
25.                 WScript.Quit(0)
    
26.                
    
27.         Case "/D"
    
28.                 Set objShell = WScript.CreateObject("Wscript.Shell")
    
29.                 Set objExec = objShell.Exec("c:\windows\system32\diskpart.exe")
    
30.                
    
31.                 objExec.StdIn.WriteLine "select vdisk file=" & WScript.Arguments(1) & ""
    
32.                 objExec.StdIn.WriteLine "detach vdisk"
    
33.                 objExec.StdIn.WriteLine "exit"
    
34. 
    
35.                 WScript.Quit(0)
    
36.                
    
37.         Case Else
    
38.                 'other
    
39.                 WScript.Quit(0)
    
40. End Select
    
41. 
    

复制代码

导入如下注册表文件即可：

1. Windows Registry Editor Version 5.00
   
2. 
   
3. [HKEY_LOCAL_MACHINE\SOFTWARE\Classes\Virtual.Machine.HD\Shell]
   
4. @="none"
   
5. 
   
6. [HKEY_LOCAL_MACHINE\SOFTWARE\Classes\Virtual.Machine.HD\Shell\Dismount]
   
7. @="分离 VHD(&D)"
   
8. 
   
9. [HKEY_LOCAL_MACHINE\SOFTWARE\Classes\Virtual.Machine.HD\Shell\Dismount\command]
   
10. @=""C:\\windows\\system32\\wscript.exe" C:\\Windows\\System32\\vdm.vbs /A /H /D "%1""
    
11. 
    
12. [HKEY_LOCAL_MACHINE\SOFTWARE\Classes\Virtual.Machine.HD\Shell\Mount]
    
13. @="挂载 VHD(&M)"
    
14. 
    
15. [HKEY_LOCAL_MACHINE\SOFTWARE\Classes\Virtual.Machine.HD\Shell\Mount\command]
    
16. @=""C:\\windows\\system32\\wscript.exe" C:\\Windows\\System32\\vdm.vbs /A /H /M "%1""
    
17. 
    
18. [HKEY_CLASSES_ROOT\.vhd]
    
19. @="Virtual.Machine.HD"

复制代码

VHD 右键增强.rar (967 Bytes, 下载次数: 235)

2013-2-24 16:02 上传

点击文件名下载附件