1.5w+
社区成员
- 主页
- VC综合技术
- 互联网技术
- MFC AppLauncher
- .NET 技术
- 界面
- 进程
- 算法
- 硬件/系统
- 数据库
- VC++技术资源
如何在开始菜单的程序组里添加项目？用Shell实现，不要用DDE
...全文
请发表友善的回复…
发表回复
boodweb 2001-05-06
1？怎么不能给分啊
boodweb 2001-05-06
aaa
boodweb 2001-05-06
不行:))
boodweb 2001-05-06
给自己加分试试
boodweb 2001-05-06
OK
送你们点分吧
送你们点分吧
boodweb 2001-05-04
到底谁在问问题啊:))
好不容易在MSDN找到的：详见MSDN中“SHORTCUT: A SampleThat Manipulates Shortcuts”一文
这是我的实现，注意事先要调用CoInitialize()
BOOL CTestDlg::SetAutoRun(BOOL bAdd)
{
HRESULT hres;
IShellLink *psl;
BOOL bRet=FALSE;
char pszDesPath[MAX_PATH],pszShortcutFile[MAX_PATH];
::GetModuleFileName(NULL,pszShortcutFile,MAX_PATH);
SHGetSpecialFolderPath(m_hWnd,pszDesPath,CSIDL_PROGRAMS,0);
strcat(pszDesPath,"\\启动\\自动运行.lnk");
if(!bAdd)
return DeleteFile(pszDesPath);
hres = CoCreateInstance (CLSID_ShellLink, NULL, CLSCTX_INPROC_SERVER,
IID_IShellLink, (void **)&psl);
if (!SUCCEEDED(hres)) goto error;
IPersistFile *ppf;
// Query IShellLink for the IPersistFile interface for
// saving the shortcut in persistent storage.
hres = psl->QueryInterface (IID_IPersistFile, (void **)&ppf);
if (!SUCCEEDED (hres)) goto error;
WORD wsz [MAX_PATH]; // buffer for Unicode string
// Set the path to the shortcut target.
hres = psl->SetPath (pszShortcutFile);
if (! SUCCEEDED (hres)) goto error;
hres = psl->SetArguments("/auto");
if (! SUCCEEDED (hres)) goto error;
// Set the description of the shortcut.
hres = psl->SetDescription ("Shortcut to ScreenColor");
if (! SUCCEEDED (hres)) goto error;
// Ensure that the string consists of ANSI characters.
MultiByteToWideChar (CP_ACP, 0, pszDesPath, -1, wsz, MAX_PATH);
// Save the shortcut via the IPersistFile::Save member function.
hres = ppf->Save (wsz, TRUE);
if (! SUCCEEDED (hres)) goto error;
bRet=TRUE;
// Release the pointer to IPersistFile.
error:
ppf->Release ();
// Release the pointer to IShellLink.
psl->Release ();
return TRUE;
}
好不容易在MSDN找到的：详见MSDN中“SHORTCUT: A SampleThat Manipulates Shortcuts”一文
这是我的实现，注意事先要调用CoInitialize()
BOOL CTestDlg::SetAutoRun(BOOL bAdd)
{
HRESULT hres;
IShellLink *psl;
BOOL bRet=FALSE;
char pszDesPath[MAX_PATH],pszShortcutFile[MAX_PATH];
::GetModuleFileName(NULL,pszShortcutFile,MAX_PATH);
SHGetSpecialFolderPath(m_hWnd,pszDesPath,CSIDL_PROGRAMS,0);
strcat(pszDesPath,"\\启动\\自动运行.lnk");
if(!bAdd)
return DeleteFile(pszDesPath);
hres = CoCreateInstance (CLSID_ShellLink, NULL, CLSCTX_INPROC_SERVER,
IID_IShellLink, (void **)&psl);
if (!SUCCEEDED(hres)) goto error;
IPersistFile *ppf;
// Query IShellLink for the IPersistFile interface for
// saving the shortcut in persistent storage.
hres = psl->QueryInterface (IID_IPersistFile, (void **)&ppf);
if (!SUCCEEDED (hres)) goto error;
WORD wsz [MAX_PATH]; // buffer for Unicode string
// Set the path to the shortcut target.
hres = psl->SetPath (pszShortcutFile);
if (! SUCCEEDED (hres)) goto error;
hres = psl->SetArguments("/auto");
if (! SUCCEEDED (hres)) goto error;
// Set the description of the shortcut.
hres = psl->SetDescription ("Shortcut to ScreenColor");
if (! SUCCEEDED (hres)) goto error;
// Ensure that the string consists of ANSI characters.
MultiByteToWideChar (CP_ACP, 0, pszDesPath, -1, wsz, MAX_PATH);
// Save the shortcut via the IPersistFile::Save member function.
hres = ppf->Save (wsz, TRUE);
if (! SUCCEEDED (hres)) goto error;
bRet=TRUE;
// Release the pointer to IPersistFile.
error:
ppf->Release ();
// Release the pointer to IShellLink.
psl->Release ();
return TRUE;
}
elang 2001-05-04
想知道
jsd198 2001-05-04
我很关注（jsd198@163.net）