Resmi Yazışmada Konu içindeki yazılan İfadeye göre Konu Nosunu belirleme

Hocam dediğiniz şekilde düzenlemeleri yaptım. İlk başta çalışıyordu. Ama sona hata vermeye başladı.
Hata ile ilgili resimler ektedir. Nerde hata yaptım anlamıyorum

(26/12/2011, 13:04)iscinar yazdı: Önceki mesajda belirttiğim gibi liste kutusu işini görür gibi geliyor.
Ana forma Bir liste kutusu iki metin kutusu ekle.

Liste kaynağı sorgunun ölçütüne

Like "*" & [Formlar]![Frm_Ana]![Form2].[Form]![plakagizli] & "*" 

yaz

metin kutularının birini gizle görünen kutunun değiştiğinde olayına

Private Sub plakasuzgec_Change()

Dim Bul As String

Bul = plakasuzgec.Text

Me.plakagizli.Value = Bul

Me.CezaListe.Requery

End Sub

yaz ve dene (alan isimleri benim formumdakilerdir kopyala yapıştır yaptım kendine göre uyarla)

arayacağın kutuya her girdiğin harfte sorgulama olması lazım

Diğer sorunu hallettim Hocam.

Bakalım anlamış mıyım?
Formumuza (ResmiYazışma/ResmiYazışmaAlt) iki metin kutusu ve bir liste ekliyoruz. K1, K2 metin Kutusu; L1 de liste adı olsun.

K2 Gizli, K1 görünür olcak.
L2 Veri Kaynağı Sogusuna

Like "*" & [Formlar]![ResmiYazışma]![ResmiYazışmaAlt].[Form]![K1] & "*"

yazıyoruz.

K1 Metin kutusunun Değiştiğinde olayına

Private Sub K1_Change()

Dim Bul As String

Bul = K1.Text



Me.K2.Value = Bul



Me.L1.Requery

End Sub

Yazacağız değil mi hocam?
Böyle yaptım ama olmadı.

Örneği ekte sunuyorum. Yardımlarıız için teşekkür ederim. Bu arada 2010 kullanıyorum.

Ek Dosyalar

Ek Dosyalar

Sanırım " Resmi Yazışmada Konu içindeki yazılan İfadeye göre Konu Nosunu belirleme" konusuna devam ediyoruz.

liste kutusunun satır kaynağına

Like "*" & [Formlar]![ResmiYazışma]![ResmiYazışmaAlt].[Form]![K1] & "*"

yazmayacaksınız.

Like "*" & [Formlar]![ResmiYazışma]![ResmiYazışmaAlt].[Form]![K2] & "*"

yazacaksınız.

(27/12/2011, 02:11)sledgeab yazdı: Sanırım " Resmi Yazışmada Konu içindeki yazılan İfadeye göre Konu Nosunu belirleme" konusuna devam ediyoruz.

liste kutusunun satır kaynağına

Like "*" & [Formlar]![ResmiYazışma]![ResmiYazışmaAlt].[Form]![K1] & "*"

yazmayacaksınız.

Like "*" & [Formlar]![ResmiYazışma]![ResmiYazışmaAlt].[Form]![K2] & "*"

yazacaksınız.

Ozan Hocam Teşekkürler. Sorun hallolmuştur.
İyi ki varsın accesstr.net....