Çekiliş ile 2 Adet Microsoft Excel Kitabı Hediye Edilecektir. Ayrıntılı Bilgi İçin [Tıklayınız]

ÖNEMLİ

  • Forumumuzda bilgi alışverişinde bulunabilmeniz için Üye olmalısınız. Üye olmayanlar forumumuzdan yararlanamazlar.
  • Eğer daha önceden üye olduysanız lütfen kullanıcı adınız ve şifreniz ile Giriş yapınız.
 Konu Araçları | Seçenekler: | Gösterim Stili
Tarih
15/04/2011 00:21
Konu Sahibi
deliyurek1905
Yorumlar
4
Okunma
1336
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy

deliyurek1905

Aktif Üye
Kullanici Avatari
Aktif Üye
29
09/04/2011
0
İstanbul
Belirtilmemiş
12/05/2011,16:00
Çözüldü 

Visual Basic Code
1
2
3
4
5
6
7
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.


Cevapla

ercansahin

BlackEagle
Kullanici Avatari
Uzman
E.... Ş....
3.739
14/11/2008
Ankara
Ofis 2010 32 Bit
07/09/2017,13:09
Çözüldü 
Açılan kutu ile seçtiğiniz veriye ait kaydın ilgili formunuzda bulunarak getirilmesi için kullanılmaktadır. Yani Açılan Kutu güncellendiğinde seçtiğiniz kayıta uygun verileri arayıp bulmaya yarar. Sizin örneğinizde açılan kutunun ilişkili olduğu sütun ile formunuzun kayıt kaynağında yer alan ID isimli alanı eşleştirmektedir. Tabi bu arada Açılan Kutunun ilişkili alanının ID olması gerekmektedir.


Cevapla

ercansahin

BlackEagle
Kullanici Avatari
Uzman
E.... Ş....
3.739
14/11/2008
Ankara
Ofis 2010 32 Bit
07/09/2017,13:09
Çözüldü 
Konu sahibi arkadaşın cevabın yeterli olup olmadığı hakkında geri dönüş yapması rica olunur.


Cevapla

deliyurek1905

Aktif Üye
Kullanici Avatari
Aktif Üye
29
09/04/2011
0
İstanbul
Belirtilmemiş
12/05/2011,16:00
Çözüldü 
Açıklamanız çok faydalı oldu. İlginize teşekkürler.


Cevapla

ercansahin

BlackEagle
Kullanici Avatari
Uzman
E.... Ş....
3.739
14/11/2008
Ankara
Ofis 2010 32 Bit
07/09/2017,13:09
Çözüldü 
Rica ederim. Biz teşekkür ederiz.


Cevapla


Konuyu Okuyanlar: 1 Ziyaretçi
 
 

Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2017 MyBB Group.
Forum use Krzysztof "Supryk" Supryczynski addons.