+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Formda Etikete Tıklandığında Tabloya Kayıtlı Değerler Mesajbox'ta Nasıl Gösterilir. (/konu-formda-etikete-tiklandiginda-tabloya-kayitli-degerler-mesajbox-ta-nasil-gosterilir.html)
Sayfalar:
1
2
Formda Etikete Tıklandığında Tabloya Kayıtlı Değerler Mesajbox'ta Nasıl Gösterilir. - Oğuz Türkyılmaz - 14/01/2019
F_01_MasaGiris Formunda 17 numaralı masanın rezervasyon bilgilerinin 17 numaralı ( R ) sarı etikete tıklandığında mesajboxta göstermek istiyorum. Mesajı gösteriyorum ama bilgileri çekemedim. Tablodan bilgileri almak için, tüm masaların rezervasyon bilgilerini her masa için ayrı ayrı olay yordamına girmeden bir fonksiyon olarak yapmak amacım.
Cvp: Formda Etikete Tıklandığında Tabloya Kayıtlı Değerler Mesajbox'ta Nasıl Gösterilir. - ozanakkaya - 14/01/2019
Forma
Public Function RezervKontrol(ByRef GMasNo As Integer)
Dim GKimlikNo As Integer
Dim GKisi As String
Dim GSaat As Date
GKimlikNo = Nz(DLookup("Kimlik", "T_90_RezervasyonBilgi", "[MasaNo]=" & Nz(GMasNo, 0) & " AND clng([Tarih])='" & CLng(Date) & "'"), 0)
If GKimlikNo <> 0 Then
'GTarih
GSaat = Dlookup ("Saat", "T_90_RezervasyonBilgi", "[Kimlik]=" & GKimlikNo)
GKisi = Dlookup ("AdiSoyadi", "T_90_RezervasyonBilgi", "[Kimlik]=" & GKimlikNo)
MsgBox "Masa ..... Tarihinde, Saat " & GSaat & " e Sn; " & GKisi & " 'e rezerve edilmiştir. ", vbExclamation
End If
End FunctionKodu ekle, Etiket17R'nin tıklandığında olayına
=RezervKontrol("17")şeklinde kod ekle, diğer etiketlerin tıklandığında olayına etiket ismine göre kod eklemelisiniz.
Ayrıca, bu tür sorularınıza cevap yazarak çözüm buluyoruz, umarım siz birşeyler kapıyorsunuz.
Cvp: Formda Etikete Tıklandığında Tabloya Kayıtlı Değerler Mesajbox'ta Nasıl Gösterilir. - Oğuz Türkyılmaz - 14/01/2019
Ozan Bey İlginiz için teşekkür ederim, Yavaş yavaş bir şeyler öğreniyorum en azından karşılaştığım aynı tarz sorunlarda ne yapabileceğimi önceki çözümlere bakıp düzeltebiliyorum. Sorun şu ki sürekli yeni birşeyler yaptığımdan benzer sorunlar pek çıkmıyor.
=RezervKontrol("17") hata veriyor, ayrıca rezervasyon Mesajınıda görüntüleyemiyorum . Dosya yı ekte gönderiyorum.Teşekkürler
Cvp: Formda Etikete Tıklandığında Tabloya Kayıtlı Değerler Mesajbox'ta Nasıl Gösterilir. - ozanakkaya - 14/01/2019
tıklandığında olayından kastım, tıklandığında özelliğine yazılacak, = ile başlayan kod olay yordamı olarak yazılmaz, butonun tıklandığında özelliğine yazılır
Cvp: Formda Etikete Tıklandığında Tabloya Kayıtlı Değerler Mesajbox'ta Nasıl Gösterilir. - Oğuz Türkyılmaz - 14/01/2019
(14/01/2019, 15:03)ozanakkaya yazdı: tıklandığında olayından kastım, tıklandığında özelliğine yazılacak, = ile başlayan kod olay yordamı olarak yazılmaz, butonun tıklandığında özelliğine yazılır
Teşekkür Ederim Ozan bey. Tamamdır.
Cvp: Formda Etikete Tıklandığında Tabloya Kayıtlı Değerler Mesajbox'ta Nasıl Gösterilir. - berduş - 14/01/2019
dilerim işinize yarar
dosya eksikleri nedeniyle güncellenmiştir