Skip to main content

AccessTr.neT


Liste Kutusu

Liste Kutusu

#7
(05/01/2023, 14:08)ozanakkaya yazdı: Örneğinizin düzenlenmiş hali ektedir.

Çok teşekkürler yaptım ama çift tıklayınca sonucu vermiyor hala hatamı arıyorum
Cevapla
#8
(05/01/2023, 14:50)Sümeyye_ yazdı:
(05/01/2023, 14:08)ozanakkaya yazdı: Örneğinizin düzenlenmiş hali ektedir.

Çok teşekkürler yaptım ama çift tıklayınca sonucu vermiyor hala hatamı arıyorum
Form açılıyor ama üstünde değerler belli olmuyor neden olabilir acaba
Cevapla
#9
Eklediğim örnekte herhangi bir hata göremedim. 

"Değerler belli olmuyor" kısmını anlamadım.
Cevapla
#10
(05/01/2023, 23:31)ozanakkaya yazdı: Eklediğim örnekte herhangi bir hata göremedim. 

"Değerler belli olmuyor" kısmını anlamadım
Anlatamadım eklediğiniz örnek sorunsuz çalışıyor tam da istediğim gibi olmuş.
Ama ben başka bir uygulama da yapıyorum. Yaptım ama çalışmadı.
Listede değer seçince o değer diğer formda gözükmüyor onun nedenini bulamadım.
En baştan yine kontrol edeceğim.
Cevapla
#11
Şöyle anlatayım. Modül içerisinde

Global GeciciId As String

Şeklinde kod mevcut.

Ara isimli formdaki liste kutusunun çift tıklandığında olayında

GeciciId = Me.Liste5.Column(0)

Kodu var. Liste kutusu çift tıklandığında, GeciciId'e liste kutusunun satır kaynağındaki sorgunun ilk sütununda bulunan "MachineName" değerini aktarıyor. Column(0), sorgudaki ilk sütun. Column(1) yazsaydım, sorgudaki 2. sütunu alacaktı.

FrmComputers isimli formun etkinleştiğinde olayında da;

Dim rs As Object

If Len(GeciciId & "") = 0 Then
GeciciId = Dlookup ("MachineName", "Computers")
End If

Set rs = Me.Recordset.Clone
rs.FindFirst "[MachineName] = '" & GeciciId & "'"
If Not rs.EOF Then Me.Bookmark = rs.Bookmark

kodu mevcut. Önceki formda bulunan Liste kutusu çift tıklandığında kaydedilen GeciciId değerini burada kullanıyor. frmComputers isimli formun kayıt kaynağında MachineName ile GeciciId değeri eşit olan ilk kaydı buluyor.
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da