Konu Araçları | Seçenekler: | Gösterim Stili
Tarih
02/12/2010 18:15
Konu Sahibi
nsahin
Yorumlar
5
Okunma
2054
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy
Kullanici Avatari

nsahin

Aktif Üye
Aktif Üye
 181
 19
 16/11/2009
64
 Bursa
 
 Ofis 2007
 18/09/2018,10:18
Çözüldü 
Ek dosyadaki form formundaki sil butonuna bastığımda son 5 kayıt kalacak ve diğer kayıtları silecek. bunu yapamadım yardımcı olabilir misiniz? İyi çalışmalar.


Ek Dosyalar
.rar   örnek.rar(Dosya Boyutu: 15,92 KB / İndirme Sayısı: 5)
nsahin, 16-11-2009 tarihinden beri AccessTr.neT üyesidir.

Kullanici Avatari

alpeki99

Düşünmek en zor iştir...
Uzman
OL....
 38
 6.120
 162
 29/10/2008
 Bursa
 Yazılım Geliştirici
 Ofis 2010 32 Bit
 30/08/2018,18:18
Çözüldü 
Sil isimli butonun tıklanma olayı aşağıdaki gibi olursa kayıtları son beşi hariç silecektir.

Visual Basic Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
Private Sub Sil_Click()
On Error Resume Next
Dim sayi As Integer
Dim rst As ADODB.Recordset

    ' Kaç tane kayıt olduğunu saysın
    sayi = CurrentDb.OpenRecordset("tablo").RecordCount
    

Set rst = New ADODB.Recordset
    
    rst.ActiveConnection = CurrentProject.Connection
    rst.CursorType = adOpenDynamic
    rst.CursorLocation = adUseClient


    rst.Open "tablo", , adOpenKeyset, adLockOptimistic, adCmdTable

    For i = 1 To sayi - 5
    
        rst.MoveNext
        Me.Bookmark = rst.Bookmark
        'DoCmd.SetWarnings False
        DoCmd.RunCommand acCmdDeleteRecord
        'DoCmd.SetWarnings True
        ' Eğer kayıt silerken uyarı almak istemiyorsanız SetWarnings olan iki satırdaki tek tırnak işaretini silin
    Next i

rst.Close
    
    
End Sub


AccessTr.Net teknik konular içeren bir sitedir. Bu tip sitelerde en iyi şekilde yardım alabilmeniz için Site Kurallarını mutlaka okumanız ve buna göre hareket etmeniz lazım.

Kullanici Avatari

nsahin

Aktif Üye
Aktif Üye
 181
 19
 16/11/2009
64
 Bursa
 
 Ofis 2007
 18/09/2018,10:18
Çözüldü 
sayın Alpeki hata veriyor.


nsahin, 16-11-2009 tarihinden beri AccessTr.neT üyesidir.

Kullanici Avatari

alpeki99

Düşünmek en zor iştir...
Uzman
OL....
 38
 6.120
 162
 29/10/2008
 Bursa
 Yazılım Geliştirici
 Ofis 2010 32 Bit
 30/08/2018,18:18
Çözüldü 
Hata nedir? Yukarıdaki kodların hepsini birden butonun tıklanma olayına yapıştırmadınız değil mi? Yukarıdaki kodda butonun tıklanma olayının tüm kodları var. Siz ilk ve son satır hariç hepsini yapıştıracaksınız.


AccessTr.Net teknik konular içeren bir sitedir. Bu tip sitelerde en iyi şekilde yardım alabilmeniz için Site Kurallarını mutlaka okumanız ve buna göre hareket etmeniz lazım.

Kullanici Avatari

ozanakkaya

sledgeab
Kurucu
OZ.... AK....
 40
 11.266
 464
 29/01/2008
 Denizli
 Memur
 Ofis 2010 32 Bit
 Bugün,15:54
Çözüldü 
Sanırım problemi "Microsoft ActiveX Data Objects 2.X library" referansını eklememesi.


"Boş Örnek Eklerim, Yapıp Verirler" demeyin, örneğinizi hazırlayın.
Komplike kod talebiniz var ise İletişim bağlantısından bize ulaşın. 
Cebelleşmezsen Öğrenemezsin. 

Kullanici Avatari

nsahin

Aktif Üye
Aktif Üye
 181
 19
 16/11/2009
64
 Bursa
 
 Ofis 2007
 18/09/2018,10:18
Çözüldü 
herkese çok teşekkür ederim.


nsahin, 16-11-2009 tarihinden beri AccessTr.neT üyesidir.


Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
Çözüldü Access Runtime İle Çalışırken İstemci Ayarlarında Sorgu Onayı Problemi hbal09 4 108 11/09/2018, 17:59
Son Yorum: hbal09
Çözüldü Nesne-Form "özellik Sayfası" Problemi notrino 5 110 16/08/2018, 12:46
Son Yorum: notrino
Çözüldü Accessten Excele Veri Aktarımında Sorguda Nz Problemi mehmetb84 7 181 06/08/2018, 15:28
Son Yorum: mehmetb84
Çözüldü #boyut! Problemi (hatası) macirercan 6 390 10/12/2017, 19:46
Son Yorum: macirercan
Çözüldü Access Veri Aktarımı Şifre Problemi erdal21 4 407 21/09/2017, 21:06
Son Yorum: erdal21

Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2018 MyBB Group.