S.aleykum değerli forum üyeleri;
Ekte bulunan eğitim planı örneğinde öğrenci adı soyadı vs bilgileri girip-soldan tanı seçip-modül seçtikten sonra;
Öğrenci için performans ve amaçları seçtiğimiz formda (seçimformunda),seçim sonrası kaydettikten sonra kapattığımızda frm_degerlendirme.altformunun güncellemesini nasıl sağlarız??
Me.[Alt_Formun_İsmi].Requery denedim ama başarılı olamadım
öneri ve yardımlarınızı bekliyor saygılar sunuyorum..
sayın mehami,
bahsettiğiniz talebinize yönelik olarak,
örneğinizi inceleme imkanı olmadı (...tanınmayan... uyarısı verdiği için) fakat ilk etapta bir bilgilendirme olması adına,
alt form güncellemeleri için:
Kod:
Forms!anaformun_adi.altformun_adi.Form.Requery
eğer tanımlama aralarında BOŞLUK varsa
Kod:
Forms![anaformun adi].[altformun adi].Form.Requery
kod satırlarını deneyebilirsiniz.
bilginize...iyi çalışmalar,saygılar.
Değerli atoz hocam;
İlginize tşk ederim,söylediklerinizi uyguladım ama nedense öğrenciyi kayıt edip tanı ve modül seçtikten sonra performans ve amaçları seçiyorum,kaydet çık yapıyorum ama olmuyor..Aynı öğrenci için başka modül seçip performans ve amaçları işaretleyince son seçtiğim modüle ait performans ve amaçlar alt formda güncelleniyor ve planda çıkıyor..
yani kısaca ilk seçilen modüle ait performans ve amaçlar güncellenmiyor altformda çıkmıyor 2.seçilen modüle ait olanlar çıkıyor..biz istiyoruz ki 1.de çıksın seçeceğimiz diğer modüllerde çıksın..
Ekte 2003 ait olan var..
Saygılar sunuyor cevabı 4 gözle bekliyoruz.
Uygulamada alt formun güncellenmesi için halihazırda
Forms!frm_degerlendirmeyap!frm_degerlendirmealtform.Form.Requery
kodu zaten mevcut.
Sıkıntı girdiğiniz yeni öğrenci bilgilerinin seçim yaptığınızda kaydedilmemiş olması. Yani Tablo1 isimli tabloda öğrenciye ait bilgi olmadığı için ekleme sorgusu çalışmıyor.
lst_altbaslik isimli liste kutusunun çift tıklandığında olayındaki kodları aşağıdaki ile değiştir.
If Form.Dirty = True Then
If MsgBox("Öğrenci Bilgileri Kaydedilsin mi?", vbInformation + vbYesNo, "Kaydediliyor...") = vbYes Then
DoCmd.RunCommand acCmdSaveRecord
End If
End If
DoCmd.SetWarnings False
DoCmd.RunSQL "INSERT INTO tbl_gecici ( altbaslikid, id, alanlar, beceriid, geciciid ) SELECT tbl_altbaslik.altbaslikid, [Formlar]![frm_degerlendirmeyap]![Kimlik] AS İfade1, beceriler.beceri, beceriler.beceriid, (select count([beceriid]) from tbl_beceri where [beceriid]<=beceriler.[beceriid] and [altbaslikid]=beceriler.[altbaslikid]) AS sirano FROM tbl_beceri AS beceriler INNER JOIN tbl_altbaslik ON beceriler.altbaslikid = tbl_altbaslik.altbaslikid WHERE (((tbl_altbaslik.altbaslikid) = [Formlar]![frm_degerlendirmeyap]![lst_altbaslik])) ORDER BY beceriler.beceriid;"
DoCmd.SetWarnings True
DoCmd.OpenForm "frm_secimformu"
Ayrıca, tabloda "not" adında alan olmaz. Bu alan adının şimdiden değiştirilmesi gerekli. Aynı şekilde "tblŞifre" isimli tablo adı, tablodaki "Şifre" ve "Kullanıcı" ismindeki alanlar ile frmŞifre isimli form adının düzeltilmesi gerekli.
Değerli atoz ve ozan hocalarım ilginize çok tşk ederim..ozam hocamın vermiş olduğu kod ile sorun çözülmüştür..Ozan hocamın tablo konusundaki diğer önerilerini dikkate alacağım..
Konu taşınabilir.
Saygılar sunuyorum.