AccessTr.neT

Tam Versiyon: Liste Kutusu
Ş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
(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
(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
Eklediğim örnekte herhangi bir hata göremedim. 

"Değerler belli olmuyor" kısmını anlamadım.
(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.
Şö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.
Sayfalar: 1 2