Tıklama olayındaki shell komutundaki argument olayını çözememekle beraber, şu komut bat, exe, cmd, com dosyalarını çalıştırıyor.
Kod:
Private Sub yol_Click()
Dim calistir
calistir = Shell(yol, 1)
End Sub
ancak bura şöyle bir durum oluşuyor: Dosyalar çalıştırılabilir olursa çalışıyor, ama uzantılar için shell'in nasıl bir argument kullandığını bilmediğimden ona uygun komutu yazamadım. Sanırım dosyalara tıklandığında çalışması için bir modül vardı, o kullanılırsa problem aşılabilir. Şu an için registerdeki dosya ilişkilerine bakarak uzantıya göre asıl programı da açacak bir yol arıyorum.
Siz bir çözüm bulduysanız buraya yazın da boşuna aramayayım. Konuya dönüş de yapmamışsınız.
İnadına, ille de Accesstr.net...