üstadlar ben ufak bir örnek hazırladım ve orada bir metin kutusu var sirketadı adında oraya mesala A yazdığınız zaman Ala başlayan şirket geliyor felan mesala ben oraya Accesstr.net yazdım ve tab tuşuna bastım yada oradan çıktığım zaman after mı oluyordu before mi ? ve benim yapmak istediğim oraya diyelim accesstr yazdığım zaman accesstr hakkındaki bilgileri getirmesini istiyorum bunu nasıl yapabilirim S: S: S: S:S

Private Sub Açılan_Kutu1_AfterUpdate()

Dim rs As Object



Set rs = Me.Recordset.Clone

rs.FindFirst "[Id] = " & Str(Nz(Me![Açılan Kutu1], 0))

If Not rs.EOF Then Me.Bookmark = rs.Bookmark

End Sub 

merhabalar bu kod bölümü ne işe yarar biraz açıklanmısınız. Bunu yazmadan da işlemimi yapabiliyorum.

Hepinize merhaba,

Konu açıp destek rica etmek için üye oldum.

Benim sorunum şu, görseli de ekliyorum.
[Resim: http://img20.imageshack.us/img20/6971/yardm1.jpg]

MDF_Event tablosuna veri girmek üzere oluşturduğum yukarıdaki formda sarıyla işaretlediğim combobox, Allocation isminde başka formdan veri çekiyor.

O comboboxdaki veriyi seçince, resimde gördüğünüz yanında yıldız işaretli alanların güncellenmesini istiyorum.

Private Sub AllocationID_Combo_AfterUpdate()

Select Allocati

Sayın Atoz112,
KONU CEVAPLANMIŞLARA TAŞINDIĞI İÇİN TEKRAR KONU AÇMAK ZORUNDA KALDIM.
Olayı bir şekilde çözebilmek adına;
Private Sub BarcodeNumber_AfterUpdate()
Me.eancode = code128(BarcodeNumber)
Me.Requery
Me.Refresh
End Sub
Kodunda, parantez içindeki "BarcodeNumber" sanırım Formdaki alan, bunun değeri "eancode" a değer aktarımını formdan değil de Assets Tablosundaki BarcodeNumber alanından değer aktarımı nasıl yapılabilir acaba, ben
Me.eancode = code128(Assets.BarcodeNumber) olarak d

Hayırlı cumalar
combobox afterupdate olayında yazdığım kodlar farklı bir kontrole odaklanmadan çalışmıyor
mesela bu olaya msgbox "merhaba" yazayım
illa başka bir controle tıklanıp comboboxtan çıkmadan mesaj kutusu gözükmüyor