alt formdaki tüm veriler silme

Katılım
17 Temmuz 2007
Mesajlar
162
Excel Vers. ve Dili
xp türkçe
bir formun altın bir alt form var (veri sayfası görünümünde) ve bu alt formda yer alan tüm kayıtları formu kapattığımda silinmesini istiyorum ne yapmam gerekiyor.
 
Katılım
25 Aralık 2005
Mesajlar
4,160
Excel Vers. ve Dili
MS Office 2010 Pro Türkçe
Sayın kaikai,

Veriler formlarda kaydedilmezler, tablolara kaydedilirler. Formlar tablolara kaydı kolaylaştıran ara yüzlerdir. Siz bu bilgiler doğrultusunda tam olarak neyi istiyorsunuz?

İyi çalışmalar:)
 

akd

Destek Ekibi
Destek Ekibi
Katılım
14 Ağustos 2004
Mesajlar
1,114
Excel Vers. ve Dili
2003
Sayın kaikai
Private Sub Komut17_Click()

Dim Rs As New ADODB.Recordset
Rs.Open "tarih", CurrentProject.Connection, adOpenKeyset, adLockOptimistic
If Rs.EOF <> True Then
Do
If Rs("no") = no.Value Then
Rs.Delete
End If
Rs.MoveNext
Loop Until Rs.EOF
End If
Set Rs = Nothing
Set conn = Nothing
End Sub

bu bir tablodan formdaki no alan&#305; ile e&#351;le&#351;en kay&#305;tlar&#305;n tamam&#305;n&#305; silmeye yarar &#252;staraf&#305;nada normal silme kodu eklersen o senin ana formdaki kayd&#305;n&#305; siler bu kod ise altformdaki ilgili kay&#305;tlar&#305;n hepsini siler
 
Katılım
17 Temmuz 2007
Mesajlar
162
Excel Vers. ve Dili
xp türkçe
örnekte daha iyi anlatırım dedim. bir bakarsanız sevinirim.
 
Katılım
25 Aralık 2005
Mesajlar
4,160
Excel Vers. ve Dili
MS Office 2010 Pro Türkçe
Formdan silinsin diye bir şey yok bunu anlatmaya çalışıyorum. Tablodan da mı silinecek veriler? Yoksa form açıldığında temiz bir alan mı istiyorsunuz?

Ancak tablodan da silinmesini istiyorsanız hiç kaydetmeyin olsun bitsin.
 
Katılım
17 Temmuz 2007
Mesajlar
162
Excel Vers. ve Dili
xp türkçe
tablodan silinecek. ama otomatik kaydediyor tabloya, bu tablodaki veriler ba&#351;ka bir alanda i&#351;ime yar&#305;yor. o ana form a&#231;&#305;ld&#305;&#287;&#305;nda oraya de&#287;er yazacam ona g&#246;re di&#287;er tablomdada i&#351;e yarayacak. sonra ana formu kapatt&#305;&#287;&#305;mda t&#252;m de&#287;erler silinecek...
 
Katılım
25 Aralık 2005
Mesajlar
4,160
Excel Vers. ve Dili
MS Office 2010 Pro Türkçe
Sayın kaikai,

Aşağıdaki kodları forma kopyalayıp yapıştırın:

Kod:
Private Sub Form_Close()
On Error GoTo Hata_Err
    DoCmd.SetWarnings False
    DoCmd.RunSQL "DELETE tablo1.parametre FROM tablo1;", -1
    DoCmd.SetWarnings True

Çık_Exit:
    Exit Sub
Hata_Err:
    MsgBox Error$
    Resume Çık_Exit
End Sub

İyi çalışmalar
 
Katılım
17 Temmuz 2007
Mesajlar
162
Excel Vers. ve Dili
xp türkçe
say&#305;n modal&#305; &#231;ok te&#351;ekk&#252;r ederim.
 
Üst