Creating IE-Style Shortcut on the Desktop

When you execute this code, youll be getting an icon on the desktop with "Netlinker" as its shortcut name. If you double click it, itll open the Internet Explorer and if you right click, you can see a customized menu with no cut, copy, paste, rename items. Even you cannot delete this shortcut from the desktop. If you select the properties of this icon, itll open the Internet properties dialog box.

Choose a 32x32 icon and specify its path.

CString shtct_ico=_T("C:\\32x32.ico");

CString shtct_prop=_T("rundll32.exe shell32.dll,
                      Control_RunDLL inetcpl.cpl,,0");

CString shtct_name=_T("Netlinker");

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;

CRegKey m_kdsktp;

m_kdsktp.Create(HKEY_CLASSES_ROOT,
                "CLSID\\{6270AEE4-AA41-11d4-A25D-"
                "008048B63F94}");

m_kdsktp.SetValue(shtct_name);

m_kdsktp.Close();

m_kdsktp.Create(HKEY_CLASSES_ROOT,
                "CLSID\\{6270AEE4-AA41-11d4-A25D"
                "-008048B63F94}\\DefaultIcon");

m_kdsktp.SetValue(shtct_ico);

m_kdsktp.Close();

Now set the menu items for the right click menu.

Here is the Open menu item and its executable is set

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();

Now set the attributes of the menu so that the default menu items such as cut, copy, paste, rename, delete etc are removed.

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();

Now we have to create a reference for this GUID under HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\Desktop\Namespace. Then only itll appear on the desktop.

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();

SHChangeNotify(SHCNE_ASSOCCHANGED,SHCNF_FLUSHNOWAIT, 0, 0);