Kaydetmede ki Dongu sorunu - Baskı Önizleme +- AccessTr.neT (https://accesstr.net) +-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html) +--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html) +--- Konu Başlığı: Kaydetmede ki Dongu sorunu (/konu-kaydetmede-ki-dongu-sorunu.html) Sayfalar:
1
2
|
Kaydetmede ki Dongu sorunu - Subco - 12/12/2010 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 Cvp: Kaydetmede ki Dongu sorunu - akd - 12/12/2010 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... Cvp: Kaydetmede ki Dongu sorunu - Subco - 13/12/2010 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 Cvp: Kaydetmede ki Dongu sorunu - Subco - 13/12/2010 Arkadaslar Merhaba, Bu konuda yardimci olabilirmisiniz. Inanin zaruri olmasa Sizleri bu konuda mesgul etmek istemezdim. Saygilar, Subco Cvp: Kaydetmede ki Dongu sorunu - Hayri16 - 13/12/2010 Örnek ekleyebilir misiniz? (sıkıştırarak) Cvp: Kaydetmede ki Dongu sorunu - Subco - 13/12/2010 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 |