AccessTr.neT

Tam Versiyon: Liste kutusunda ki veriye tıklayınca yandaki etiketdeki bölümler
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
Sayfalar: 1 2
Sn.elrohir18
stryker yardım için teşekkürler fakat kodu başka bir form da düzenleyip kullanmaya kalktığımda ortak özellik sorunu activitex vsç sorun belirtiyor bunu nasıl çözerim?
Başka bir örneğe aktardığınızdamı sorun yaşıyorsunuz?
evet sn. alpeki hocam aynı program içinde yazar formu oluşturup düzenlemeleri yapıyorum fakat güncelleme sonrası deyimi hatalı avtivex ortak özellik gibi bir sorun çıkartıyor..

kullandığım kod bu şekilde
<
' Denetime uyan kaydı bul.
Dim rs As Object

Set rs = Me.Recordset.Clone
rs.FindFirst "[YID] = " & Str(Nz(Me![Liste2], 0))
If Not rs.EOF Then Me.Bookmark = rs.Bookmark

>
rs.FindFirst "[YID] = " & Str(Nz(Me![Liste2], 0))

kısmında [YID] yerine kaydı bulacağın tablodaki alanın adı gelecek. [Liste2] olan yerde ise o liste kutusunda bulacağın bilgi hangi sütünda ise o sütunun numarası olacak. Diğer bir değişle :

Liste kutusunda 2. sütünde ahmet yazıyor olsun. Öğrenciler tablosunda da ogrenci_adi alanın olsun. Kod şu şekilde olmalı:

rs.FindFirst "[ogrenci_adi] = " & Str(Nz(Me![Liste2].Column(2), 0))

NOT 1 : Arama işlemini isim vb. yazı karakteri yerine Otomatik Sayı olan alanda yap.
NOT 2 : Listede sütün numarası 1'den değil 0'dan başlar (0,1,2,...). Dolayısıyla 2. sütün demek aslında 3. sıradaki demek oluyor.
Sayın elrohir18;
Kod sayfasında Tools-> Referans'a bak ADO eklimi?
Sayfalar: 1 2