İçeriğe geç
ShiftDelete.Net
Haber ara/ SDN'ye SorGiriş
Haber Akışı SDNTV İnceleme Forum Yapay Zeka Akıllı Telefon Elektrikli Otomobil Oyun ShiftDelete.Net Global Teknoloji Haberleri Mobil Otomobil Donanım Savunma Bilim Sosyal Medya İnternet Giyilebilir Teknoloji Rehber Ürünler Son dakika Yazarlar
  1. Ana sayfa
  2. Topluluk
  3. Programlama
  4. Programlama Dilleri
Programlama Dilleri

Visual basic 2010 yardım gerek..

cankaya0510.02.20153 cevap2.150 görüntüleme
2015'den beri4 mesaj
#1
Merhaba arkadaşlar visual basic 2010 üzerinde bir çalışma yapmaya çalışıyorum ama bi türlü beceremedim..bilgili olan bir arkadaş beni aydınlatırsa çok iyi olur :crying:

Ne yapmaya çalıştığımı sorarsanız ;

Bir adet buton koyup tıkladığında (.exe) dosya seçme ekranı göstermek istiyorum..Buraya kadar basit gözüke bilir ama burdan sonrası biraz bilgi gerektiriyor ki ben yapamadım..Herneyse.Dosyayı seçtikten sonra "hedef" yazan bölümü editleyip masa üstüne kısayolunu oluştursun istiyorum.Yani örnek verirsek..Programı açan kişi dosya seçicek ve seçtiği dosyanın kısa yolu masa üstüne gidicek.Ama masa üstüne giden kısa yolun hedef bölümü benim editlediğim gibi olcak yani;
örn: "C:\Program Files (x86)\program\program.exe" bu şekilde kısa yol olucak ama benim yaptığım program bu yolun sonuna "-high -exec" komutunu ekliyecek yani kişi dosyayı seçtiğinde şu şekilde kısayolun olmasını istiyorum.
"C:\Program Files (x86)\program\program.exe high -exec"

Anlatması çok zor ve yapması ondanda zor :huh:

Yardımınızı eksik etmeyin arkadaşlar :hammer:
Cevaplar
cankaya05 Konuyu açan
2015'den beri4 mesaj
#2
Hiçmi anlayan yok bu konuda ? en azından olur-olmaz bir yorum ekleyin beyler.
2011'den beri9.780 mesaj
#3

