VB.NET Program Çalıştırma

C4NG0 · 4 Haz 2016

Merhabalar Arkadaşlar Ben Bi Program Yapmak İstiyorum ve Bu Program Bi Programı Çalıştıracak Yani Aracı Gibi Bir Şey Olucak Ben Bu Aracıyı Attığım Dizinde o .exe Varsa Açacak Yoksa Uyaracak
Uyarma Bölümü Olmasada olur, Yani Dosya Yolu Belirtmiyeyim Kullananlar Programı Nereye Atarsa Atsın Notepad Varsa O Notepadı Çalıştırsın. Yardımlarınızı Bekliyorum Teşşekürler

AlicanAKCA1 · 4 Haz 2016

Kod:

dim dosyadizini as string = dir("c:\windows\notepad.exe")
if dosyadizini = "" then
msgbox("Dosya bulunamadı!" , msgboxstyle.critical)

else

shell(dosyadizini)

end if

C4NG0 · 4 Haz 2016

AlicanAKCA1' Alıntı:

Yazımda Belirttiğim Gibi Dizin Belirtmeyeceğim Kullanıcı Hangi Dizine Attıysa Oradaki Notepadı Çalıştıracak, Yani Kendi Bulunduğu Dizindeki Programı Çalıştıracak

AlicanAKCA1 · 4 Haz 2016

C4NG0' Alıntı:
Yazımda Belirttiğim Gibi Dizin Belirtmeyeceğim Kullanıcı Hangi Dizine Attıysa Oradaki Notepadı Çalıştıracak, Yani Kendi Bulunduğu Dizindeki Programı Çalıştıracak

Tamamdır yazıyorum

AlicanAKCA1 · 4 Haz 2016

Kod:

dim dosyadizini as string = dir(application.startuppath + "\notepad.exe") 'program nerde olursa olun o dizindeki notepad'i çalıştırır.
if dosyadizini = "" then
msgbox("Dosya bulunamadı!" , msgboxstyle.critical)

else

shell(dosyadizini)

end if

C4NG0 · 4 Haz 2016

AlicanAKCA1' Alıntı:

Kod:

dim dosyadizini as string = dir(application.startuppath + "\notepad.exe") 'program nerde olursa olun o dizindeki notepad'i çalıştırır.
if dosyadizini = "" then
msgbox("Dosya bulunamadı!" , msgboxstyle.critical)

else

shell(dosyadizini)

end if

if dosyadizini = "" then olan bölümdeki "" işareti arasına Açılacak Programın Uzantısı Mı Gelecek Yoksa Sadece notepad.exe bölümünümü Değiştirecegim

Bourreau · 4 Haz 2016

Kardeşim Ben Senin Demek İstedigini Anladım Bak Bir Adet TextBox Ve Bir Adet Button Koy Button'un Üstüne Çift Tıkla Ve Bu Kodu Yapıştır
İyi Geceler Herkese

Dim YOL As String = TextBox1.Text
Dim dosya_varmı As String = My.Computer.FileSystem.FileExists(YOL)
If dosya_varmı = True Then
Process.Start(YOL)
Else
If dosya_varmı = False Then

End If
MsgBox("Dosya Bulunamıyor", MsgBoxStyle.Critical, "Hata")
End If

AlicanAKCA1 · 4 Haz 2016

C4NG0' Alıntı:
if dosyadizini = "" then olan bölümdeki "" işareti arasına Açılacak Programın Uzantısı Mı Gelecek Yoksa Sadece notepad.exe bölümünümü Değiştirecegim

Oraya ellemeyeceksin orası "Eğer dosya yoksa hata mesajı çıkar" diyor

C4NG0 · 4 Haz 2016

Bourreau' Alıntı:
Kardeşim Ben Senin Demek İstedigini Anladım Bak Bir Adet TextBox Ve Bir Adet Button Koy Button'un Üstüne Çift Tıkla Ve Bu Kodu Yapıştır
İyi Geceler Herkese

Yardımlarınız İçin Teşşekürler Yukarıda Yorum Yapan Arkadaşın Verdiği İstediğimdi ama Ben Sizede Açıklıyım Siz Burada Textboxa girilen yolu çalıştırsın diyorsun ama ben butona tıklayınca yaptığım program kendi dizininde notepad varsa çalıştıracaktı yoksa uyarı verecekti üstteki arkadaş açıklamış zaten,tekrardan teşşekürler :RpS_biggrin: :RpS_biggrin:

C4NG0 · 4 Haz 2016

AlicanAKCA1' Alıntı:
Oraya ellemeyeceksin orası "Eğer dosya yoksa hata mesajı çıkar" diyor

Çalıştı Teşşekürler :RpS_biggrin: :RpS_biggrin: :RpS_biggrin: Teşşekürünü Verdim

AlicanAKCA1 · 4 Haz 2016

Nedemek :RpS_drool:

VB.NET Program Çalıştırma

C4NG0

Üye

AlicanAKCA1

Katılımcı Üye

C4NG0

Üye

AlicanAKCA1

Katılımcı Üye

AlicanAKCA1

Katılımcı Üye

C4NG0

Üye

Bourreau

Katılımcı Üye

AlicanAKCA1

Katılımcı Üye

C4NG0

Üye

C4NG0

Üye

AlicanAKCA1

Katılımcı Üye

Sosyal medya sayfalarımız