İşaretle Onay Kutusunu işaretleyince kayıtlardaki bütün onay kutuları işaretlensin

[blacksir]

İşaretle Onay Kutusunu işaretleyince kayıtlardaki bütün onay kutuları işaretlensin. Örnek Hotmailde hepsini sil butonu vardır. Ona tıklayınca bütün gelen mailler solundaki onaylıyormusunuz işareti tıklanmış gibi işaret alır. ekte gönderdiğim doyada nasıl yapabiliriz

 

[gulsum1]

Private Sub Onay8_AfterUpdate()
If Onay8 = True Then
DoCmd.RunSQL "UPDATE Tablo1 SET Tablo1.Onay = True;", 0
Else
DoCmd.RunSQL "UPDATE Tablo1 SET Tablo1.Onay = False;", 0
End If
Form.Requery
End Sub

 

[blacksir]

Teşekürler çok işimr yaradı

 

[blacksir]

Bir sıkıntım daha oldu ben bazen sorguladıklarıma toplu atmak istiyorum örneği adı ahmet olanları süz yapıp yukardan onay kutusunu işaretlediğimde sadece ahmetleri aşağıda toptan onaylasın istiyorum bütün adları onaylamasın yukardaki kod süzleri dikkate almıyor bütün adlara atıyor onayı yardımlarınızı bekliyorum saygılarımla

 

[herdogan]

Örneği inceleyiniz

 

[assenucler]

Sayın herdogan;

Teşekkürler, benim de çok işime yaradı...Arşivime ekliyorum...

 

[blacksir]

Dosya bende çalışmadı ayrıca en yukarda benim gönderdiğim dosyaya uyarlanırsa sevinirim

 

[blacksir]

cevap yokmu

 

[herdogan]

sayın blacksir;
Senin örneğinde aynı uygulamayı ben de çalıştıramadım.
benim gönderdiğim dosyanın da sende neden çalışmadığını anlayamadım doğrusu

 

[blacksir]

aslında gülsüm1 kodu tam istediği gibi yanlız sadece süzerken problem oluyor süzdüğüm halde bütün kayıtlara onay atıyor. süzerek atsa tam işe yarayacak

 

[modalı]

aslında gülsüm1 kodu tam istediği gibi yanlız sadece süzerken problem oluyor süzdüğüm halde bütün kayıtlara onay atıyor. süzerek atsa tam işe yarayacak

Sayın blacksir,

Süzme işlemi için sql cümlesine Where i eklemeniz gerekir.

Private Sub Onay8_AfterUpdate()
If Onay8 = True Then
DoCmd.RunSQL "UPDATE Tablo1 SET Tablo1.Onay = True Where Ad=....;", 0
Else
DoCmd.RunSQL "UPDATE Tablo1 SET Tablo1.Onay = False Where Ad<> ..;", 0
End If
Form.Requery
End Sub

gibi.

İyi çalışmalar

 

[adnanyurdakul]

istediğin cevabı diğer tarfta vermiştim

 

[adnanyurdakul]

İstediğin cevabı diğer tarafta vermiştim

 

[blacksir]

Tamam Onaylayınca tam istediğimi yapıyor. YANLIZ onay tuşunu kaldırdığımdada altan süzülenlerin onaylarının kalması gerek yani aynı mantıkla onaylananlar altan işaretlensin onaylanmayanlar aynı mantıkla kalksın. Arkadaşlar bi zahmet bu olay benim için önemli