Skip to main content

AccessTr.neT


Alt formdaki satırlardan seçip silme

Alt formdaki satırlardan seçip silme

Çözüldü #1
Değerli arkadaşlar merhaba;
Form üzerine eklediğiniz altformdaki seçtiğiniz satırlardan silme isteğinizi bir tıklamayla gerçekleştiren bir çalışmadır. Silme esnasında kullanıcıyı uyaran mesaj içeriği de mevcutdur.
Umarım istifade ederek, işlerini kolaylaştırırsınız.
Teşekkürler.
.rar altformsatirsil_MESAJ.rar (Dosya Boyutu: 14,38 KB | İndirme Sayısı: 66)
Eğer bir kişi hem akıllı, hem çalışkansa takdir et.
Çalışkan fakat akıllı değilse dikkat et.
Akıllı fakat tembel ise ikaz et.
Hem akılsız, hem tembelse uzaklaşmak için acele et.
Son Düzenleme: 12/07/2009, 16:49, Düzenleyen: Aykay.
Cevapla
Çözüldü #2
Paylaşım için teşekkürler Aykay
Cevapla
Çözüldü #3
çok teşekkürler aykay
Cevapla
Çözüldü #4
Sn Aykay emeğiniz teşekkürler. Ancak benim anlamadığım zaten altformda satır seçili iken kayıt sil dediğiniz zaman Access kayıt silinsi mi diye soruyor. Şimdi iki kez evet demek durumunda kalıyorum. Access uyarısını kaldırmak mı gerekli; sizde farklı mı oluyor? Kusuruma bakmayın aklıma yatmadı mı huzursuz oluyorum... Saygılar...
Bilgi paylaşıldıkça çoğalır....
Her engel, yaşam koşullarınızı daha iyileştirecek bir fırsattır.


Access için her zaman lazım olacak konu başlıkları listesi


Cevapla
Çözüldü #5
Sayın benremix;
Çalışma bende sağlıklı çalışıyor. Tekrar deneyin. Altformdaki herhangi bir satırın üzerindeyken aşağıdaki sil butonuna bastığınızda silme işlemini sorarak gerçekleştir.
Kolaygelsin.
Eğer bir kişi hem akıllı, hem çalışkansa takdir et.
Çalışkan fakat akıllı değilse dikkat et.
Akıllı fakat tembel ise ikaz et.
Hem akılsız, hem tembelse uzaklaşmak için acele et.
Cevapla
Çözüldü #6
Sayın benremix
Sizin Access seçeneklerinde Eylem sorgularında onay isteme seçeneği işaretli. Sayın Aykay'da ise bu seçenek "gösterme" şeklinde yani işaretsiz. Bu yüzden access'teki eylemler sizde onay ister ama sayın Aykay'da onay istemeden gerçekleşir. Bu nedenle yukardaki silme butonundaki kodların ilk başına

Kod:
DoCmd.SetWarnings False
ens son end sub satırından önce de

Kod:
DoCmd.SetWarnings true
yazılması gerekir. Böylece Access onayı kapatılmış olur. Unutmayın.

Yeni kodlar şöyle olacak:
Kod:
Private Sub Komut2_Click()
DoCmd.SetWarnings False

On Error GoTo Err_Komut2_Click

If MsgBox("Seçilen satır silinecektir. Emin misiniz?", _
vbYesNo) = vbYes Then
Cancel = True
DoCmd.RunSQL "Delete Tablo1.sno FROM Tablo1 WHERE (((Tablo1.sno)=[Formlar]![Form1]![Metin3]));", -1
End If
  
Me.Tablo1_alt_formu.Requery
DoCmd.SetWarnings True

Exit_Komut2_Click:
    Exit Sub
Err_Komut2_Click:
    MsgBox Err.Description
    Resume Exit_Komut2_Click

End Sub


Kolay gelsin.
İnadına, ille de Accesstr.net...
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da