Skip to main content

AccessTr.neT


liste kutusununa tıklama veya başka yolla rapora ekleme

liste kutusununa tıklama veya başka yolla rapora ekleme

Çözüldü #7
Hayri hocamın bahsettiği uzun yol ise şu;

forma metin kutusu ekle, adını "GeciciNo" yap,

liste kutusunun tıklandığında olayına

GeciciNo = Me.Liste0.Column(0)
DoCmd.SetWarnings False
If Liste0.Column(9) = "-1" Then
DoCmd.RunSQL "UPDATE ceza1 SET ceza1.sec = '0' WHERE (((ceza1.[SR NO])=[GeciciNo]));"
Me.Liste0.Requery
Else
DoCmd.RunSQL "UPDATE ceza1 SET ceza1.sec = '-1' WHERE (((ceza1.[SR NO])=[GeciciNo]));"
Me.Liste0.Requery
End If
DoCmd.SetWarnings True
kodlarını ekle.

SECEREKYAZDIRMAARAMA raporunun kayıt kaynağına yazdığın sorgudaki "sec" alanına ölçüt olarak "-1" yaz.

liste kutusundan seçtiklerinin raporunu görebilirsin.
Cevapla
Çözüldü #8
hocam dediğiniz yaptım gayet güzel çalıştı ama 30000 kayıt var bu kayıtların içinden günlük olarak secmem gereken veriler var ve her seferinde raporladıktan sonra eski haline getirmem gerekiyor.
Şimdi sıkıntı şu;herseferinde 30000 veriyi el yordamınla süzüp tekrar eski haline getirmek biraz sıkıntı,
bunları metin kutusu yardımı ile makbuz serinodan aratıp seçsek daha iyi olmazmı ve bu mümkünmü
Cevapla
Çözüldü #9
Kim için hazırladığımızı hatırlamıyorum, ancak örneği inceleyin istediğinize uygunsa kendinize uyarlayın, uyarlamada sıkıntı olursa bildirin biz yardımcı olalım. Bu örnekte liste kutularının tümünü seç özelliği de eklenebilir.
.rar aktarma.rar (Dosya Boyutu: 18,96 KB | İndirme Sayısı: 22)
Cevapla
Çözüldü #10
hocam buna bide arama kutusu koyabilirmiyiz öyle bişey mümkünmü?
Cevapla
Çözüldü #11
(12/01/2011, 23:14)maras321 yazdı: hocam dediğiniz yaptım gayet güzel çalıştı ama 30000 kayıt var bu kayıtların içinden günlük olarak secmem gereken veriler var ve her seferinde raporladıktan sonra eski haline getirmem gerekiyor.
Şimdi sıkıntı şu;herseferinde 30000 veriyi el yordamınla süzüp tekrar eski haline getirmek biraz sıkıntı,
bunları metin kutusu yardımı ile makbuz serinodan aratıp seçsek daha iyi olmazmı ve bu mümkünmü

formun kapardğında olayına
DoCmd.RunSQL "UPDATE ceza1 SET ceza1.sec = '0' WHERE (((ceza1.[SR NO])=[GeciciNo]));"
yazmanız yeterli.

arama için aşağıdaki linki inceleyiniz.

Form Üzerinden Veri Arama

Cevapla
Çözüldü #12
tamam konu hallolmştur.Hepinize teşekkürler.
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da
Task