AccessTr.neT

Bul · 24/04/2009, 14:57

form üzerindeki her satırın karşısında onay kutuları var. Bu check box ları aynı anda tek buton ile seçmek veya onayı iptal etmek mümkünmüdür?

Ekteki dosyada mesailer formu.

[Bilgi]Örnek dosyanız sıkıştırılıp tekrar eklenmiştir.[/Bilgi]
[Bilgi]Lütfen Forum Kurallarını okuyunuz.[/Bilgi]

Bul · 24/04/2009, 15:14

Bir güncelleme sorgusu yaparak ve forma bu güncelleme sorgusunu çalıştıracak bir buton koyarak yapılabilir.

Örnek ektedir.

Kod:

Private Sub btn_ONAYLA_Click()



    'Sorgunun çalıştırılacağına dair uyarı mesajlarını kaldırır.

    DoCmd.SetWarnings False

    

    'Güncelleme sorgusunu çalıştırır

    DoCmd.OpenQuery "Tumunu_Onaylama_Sorgusu"

    

    'Uyarı mesajlarını açar.

    DoCmd.SetWarnings True

    

    'Formdaki kayıtları günceller

    Me.Requery



End Sub

Bul · 24/04/2009, 15:46

teşekkürler,

Bul · 25/04/2009, 00:27

Merhaba,

konu zaten çözümlendi ama, bu işler için ayrı bir sorgu kaydetmek nesne pencresini şişirecek iyice. bunun yerine tılandığında olayına şu kod eklense daha iyi olur. Sorgu yerine Sql kodunu Vba ile çalıştırmak yöntemi:

Kod:

'Güncelleme sorgusunu çalıştırır

    'DoCmd.OpenQuery "Tumunu_Onaylama_Sorgusu"

    DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70

    DoCmd.RunSQL "UPDATE mesailer SET mesailer.onay = Yes Where mesailer.onay=No"

AccessTr.neT

Birden çok onay kutusunun aynı anda seçimi mümkünmü?

Birden çok onay kutusunun aynı anda seçimi mümkünmü?

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

Giriş yap

Hesap oluştur

Konu Linkleri