得之我幸 失之我命

when someone abandons you,it is him that gets loss because he lost someone who truly loves him but you just lost one who doesn’t love you.

注册表右键菜单二之 CLSID

关于CLSID:
CLSID(Class Identifier)是指windows系统对于不同的应用程序,文件类型,OLE对象,特殊文件夹以及各种系统组件分配一个唯一表示它的ID代码,用于对其身份的标示和与其他对象进行区分。

根据CLSID查询对应的DLL:
Dll_RegPath = HKEY_CLASSES_ROOT\CLSID\<GUID>\InProcServer32
vbs代码:

1
2
3
4
5
6
7
8
9
10
11
12
13
Sub Main
' used to find location of "System.Collections.ArrayList" progid dll
Const csGUID = "{6896B49D-7AFB-34DC-934E-5ADD38EEEE39}"
MsgBox srGetDllPathByGUID(csGUID)
End Sub
Function srGetDllPathByGUID( sGUID )
Const csRegPath = "HKEY_CLASSES_ROOT\CLSID\<GUID>\InProcServer32\"
Dim oShell: Set oShell = CreateObject("WScript.Shell")
Dim sReg: sReg = Replace( csRegPath, "<GUID>", sGUID ) ' build str
srGetDllPathByGUID = oShell.RegRead(sReg)
Set oShell = Nothing ' clean up
End Function
Call Main

根据CLSID查询对应的ProgID:
ProgID_RegPath = HKEY_CLASSES_ROOT\CLSID\<GUID>\ProgID

常见组件或程序类对应的CLSID:
我的电脑 {20D04FE0-3AEA-1069-A2D8-08002B30309D}
我的文档 {450D8FBA-AD25-11D0-98A8-0800361B1103}
控制面板 {21EC2020-3AEA-1069-A2DD-08002B30309D}
打印机 {2227A280-3AEA-1069-A2DE-08002B30309D}
记事本 {1FBA04EE-3024-11D2-8F1F-0000F87ABD16}
网络邻居 {208D2C60-3AEA-1069-A2D7-08002B30309D}
回收站 {645FF040-5081-101B-9F08-00AA002F954E}
搜索-计算机{1f4de370-d627-11d1-ba4f-00a0c91eedba}
文件 {00020c01-0000-0000-c000-000000000046}
无关联文件文件名 {00021401-0000-0000-c000-000000000046}
BMP文件文件名 {d3e34b21-9d75-101a-8c3d-00aa001a1652}
HTML文件文件名 {25336920-03f9-11cf-8fd0-00aa00686f13}
媒体剪辑文件文件名 {00022601-0000-0000-c000-000000000046}
收藏夹文件名 {1a9ba3a0-143a-11cf-8350-444553540000}
excel {00020810-0000-0000-C000-000000000046}
word {00020900-0000-0000-C000-000000000046}

be yourself, everyone else is already taken.