Liste kutusunda ki veriye tıklayınca yandaki etiketdeki bölümler

1 2
07/01/2011, 23:11

emturker

Sn.elrohir18
08/01/2011, 02:47

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?
08/01/2011, 02:50

alpeki99

Başka bir örneğe aktardığınızdamı sorun yaşıyorsunuz?
08/01/2011, 02:53

elrohir18

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

>
08/01/2011, 03:01

alpeki99

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.
08/01/2011, 03:01

Hayri16

Sayın elrohir18;
Kod sayfasında Tools-> Referans'a bak ADO eklimi?
1 2