Merhaba,
Ekte bulunan veritabanında. Formdaki textboxların yanındaki butonların gözat tuşu görevi görmesini ve açılan pencereden seçimi yaptığımda linkini textboxa kopyalamasını istiyorum.
Yardımcı olursanız sevinirim
ekte istediğiniz yapılmıştır.
Modüle1 de bir fonksiyon ekledim. O fonksiyon ile isteiğiniz dosyayı seçmek için
Dosyanın Bulunduğu Yol
Açılan Pencerenin Başlığı
Ve Süzülmesini İstediğiniz Dosyaının Uzantısını aşağıdaki gibi yazarak kullanabilirsiniz.
Kolay Gelsin.
Call LocalizarArquivo("c:\", "Dosyayı Seçiniz - AccessTR.NET", "*.jpg")
teşekkürler. Dosya seçimini istediğim gibi yapıyor ancak linki textboxa yazmadı. benden mi kaynaklı problem?
Pardon textbox yazmasını yapmadık. Kodları Aşağıdaki ile değiştirin Linkleride tabloya yazar.
Kusura Bakmayın.
Private Sub Command17_Click()
Me.link1 = LocalizarArquivo("c:\", "Dosyayı Seçiniz - AccessTR.NET", "*.jpg")
End Sub
Private Sub Command18_Click()
Me.link2 = LocalizarArquivo("c:\", "Dosyayı Seçiniz - AccessTR.NET", "*.jpg")
End Sub
Private Sub Command19_Click()
Me.link3 = LocalizarArquivo("c:\", "Dosyayı Seçiniz - AccessTR.NET", "*.jpg")
End Sub
Private Sub Command20_Click()
Me.link4 = LocalizarArquivo("c:\", "Dosyayı Seçiniz - AccessTR.NET", "*.jpg")
End Sub
yardımınız ve hızlı çözüm için çok teşekkürler.