Creating Shortcuts [.lnk] on Desktop

[__]H[elroos]

hi mpgh, i want a help.

I want to know how to create a link of my program on the desktop.

-------------------------------------------------------------------------------------

I will know how to put in a listbox all the .dll files in a folder (I choose the folder and in the listbox must be there all the files with a specified format, like .dll or .txt)

['Bruno]

I cant really understand what you say, you mean, a shortcut? :s

[__]H[elroos]

Yes, when you do a right click on the desktop, under "Folder" there is "Link", in english it's "Shortcut"? xD

['Bruno]

Yes, right click your app and create a shortcut of it o.O

[Hassan]

Yes, right click your app and create a shortcut of it o.O

Lol, I think he wants to do this using VB though!

---------- Post added at 04:59 AM ---------- Previous post was at 04:56 AM ----------

hi mpgh, i want a help.

I want to know how to create a link of my program on the desktop.

-------------------------------------------------------------------------------------

I will know how to put in a listbox all the .dll files in a folder (I choose the folder and in the listbox must be there all the files with a specified format, like .dll or .txt)

Couple of links that may be of help to you:

Create a Desktop shortcut
Creating Shell Links (Shortcuts) in .NET Programs Using WSH - CodeProject
winforms - how to create shortcut on desktop in vb.net without installer - Stack Overflow

[__]H[elroos]

ç_ç i dont understand these tuts.

I try the 3rd link.

---------- Post added at 10:56 AM ---------- Previous post was at 10:48 AM ----------

ç_ç Too many errors.
I think it's a short code, like "Shortcut.Creatr(C:\Program.exe , my.computer.filesystem.specialdiectories.desktop & \Shortcut.lnk)" xD

Can anyone try it (Not my example xD) and posta working code?

[__]H[elroos]

Nothing?? Help me pls ç_ç

[Blubb1337]

ç_ç i dont understand these tuts.

I try the 3rd link.

---------- Post added at 10:56 AM ---------- Previous post was at 10:48 AM ----------

ç_ç Too many errors.
I think it's a short code, like "Shortcut.Creatr(C:\Program.exe , my.computer.filesystem.specialdiectories.desktop & \Shortcut.lnk)" xD

Can anyone try it (Not my example xD) and posta working code?

Did you even add a reference to the Windows Script Host Object Model?

[__]H[elroos]

Yes, but when i do the debug there isnt ant shortcut on the desktop D:

[Blubb1337]

Yes, but when i do the debug there isnt ant shortcut on the desktop D:

You are probably not using the parameters right. Show me the code you are using.

[__]H[elroos]

For now no one
because no one of these posted by hassan are working for me :|

[Hassan]

For now no one
because no one of these posted by hassan are working for me :|

It is not my problem that you are just copying and pasting the code with out using any of your sense(s). I can't spoon feed you. I gave you the links. Read them carefully.

[__]H[elroos]

I dont do only C&P.
I've read these correctly and writed correctly.
No one error but when i use this code there isnt any shortcut.

[Hassan]

I dont do only C&P.
I've read these correctly and writed correctly.
No one error but when i use this code there isnt any shortcut.

Post your code then, as Blubb said.

[__]H[elroos]

Ok i'm using this code:

Imports IWshRuntimeLibrary
Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim WshShell As WshShellClass = New WshShellClass
Dim MyShortcut As IWshRuntimeLibrary.IWshShortcut
Dim DesktopFolder As String = Environment.GetFolderPath(Environment.SpecialFolde r.DesktopDirectory)
MyShortcut = CType(WshShell.CreateShortcut(DesktopFolder & "\MyShortcutName.lnk"), IWshRuntimeLibrary.IWshShortcut)
MyShortcut.TargetPath = Application.StartupPath & "\YourApp.exe" 'Specify target app full path
MyShortcut.Save()
End Sub
End Class

Error:

Errore 1 Impossibile incorporare il tipo di interoperabilità 'WshShellClass'. In alternativa, utilizzare l'interfaccia applicabile. C:\Users\****\AppData\Local\Temporary Projects\WindowsApplication1\Form1.vb 5 41 WindowsApplication1