在installshield中添加快捷方式到指定的文件夹

主要思路：有时根据业务需要，需要在指定的文件夹中创建快捷方式。通过INSTALLSHIELD的AddFolderIcon函数来实现在任意指定的文件夹中添加快捷方式。

AddFolderIcon (szProgramFolder, szItemName, szCommandLine, szWorkingDir, szIconPath, nIcon, szShortCutKey, nFlag);




/**//*--------------------------------------------------------------*




*




* InstallShield Example Script




*




* Demonstrates the AddFolderIcon function.




*




* This example places a shortcut to an executable file on the




* Start menu and the Start Programs menu.




*




* Note: Before running this script, set the preprocessor




* constants so that they reference the fully-qualified




* names of the Windows Notepad executable and a valid




* text file on the target system.




*




*--------------------------------------------------------------*/








#define PROGRAM "C:/Windows/Notepad.exe"




#define PARAM "C:/Windows/Readme.txt"








STRING szProgramFolder, szItemName, szCommandLine, szWorkingDir, szIconPath;




STRING szShortCutKey, szProgram, szParam;




NUMBER nIcon;








#include "ifx.h"




program








// Set up parameters for call to AddFolderIcon.




szProgramFolder = FOLDER_STARTMENU;




szItemName = "Notepad Example 1";








szProgram = PROGRAM;




szParam = PARAM;




LongPathToQuote (szProgram, TRUE);




LongPathToShortPath (szParam);








szCommandLine = szProgram + " " + szParam;








szWorkingDir = "";




szIconPath = "";




nIcon = 0;




szShortCutKey = "";








// Add a shortcut to the Start menu.




if (AddFolderIcon (szProgramFolder, szItemName, szCommandLine, szWorkingDir,




szIconPath, nIcon, szShortCutKey, REPLACE) < 0) then




MessageBox ("AddFolderIcon failed.", SEVERE);




else




SprintfBox (INFORMATION, "AddFolderIcon", "%s created successfully.",




szItemName);




endif;








szProgramFolder = "";




szItemName = "Notepad Example 2";








// Add a shortcut to the Programs menu.




if (AddFolderIcon (szProgramFolder, szItemName, szCommandLine, szWorkingDir,




szIconPath, nIcon, szShortCutKey, REPLACE) < 0) then




MessageBox ("AddFolderIcon failed.", SEVERE);




else




SprintfBox (INFORMATION, "AddFolderIcon", "%s created successfully.",




szItemName);




endif;




endprogram