我用InstallShield6.30怎么在脚本中创建快捷方式?

我用InstallShield6.30怎么在脚本中创建快捷方式?用CreateShellObjects函数吗,不对,请问诸位大侠有办法吗?

解决方案 »

  1.   

    哈哈，这个我会。Set Shell = CreateObject("WScript.Shell")
    DesktopPath = Shell.SpecialFolders("Desktop")
    Set link = Shell.CreateShortcut(DesktopPath & "\test.lnk")
    link.Arguments = "1 2 3"
    link.Description = "test shortcut"
    link.HotKey = "CTRL+ALT+SHIFT+X"
    link.IconLocation = "foo.exe,1"
    link.TargetPath = "c:\blah\foo.exe"
    link.WindowStyle = 3
    link.WorkingDirectory = "c:\blah"
    link.Save
      

  2.   

    楼上的老大,请问你的第一句:Set Shell = CreateObject("WScript.Shell");这个Shell应该定义成什么类型?
    我是有InstallShield6.3中使用的脚本,请继续指教,谢谢!
      

  3.   

    还在用InstallShield，如果是盗版的就等人家来抓你吧。
      

  4.   

    楼上的老大,不用InstallShield用什么呢?
      

  5.   

    to liuxiaoyi666(MSMVP 小猪妹荣誉马甲之八卦兔子):我现在想把快捷方式放到"开始->程序->公司名->产品名"这里,我该怎么做,谢谢!
      

  6.   

    InstallShield我用的是10.5 express 支持vbs。//我现在想把快捷方式放到"开始->程序->公司名->产品名"这里,我该怎么做,谢谢!InstallShield配置里就支持，不用写代码