AccessTr.neT

Tam Versiyon: Kaydetmede ki Dongu sorunu
Ş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
Arkadaslar Merhaba,

Bir form uzerinde, kaydet, kapat, gibi komutlar mevcut.
Burada ki kodlar;
kaydet kodu:
*****************
If MsgBox("Deðiþiklikler Kaydedilsin mi?", 36, "Kaydediliyor...") = vbYes Then
DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
DoCmd.DoMenuItem acFormBar, acRecordsMenu, 5, , acMenuVer70
Else
Me.Undo
End If

*****************
Bu kod form da ki dongu tamamlandigi zaman, kaydet butonunu tiklayinca NO desek de yapilan degisikligi kaydediyor. Halbuki o form uzerinde yapilan degisiklikler dongu tamamlansa dahi kaydedilmemeli, ancak kaydet butonuna basilinca kaydet e EVET denirse kaydedilmeli. Ayni sekilde KAPAT butonunda da ayni sey soz konusu;
soyle ki
*******************************8
If MsgBox("Deðiþiklikler Kaydedilsin mi?", 36, "Kaydediliyor...") = vbYesNo Then
DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer36
DoCmd.DoMenuItem acFormBar, acRecordsMenu, 5, , acMenuVer70
Else
Me.Undo
DoCmd.Close

End If

End Sub
****************
Burada da kapat butonunu tiklayinca sordugu soruya evet dersek yapilan degisiklikleri kayetmesi, hayir dersek kaydetmemesi gerekiyor. Ama burada da yukarida oldugu gibi dongu tamamlanmissa bu evet ve hayirin bir anlami olmuyor. Ben bu iki komutun kodlarinda; dongu nerde olursa olsun kayit kacinci kayitda olursa olsun o firm acildiginda yapilan yapilan degisiklikleri, form kapanirken sordugu soruya evet dersem yapilan degisiklikler kaydedilsin, hayir dersem yapilan tum degisiklikler kaydedilmesin. ayni sekilde kapat komutu icin de bu gececerli bu konuda lutfen yazdimci olabilirmisiniz.

Saygilar

Subco
If MsgBox("Deðiþiklikler Kaydedilsin mi?", 36, "Kaydediliyor...") = vbYes Then
DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
DoCmd.DoMenuItem acFormBar, acRecordsMenu, 5, , acMenuVer70
Else
Exit sub
End If
bu şekilde deneyin...

Sn AKD
ilginiz icin cok tesekkur ederim.

Bu yazdiginiz kod ile de formdan cikilmiyor. Yapmak istedigim, formu kapatirken sorsun yapilan degisiklikleri kaydetmek istiyormusunuz diye, evet derse kullanici deigisiklikleri kaydetsin, hayir derse hic bir degisiklligi kaydetmeden formdan ciksin istiyorum. formda bir alanda olan bilginin yanina yeni bir sey ekleyip bir baska alana gecerseniz bunu kaydediyor ben bunu istemiyorum, yapilan bu degisikligi formu kapatirken sordugu soruya verilen cevaba gore kaydetsin veya etmesin.

Saygilarimla

Subco
Arkadaslar Merhaba,

Bu konuda yardimci olabilirmisiniz. Inanin zaruri olmasa Sizleri bu konuda mesgul etmek istemezdim.
Saygilar,
Subco
Örnek ekleyebilir misiniz?
(sıkıştırarak) Img-grin
Sn.Hayri16

EKte gonderdigim dosyada, FRm_Personel formunu aciyoruz, yukaridan Halil Ibrahim ALPAVUT u secip, personel secmesinde bu kisinin bilgilerini goruyoruz. bu formda ki alanlarin birine ornegin; soyadina Access ekleyip bir alttaki alana gectigimizde sistem otomatik olarak kaydediyor. (close form) O zaman formdan cikarken sorulan " degisiklikleri kaydetmek istiyormusunuz? sorusuna "EVET" , "HAYIR" demenin bir anlami olmuyor. Ben formda hangi alana hangi bilgi eklenirse eklensin, formu kapatirken sorulan mesajla yada kodla bu yapilan degisikliklerin kaydedilip edilemeyecegi sorusuna "EVET" "degisiklikleri kaydet" olarak cevap verirsem degisiklikleri kaydetsin, yok "HAYIR" i secerek hayir yapiylan degisiklikleri kaydetme dersem hangi alana ne eklemissem bunlari kaydetmemeli. Bu konuda lutfen yardimci olabilirmisiniz. Ilginiz icin cok tesekkur ederim.
Saygilar

Subco
Sayfalar: 1 2