执行这段代码，你会在桌面上获得一个名叫"Netlinker"的图标，右击它，
你会看到一个定制的菜单（没有剪切、复制、粘贴、重命名等菜单祥）。
你甚至不能把它从桌面上删除，如果你选“属性”，它会打开IE的属性对话框
选一个图标文件
CString shtct_ico=_T("C:\\32x32.ico");
显示IE属性对话框.
CString shtct_prop=_T("rundll32.exe shell32.dll,Control_RunDLL inetcpl.cpl,,0");
快捷方式的名字
CString shtct_name=_T("Netlinker");
找到IE的路径并保存它.
CRegKey m_Kiepath;
CString ie_path;
DWORD dwval;
m_Kiepath.Open(HKEY_LOCAL_MACHINE,
"SOFTWARE\\Microsoft\\Windows\\"
"CurrentVersion\\App Paths\\IEXPLORE.EXE");
m_Kiepath.QueryValue(ie_path.GetBuffer(1000),
NULL,
&dwval);
m_Kiepath.Close();
CString shtct_to=ie_path;
用guidgen.exe创建一个GUID并复制粘贴到这里。这是用来表现我们的快捷方式和它
的菜单项的。我用guidgen.ext创建的GUID是6270AEE4-AA41-11d4-A25D-008048B63F94。
下面的程序在HKCR\CLSID创建这个 GUID 键，并且将快捷方式的值设为它。哦，在这里补充一句，guidgen.exe 在哪里呢？ 开始->运行->guidgen.exe-> new Guid
CRegKey m_kdsktp;
m_kdsktp.Create(HKEY_CLASSES_ROOT,
"CLSID\\{6270AEE4-AA41-11d4-A25D-"
"008048B63F94}");
m_kdsktp.SetValue(shtct_name);
m_kdsktp.Close();
在这个GUID下创建DefaultIcon 键, 它是用来表现快捷方式的图标的
并把他的值设为相应的图标文件的路径.
m_kdsktp.Create(HKEY_CLASSES_ROOT,
"CLSID\\{6270AEE4-AA41-11d4-A25D"
"-008048B63F94}\\DefaultIcon");
m_kdsktp.SetValue(shtct_ico);
m_kdsktp.Close();
设置右击菜单的菜单项.
设置打开菜单项
m_kdsktp.Create(HKEY_CLASSES_ROOT,
"CLSID\\{6270AEE4-AA41-11d4-A25D-"
"008048B63F94}\\Shell\\Open\\Command");
m_kdsktp.SetValue(shtct_to);
m_kdsktp.Close();
设置属性菜单项.
m_kdsktp.Create(HKEY_CLASSES_ROOT,
"CLSID\\{6270AEE4-AA41-11d4-A25D-"
"008048B63F94}\\Shell\\Properties\\Command");
m_kdsktp.SetValue(shtct_prop);
m_kdsktp.Close();
把原来的缺省菜单项（如复制粘贴等）去掉.
BYTE *b;
HANDLE heap;
char a[20];
m_kdsktp.Create(HKEY_CLASSES_ROOT,
"CLSID\\{6270AEE4-AA41-11d4-A25D-"
"008048B63F94}\\ShellFolder");
strcpy(a,"00.00.00.00");
heap=HeapCreate(0,0,0);
b=(BYTE*)HeapAlloc(heap,0,30);
sscanf(a,
"%x.%x.%x.%x",
&b[0],
&b[1],
&b[2],
&b[3]);
RegSetValueEx(m_kdsktp.m_hKey,
"Attributes",
0,
REG_BINARY,
b,
4);
HeapFree(heap, 0, b);
HeapDestroy(heap);
m_kdsktp.Close();
接下来我们添加一个引用到
HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\Desktop\Namespace
这样它将只显示在桌面上。
m_kdsktp.Create(HKEY_LOCAL_MACHINE,
"SOFTWARE\\Microsoft\\Windows\\"
"CurrentVersion\\Explorer\\Desktop\\"
"NameSpace\\{6270AEE4-AA41-11d4-A25D-"
"008048B63F94}");
m_kdsktp.SetValue("Netlink");
m_kdsktp.Close();
我们对Shell作了改动，我们要通知系统，这个改动才会马上表现出来.
SHChangeNotify(SHCNE_ASSOCCHANGED,SHCNF_FLUSHNOWAIT, 0, 0);
