Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 1
  • 2
  • 3
  • 4
  • 5
ADO ile silme ve değiştirme sorunu
#1
Çözüldü 
Formdaki listeden veri seçip sildiğimde veya değiştirme yaptıktan sonra liste kutusuna tıklarsam hata mesajı veriyor,bunu nasıl düzeltebilirim.


Ek Dosyalar
.rar   SORU-ÜRÜNLER.rar (Dosya Boyutu: 47 KB / İndirme Sayısı: 9)
Cevapla
#2
Çözüldü 
Liste kutusunu güncellemek yerine Refresh yapmayı deneyin sorun kalmayacaktır.

Visual Basic Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Private Sub Komut2_Click()
strSQL = "SELECT * FROM GENEL "
Set rstkayit = New ADODB.Recordset
rstkayit.Open strSQL, CurrentProject.Connection, adOpenKeyset, adLockOptimistic

With rstkayit
    .Find "[SIRA_NO]=" & Me.SIRANO
    .Update
    .Fields("NO") = Me.NO
    .Fields("GRUP_ADI") = Me.ADI
    .Delete
End With

Me.Refresh ' Bu bölümü değiştirmeniz yeterli olacaktır.

End Sub

Toprağa her türlü kötü şey atılmasına rağmen
Topraktan hep güzel şeyler biter . (Akşemseddin)
Cevapla
#3
Çözüldü 
Allah razı olsun.Silme işleminden hemen sonra metin kutularında '#Silindi' yazısı çıkıyor,bunu yok edebilirmiyiz.
Cevapla
#4
Çözüldü 
Yüksek miktarda kayıt olan ve ağdan çalışan sistemlerde ikinci bir Sql sorgusu yapmanız performans açısından tavsiye edilmez. Silme işleminden sonra listeden sadece o öğeyi silmeniz iyi olacaktır.

Liste kutusunda seçili öğenin değerini :

Visual Basic Code
seciliOgeDegeri = ListeKutusuAdi.Column(0)


ile alabilir ve aşağıdaki kod ile o satırı silebilirsiniz:

Visual Basic Code
ListeKutusuAdi.RemoveItem ( seciliOgeDegeri )

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.
WWW
Cevapla
#5
Çözüldü 
Teşekkür ederim.
Cevapla
#6
Çözüldü 
Size yaptığım diğer ado uygulamasında liste kutusundan verileri form üzerindeki metin kutularına aktarmak yerine liste kutusuna tıklandığında olayına yazılan aşağıdaki kodu kullanarak metin kutularını doldurmuştum. Elinizde çalışan ve hatasız bir örnek varken neden başka bir yöntem kullandınız anlamadım. Kodlar sevgili Alpeki99'un dedikleri gibiydi.

Me.Metin362 = Me.Liste2.Column(0)
Me.Metin360 = Me.Liste2.Column(1)
Me.Metin354 = Me.Liste2.Column(2)
Me.Metin356 = Me.Liste2.Column(3)

Merak ettiğimden soruyorum. Ado kodalrınıo doğru olarak girmiş, ama bu basit Column işleminde hata yapmışsınız. Neden acaba?
İnadına, ille de Accesstr.net...
WWW
Cevapla


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
  Listede seçili olanı silme mustim1547 2 62 13/01/2017, 10:45
Son Yorum: mustim1547
Çözüldü Liste kutusundan seçili olanı tablodan silme... direnist 11 3.153 13/01/2017, 08:07
Son Yorum: mustim1547
  Boş Klasör / Alt Klasör Silme donepezil 14 217 12/01/2017, 09:16
Son Yorum: donepezil
  Formda Veri Aramada Like Sorunu uiakouwr 14 219 11/01/2017, 08:54
Son Yorum: uiakouwr
  Rapor Yazdırma Sorunu m_demir 2 78 02/01/2017, 20:08
Son Yorum: m_demir



Konuyu Okuyanlar: 1 Ziyaretçi