Dinamik Link Butonu

04/06/2024, 11:47

andarc

Merhaba,
Tablodaki kayıtların her birisine bir satırda kendi resimlerinin olduğu klasör linkleri yazıyor.
Herhangi bir butona seçili kaydın kendi linkini açtırabiliyor muyuz?
04/06/2024, 12:47

boolean_

Merhaba andarc,

Tabloda ilgi resim yolunu köprü olarak ayarlarsanız form içinde bir yere görsel için bir textbox açıp ilgili yolu gösterirseniz ilgili texbox üzerinden hyperlink çalıştırarak görseli açabilirsiniz.

Örnek bir çalışma ekleseydiniz daha net yanıtlar verebilirdik.

örnek olması açısından;

Me.link.SetFocus
DoCmd.RunCommand acCmdOpenHyperlink
04/06/2024, 13:16

onur_can

Sn boolean'a ek olarak bende biraz daha kapsamlı bir kod vereyim. Bu kodda hata denetimide yaparak linkin bulunmadığına dair size uyarı verecektir.
Kod:
Private Sub LinkButon_Click()
  On Error GoTo Hata
  Me.txtLink.SetFocus
  DoCmd.RunCommand acCmdOpenHyperlink
  Exit Sub
Hata:
  Select Case Err
    Case 2046
      MsgBox "Link Bulunamadı"
    Case Else
      MsgBox Err & vbCrLf & vbCrLf & Err.Description, vbCritical, "Hata Oluştu!"
      Resume
  End Select
End Sub
04/06/2024, 14:10

andarc

Sn boolean teşekkür ederim sizin dediğiniz gibi yaptım işimi gördü. Text i formda arka planda görünmeyecek biyere gizledim problem ortadan kalktı.
Onur bey sizin kodunuzla da denedim fakat hata mesajı vermedi. Çok önemli değil benim için şu an ama teşekkür ederim cevabınız için.
04/06/2024, 23:33

onur_can

Zaten normalde hata vermez kod, çalışma esnasında herhangi bir sebeple hata olursa o hatayı yakalamak için hata denetimini ekledim. Önemli olan sorunun çözülmesidir.