Konu Araçları | Konu Seçenekleri | Gösterim Stili
Tarih
22/05/2018 18:01
Konu Sahibi
sidd
Yorumlar
4
Okunma
296
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy

sidd

Aktif Üye
97268
 47
 14
 61
 14/05/2018
0
 -
 
 -
 14/10/2018,09:23
Çözüldü 
Merhabalar;

Ekte dosyasını da göreceğiniz, sorunum ile ilgili, 
Listboxdaki herhangi bir seçtiğimiz kaydı nasıl sileriz., 
dosya üzerine yazıp göndermenizi rica ederim.



ozguryasin

Uzman
9727
Öz.... Ya....
 36
 44
 1.130
 23/09/2009
613
 Bursa
 Yazılım
 Ofis 2016 32 Bit
 Dün,09:46
Listbox ta seçtiğiniz bir değerin id numarasından silersiniz, oc başına geçince örneğinize bakacağım


POWER 'un Çekirgesi :=)
ozguryasin, 23-09-2009 tarihinden beri AccessTr.neT AİLESİ üyesidir.
Access'i Profesyonel Şekilde Öğrenmek İçin https://www.accesstr.net Ailesi Yeter. alkis


Site Kurallarını sorularınızın hızlı cevaplanması için kesinlikle okuyunuz.

ozguryasin

Uzman
9727
Öz.... Ya....
 36
 44
 1.130
 23/09/2009
613
 Bursa
 Yazılım
 Ofis 2016 32 Bit
 Dün,09:46
nasıl bir örneğiniz var anlayamadım, form özellik sayfası açılmıyor. formun özelliklerini göremiyorum. listebo içindeki sorguyu göremiyorum


POWER 'un Çekirgesi :=)
ozguryasin, 23-09-2009 tarihinden beri AccessTr.neT AİLESİ üyesidir.
Access'i Profesyonel Şekilde Öğrenmek İçin https://www.accesstr.net Ailesi Yeter. alkis


Site Kurallarını sorularınızın hızlı cevaplanması için kesinlikle okuyunuz.

ozguryasin

Uzman
9727
Öz.... Ya....
 36
 44
 1.130
 23/09/2009
613
 Bursa
 Yazılım
 Ofis 2016 32 Bit
 Dün,09:46
ekteki örnek istediğiniz gibi olduğu için konu direkt cevaplananlar bölümüne taşınmıştır.

ekteki örneğe Referanslar bölümüne gereken referans eklendikten sonra ekteki kodlar yazılmıştır.

Visual Basic Code
1
2
3
4
5
6
7
8
9
10
11
12
If IsNull(Me.LST1.Column(0)) Then
MsgBox "kayıt seçmedin, kaydı silmek için bir kayıt seçin", vbCritical, "bİLGİ"
Else
Dim rs As New ADODB.Recordset
rs.Open "tblKayitlar", CurrentProject.Connection, adOpenKeyset, adLockOptimistic
rs.Find "[KayitId]=" & Me.LST1.Column(0)
rs.Delete
rs.Close
Set rs = Nothing
Me.LST1.Requery
MsgBox "seçtiğiniz kayıt silindi"
End If


POWER 'un Çekirgesi :=)
ozguryasin, 23-09-2009 tarihinden beri AccessTr.neT AİLESİ üyesidir.
Access'i Profesyonel Şekilde Öğrenmek İçin https://www.accesstr.net Ailesi Yeter. alkis


Site Kurallarını sorularınızın hızlı cevaplanması için kesinlikle okuyunuz.

sidd

Aktif Üye
97268
 47
 14
 61
 14/05/2018
0
 -
 
 -
 14/10/2018,09:23
(22/05/2018 23:45)ozguryasin Adlı Kullanıcıdan Alıntı: ekteki örnek istediğiniz gibi olduğu için konu direkt cevaplananlar bölümüne taşınmıştır.

ekteki örneğe Referanslar bölümüne gereken referans eklendikten sonra ekteki kodlar yazılmıştır.

Visual Basic Code
1
2
3
4
5
6
7
8
9
10
11
12
If IsNull(Me.LST1.Column(0)) Then
MsgBox "kayıt seçmedin, kaydı silmek için bir kayıt seçin", vbCritical, "bİLGİ"
Else
Dim rs As New ADODB.Recordset
rs.Open "tblKayitlar", CurrentProject.Connection, adOpenKeyset, adLockOptimistic
rs.Find "[KayitId]=" & Me.LST1.Column(0)
rs.Delete
rs.Close
Set rs = Nothing
Me.LST1.Requery
MsgBox "seçtiğiniz kayıt silindi"
End If


Teşekkür ederim Özgür Bey, halloldu.




Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
Çözüldü Listbox Oto Sütun Genişliği acar6783 6 280 06/02/2019, 21:55
Son Yorum: acar6783
Çözüldü Listbox Seçilen Değerin Görünmemesi yahzee_61 5 142 24/01/2019, 15:11
Son Yorum: ozanakkaya
Çözüldü Liste kutusundan seçili olanı tablodan silme... direnist 13 5.261 23/01/2019, 18:22
Son Yorum: ozanakkaya
Çözüldü Liste Kutusunda Seçili Olan Veriyi Metin Kutusuna Aktarma mmert06 3 213 25/12/2018, 18:33
Son Yorum: mmert06
Çözüldü Yıla Göre Aylık Toplu Ve Yıla Göre Aylık Listbox Filtreli Rapor shephard 6 471 19/09/2018, 20:13
Son Yorum: shephard

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