Masaüstünden dosya çağırmak

[cem yılmaz]

Merhabalar..

Userform üzerine ekleyeceğimiz bir command buton ile masaüstündeki herhangi bir programın kısayolunu çağırabilirmiyiz?

 

[Ayhan Ercan]

Merhaba Sn yilmazcem

.Exe uzantılı dosyalar için Programın dosya yolunu yazarak Shell komutu ile kullanabilirsiniz.

Aşağıdaki Kodu inceleyiniz.

Private Sub CommandButton1_Click()
Shell "C:\Program Files\Windows Live\Messenger\msnmsgr.exe"
End Sub

 

[cem yılmaz]

şu işlem olabilirmi peki..?

"C:\Program Files\Windows Live\Messenger"

 

[Ayhan Ercan]

şu işlem olabilirmi peki..?

"C:\Program Files\Windows Live\Messenger"

Sn yilmazcem,

Sizin vermiş olduğunuz dosya yolu "Messenger" klasörüne geliyor.

İlk mesajda da belirtmiştim, .exe uzantılı dosyalar içindir Shell komutu. .com uzantılar içinde geçerlidir.
Dolayısıyla Messenger'i çalıştırabilmeniz için Msn Messengerin Uygulama Dosyası olan msnmsgr.exe yi, dosya yolu ile birlikte çağırmanız gerekmektedir.

 

[Mahmut Bayram]

Shell komutu bunun için biçilmiş kaftandır.
Şimdi masaüstünden çalıştıracağınız programın yolunu kopyalayın. Ve
aşağıdaki kodlarda siyah puntolu olan yere yolunu yapıştırın.

Private Sub CommandButton1_Click()
Call Shell("[B]Yol buraya[/B]", .vbMinimizedFocus) 'burada program minimize şekilde açılacaktır. Siz nasıl açılmasını istiyorsanız o şekilde ayarlayınız.
End Sub

Shell komutunun kullanım şekli aşağıdaki şekildedir.

Shell "[I]dosya_parametresi---dosya_uzantısı[/I]", [I]açılış_şekli

[/I]