ole nesnesi ekleme ve Hizli kayit bulma

1 2
14/10/2009, 23:06

ozanakkaya

Alıntı:Dediğim gibi, bu benim bildiğim en iyi yöntem, bildiğim kadarıyla anlatmaya çalıştım. Anlatımımda bir kusurum veya unuttuğum birşey oldu ise başta sn furens olmak üzere özür dilerim. Basit bir örnek ektedir.




liste kutusunun tıklandığında olayına aşağıdaki kodun yazılması gerekiyor.

Kod:
Dim rs As Object
Set rs = Me.Recordset.Clone
    rs.FindFirst "[SNUM] = " & Str(Nz(Me![Liste1], 0))
    If Not rs.EOF Then Me.Bookmark = rs.Bookmark
15/10/2009, 01:16

down73

sn sledgeab; günlerdir bulamadıgım çözümü sayenizde buldum çok teşekkğr ederim kendi tabloma göre uyarladım, fakat nerede yanlışlık yapıyorum bilmiyorum arama kutusuna girdigimde makronun programın ilgili makroyu bulamadıgı uyarısını alıyorum müsait bir zamanınızda bu konu ile alakalı bir cevap yazarsanız çok sevinirim. su an liste kutusunda sıralanıyor ve üzerine gelip tıkladıgımda tamda istediğim gibi o sayfa açılıyor fakat arama kutusundan süzemiyorum. yardımınızı esirgemezseniz sevinirim.
15/10/2009, 02:24

ozanakkaya

Form Üzerinden Veri Arama
linkinde anlatılanları sırasıyla gözden geçirin. Bence resim-3 teki
Kod:
Like "*" & [Forms]![formadı]![aramakutusuadı] & "*"
sorgusu olabilir.
16/10/2009, 19:02

down73

SN Sledgeab yardımlarınız için çok teşekkür ediyorum sonunda başardım.
1 2