Breadcrumbs

[muttley1968]

i have been making a nice app launcher and it is like one snipit away from working i need to know how to make it soo if you drag an appication .exe into a listview how can i then make it add that to a folder


example

they drag in itunes.exe it adds it to my list view and allso to the desktop folder soo that the app can rember it on every launch

[AnoPem]

Is this what your looking for ?

[muttley1968]

Not exactly i am using this code in a listview to make it show desktop items it works and starts the program but i want to add a drag and drop feture soo that when it is added to the listview it also adds it to the desktop folder in the harddrive

Code: Select all

      Private Sub lwDesktop_ItemSelectionChanged(ByVal sender As Object, ByVal e As System.Windows.Forms.ListViewItemSelectionChangedEventArgs) Handles lwDesktop.ItemSelectionChanged
        fileName = My.Computer.FileSystem.SpecialDirectories.Desktop + "\" + e.Item.Text
    End Sub
    Private Sub lwDesktop_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles lwDesktop.DoubleClick
        Process.Start(fileName)
    End Sub
    Dim fileName As String = ""
    Dim folderLocation As String = My.Computer.FileSystem.SpecialDirectories.Desktop
  For Each I In My.Computer.FileSystem.GetFiles(My.Computer.FileSystem.SpecialDirectories.Desktop)
            Dim Desktop_Icon_add As System.Drawing.Icon = Icon.ExtractAssociatedIcon(I)
            DesktopImages.Images.Add(Desktop_Icon_add.ToBitmap)
            I = I.Replace(My.Computer.FileSystem.SpecialDirectories.Desktop & "\", "")
            lwDesktop.Items.Add(I, DesktopImages.Images.Count - 1)
        Next

[AnoPem]

Not exactly i am using this code in a listview to make it show desktop items it works and starts the program but i want to add a drag and drop feture soo that when it is added to the listview it also adds it to the desktop folder in the harddrive

Code: Select all

      Private Sub lwDesktop_ItemSelectionChanged(ByVal sender As Object, ByVal e As System.Windows.Forms.ListViewItemSelectionChangedEventArgs) Handles lwDesktop.ItemSelectionChanged
        fileName = My.Computer.FileSystem.SpecialDirectories.Desktop + "\" + e.Item.Text
    End Sub
    Private Sub lwDesktop_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles lwDesktop.DoubleClick
        Process.Start(fileName)
    End Sub
    Dim fileName As String = ""
    Dim folderLocation As String = My.Computer.FileSystem.SpecialDirectories.Desktop
  For Each I In My.Computer.FileSystem.GetFiles(My.Computer.FileSystem.SpecialDirectories.Desktop)
            Dim Desktop_Icon_add As System.Drawing.Icon = Icon.ExtractAssociatedIcon(I)
            DesktopImages.Images.Add(Desktop_Icon_add.ToBitmap)
            I = I.Replace(My.Computer.FileSystem.SpecialDirectories.Desktop & "\", "")
            lwDesktop.Items.Add(I, DesktopImages.Images.Count - 1)
        Next

Are you trying to make an rocket dock alike program ?

[muttley1968]

sorta yes but mine has diffrent fetures i know how to make that system write to a text file but not put a copy of the .exe into a folder for it to read from

[muttley1968]

sorry for double post but can anyone help

[CodenStuff]

Why are you copying the .exe file to a desktop folder?. I dont think that would be a good idea because a lot of software comes with dll's and resources required for it to work.

It would be better to save each exe location to a text file or even a string collection and use that instead of reading the contents from a folder.

[muttley1968]

umm well yh you could do it that way but i mean like creating shortcuts to the desktop folder just like you would normall buy draging and droping it from start menu on just that is the way i have desined the code to get the programs icon