Results 1 to 6 of 6

Thread: Desktop Shortcut VB5

  1. #1

    Thread Starter
    Junior Member
    Join Date
    Sep 2000
    Location
    Bogota - Colombia
    Posts
    23

    Desktop Shortcut VB5

    How do I make a Shortcut of my program to the desktop?


    Thanks
    Santiago Torres

  2. #2
    -= B u g S l a y e r =- peet's Avatar
    Join Date
    Aug 2000
    Posts
    9,629
    Normally you do that when you distribute your app.
    Its done by the installation program that you use.

    could you be more specific ?
    -= a peet post =-

  3. #3

    Thread Starter
    Junior Member
    Join Date
    Sep 2000
    Location
    Bogota - Colombia
    Posts
    23
    I am using the instalation program that came with VB5.
    Do I just copy a shortcut to the files included in my app and as destination $desktop$?
    or
    how do I tell the instalation program to creat a short cut in the desktop?

  4. #4
    -= B u g S l a y e r =- peet's Avatar
    Join Date
    Aug 2000
    Posts
    9,629
    oh.. I see.. sorry, I'v never used that setup program. I always used Wise.

    Have you tried what you suggested yourself?
    -= a peet post =-

  5. #5
    -= B u g S l a y e r =- peet's Avatar
    Join Date
    Aug 2000
    Posts
    9,629
    btw, from what I can remember, the 'Setup program' that came with vb5 was not too good... ??

    you could always use Inno Setup , which is free, and can do proper setups.
    -= a peet post =-

  6. #6
    PowerPoster
    Join Date
    Nov 2001
    Location
    Trying to reach and stay in the cloud
    Posts
    2,089

    hi

    Not very sure you need this but just in case, you can make a shortcut through your code. Place it in the runonce reg.
    Add a refernce to windows scripting host.
    Here's the code:

    Code:
    DesktopPath = oShell.SpecialFolders("AllUsersDesktop")
    Set MyShortcut = oShell.CreateShortcut(DesktopPath  "\MyApp.lnk")  ' Set shortcut object properties and save it
    mPath = App.path & "\" & app.EXEName 
    MyShortcut.TargetPath = mPath
    MyShortcut.WorkingDirectory = App.Path
    MyShortcut.Save

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  



Click Here to Expand Forum to Full Width