[COLOR=#00008B]Imports[/COLOR][COLOR=#000000] IWshRuntimeLibrary

[/COLOR][COLOR=#00008B]Private[/COLOR][COLOR=#00008B]Sub[/COLOR][COLOR=#000000] CreateShortCut[/COLOR][COLOR=#000000]([/COLOR][COLOR=#00008B]ByVal[/COLOR][COLOR=#000000] FileName [/COLOR][COLOR=#00008B]As[/COLOR][COLOR=#00008B]String[/COLOR][COLOR=#000000],[/COLOR][COLOR=#00008B]ByVal[/COLOR][COLOR=#000000] Title [/COLOR][COLOR=#00008B]As[/COLOR][COLOR=#00008B]String[/COLOR][COLOR=#000000])[/COLOR][COLOR=#000000]
    [/COLOR][COLOR=#00008B]Try[/COLOR][COLOR=#000000]
        [/COLOR][COLOR=#00008B]Dim[/COLOR][COLOR=#000000] WshShell [/COLOR][COLOR=#00008B]As[/COLOR][COLOR=#00008B]New[/COLOR][COLOR=#000000] WshShell
        [/COLOR][COLOR=#808080]' short cut files have a .lnk extension[/COLOR][COLOR=#000000]
        [/COLOR][COLOR=#00008B]Dim[/COLOR][COLOR=#000000] shortCut [/COLOR][COLOR=#00008B]As[/COLOR][COLOR=#000000] IWshRuntimeLibrary[/COLOR][COLOR=#000000].[/COLOR][COLOR=#000000]IWshShortcut [/COLOR][COLOR=#000000]=[/COLOR][COLOR=#00008B]DirectCast[/COLOR][COLOR=#000000]([/COLOR][COLOR=#000000]WshShell[/COLOR][COLOR=#000000].[/COLOR][COLOR=#000000]CreateShortcut[/COLOR][COLOR=#000000]([/COLOR][COLOR=#000000]FileName[/COLOR][COLOR=#000000],[/COLOR][COLOR=#000000] IWshRuntimeLibrary[/COLOR][COLOR=#000000].[/COLOR][COLOR=#000000]IWshShortcut[/COLOR][COLOR=#000000])[/COLOR][COLOR=#000000]

        [/COLOR][COLOR=#808080]' set the shortcut properties[/COLOR][COLOR=#000000]
        [/COLOR][COLOR=#00008B]With[/COLOR][COLOR=#000000] shortCut
            [/COLOR][COLOR=#000000].[/COLOR][COLOR=#000000]TargetPath [/COLOR][COLOR=#000000]=[/COLOR][COLOR=#000000] Application[/COLOR][COLOR=#000000].[/COLOR][COLOR=#000000]ExecutablePath
            [/COLOR][COLOR=#000000].[/COLOR][COLOR=#000000]WindowStyle [/COLOR][COLOR=#000000]=[/COLOR][COLOR=#800000]1I[/COLOR][COLOR=#000000]
            [/COLOR][COLOR=#000000].[/COLOR][COLOR=#000000]Description [/COLOR][COLOR=#000000]=[/COLOR][COLOR=#000000] Title
            [/COLOR][COLOR=#000000].[/COLOR][COLOR=#000000]WorkingDirectory [/COLOR][COLOR=#000000]=[/COLOR][COLOR=#000000] Application[/COLOR][COLOR=#000000].[/COLOR][COLOR=#000000]StartupPath
            [/COLOR][COLOR=#808080]' the next line gets the first Icon from the executing program[/COLOR][COLOR=#000000]
            [/COLOR][COLOR=#000000].[/COLOR][COLOR=#000000]IconLocation [/COLOR][COLOR=#000000]=[/COLOR][COLOR=#000000] Application[/COLOR][COLOR=#000000].[/COLOR][COLOR=#000000]ExecutablePath [/COLOR][COLOR=#000000]&[/COLOR][COLOR=#800000]", 0"[/COLOR][COLOR=#000000]
            [/COLOR][COLOR=#000000].[/COLOR][COLOR=#000000]Arguments [/COLOR][COLOR=#000000]=[/COLOR][COLOR=#00008B]String[/COLOR][COLOR=#000000].[/COLOR][COLOR=#000000]Empty
            [/COLOR][COLOR=#000000].[/COLOR][COLOR=#000000]Save[/COLOR][COLOR=#000000]()[/COLOR][COLOR=#808080]' save the shortcut file[/COLOR][COLOR=#000000]
        [/COLOR][COLOR=#00008B]End[/COLOR][COLOR=#00008B]With[/COLOR][COLOR=#000000]
    [/COLOR][COLOR=#00008B]Catch[/COLOR][COLOR=#000000] ex [/COLOR][COLOR=#00008B]As[/COLOR][COLOR=#000000] System[/COLOR][COLOR=#000000].[/COLOR][COLOR=#000000]Exception
        MessageBox[/COLOR][COLOR=#000000].[/COLOR][COLOR=#000000]Show[/COLOR][COLOR=#000000]([/COLOR][COLOR=#800000]"Could not create the shortcut"[/COLOR][COLOR=#000000]&[/COLOR][COLOR=#000000] Environment[/COLOR][COLOR=#000000].[/COLOR][COLOR=#000000]NewLine [/COLOR][COLOR=#000000]&[/COLOR][COLOR=#000000] ex[/COLOR][COLOR=#000000].[/COLOR][COLOR=#000000]Message[/COLOR][COLOR=#000000],[/COLOR][COLOR=#000000] g_strAppTitleVersion[/COLOR][COLOR=#000000],[/COLOR][COLOR=#000000] MessageBoxButtons[/COLOR][COLOR=#000000].[/COLOR][COLOR=#000000]OK[/COLOR][COLOR=#000000],[/COLOR][COLOR=#000000] MessageBoxIcon[/COLOR][COLOR=#000000].[/COLOR][COLOR=#00008B]Error[/COLOR][COLOR=#000000])[/COLOR][COLOR=#000000]
    [/COLOR][COLOR=#00008B]End[/COLOR][COLOR=#00008B]Try[/COLOR][COLOR=#000000]
[/COLOR][COLOR=#00008B]End[/COLOR][COLOR=#00008B]Sub

[/COLOR]


http://stackoverflow.com/questions/5569843/how-to-create-shortcut-on-desktop-in-vb-net-without-installer
cankaya05 Konuyu açan
2015'den beri4 mesaj
#4
Yorumun için teşekkür ederim ama biraz açıklamada bulunabilirmisin ?

Cevabını yaz

Cevap yazmak için giriş yap ya da üye ol. Eski forum kullanıcı adın ve parolanla girebilirsin.