installshield professional 7.0 十万火急

Question

有没有人会installshield professional 7.0

Answer 1

你是怎么加快捷方式的？我一直都是写在脚本里的，给个示例给你
//创建快捷方式 
//先判断类型，在nt下使用
if (Is(USER_ADMINISTRATOR,szIsData)==TRUE) then
       nType=COMMON;
    else
       nType=PERSONAL;
    endif;   ProgDefGroupType(nType);
szCommandLine=szAppPath^@PRODUCT_KEY;
LongPathToQuote(szCommandLine,TRUE);
AddFolderIcon( FOLDER_PROGRAMS^"华广流媒体应用",@PRODUCT_NAME,szCommandLine,"","",0,"",REPLACE);
AddFolderIcon( FOLDER_DESKTOP,@PRODUCT_NAME,szCommandLine,"","",0,"",REPLACE);
一般来说写在脚本里是万无一失的，而在设计时建立的就不太安全了，主要因素是各种操作平台不同，所以你需要事先判断一下当前的操作系统，其实也就9x和NT两种，这样才能正确创建了。

Answer 2

例子：function SetupFolders()
string szPath,szResult;  
begin   
if(FindFile(TARGETDIR ^ "AserpTool","mkWebSite.EXE",szResult)=0) then
szPath=TARGETDIR ^ "AserpTool\\mkWebSite.EXE";
LongPathToQuote(szPath,TRUE);
if SELECTED_LANGUAGE = ISLANG_CHINESE_TAIWAN  then   
AddFolderIcon(FOLDER_PROGRAMS^"ㄣ","ミ翴",
szPath,"","",0,"",REPLACE);
    else
AddFolderIcon(FOLDER_PROGRAMS^"系统工具","建立站点",
szPath,"","",0,"",REPLACE);
endif;
endif; 
if(FindFile(TARGETDIR ^ "AserpTool","CreateAcc.exe",szResult)=0) then
szPath=TARGETDIR ^ "AserpTool\\CreateAcc.exe";
LongPathToQuote(szPath,TRUE);
if SELECTED_LANGUAGE = ISLANG_CHINESE_TAIWAN  then   
AddFolderIcon(FOLDER_PROGRAMS^"ㄣ","承眀甅",
szPath,"","",0,"",REPLACE);
else
AddFolderIcon(FOLDER_PROGRAMS^"系统工具","创建帐套",
szPath,"","",0,"",REPLACE);
endif;
endif;return 0;
end;
function OnMoved()
STRING szMsg,szResult,szProgram;  
begin 
    szProgram = DISK1TARGET ^ "setup.exe";   
    LongPathToQuote(szProgram,TRUE);
if SELECTED_LANGUAGE = ISLANG_CHINESE_TAIWAN  then   
    AddFolderIcon( FOLDER_PROGRAMS ^ "ㄣ","更╰参", szProgram, "", "", 0, "", REPLACE); 
else
      AddFolderIcon( FOLDER_PROGRAMS ^ "系统工具","卸载系统", szProgram, "", "", 0, "", REPLACE); 
endif;    
return 0;
end;

Answer 3

在快捷方式属性里：target:[installdir]\app.exe

Answer 4

file里，将所有地文件都包含进去（我想你应该都包含廖）
setup files/billboard :disk \将所有地文件都包含进去

Answer 5

可以在shortcut中设置，不需要脚本的。
另外，出8.0了，我上周刚下了一个。