Skip to main content

AccessTr.neT


Kaydedilen verileri listboxta gösterme sorunu

Kaydedilen verileri listboxta gösterme sorunu

Çözüldü #1
Merhaba üstadlar

forumda aradım ama istediğim sonucu elde edemedim en iyisi size sormak sanırım
bir form tasarlıorum bu formda birkaç çeşit kayıt işlemi yapılıyor. Formda giren mal bilgisi kaydet işleminde birden fazla kayıt yapılacak bu yüzden girilen kayıtları unutulma olasılığını düşünerek listboxta Material ve Batch değerlerini göstersin istiyorum ama beceremedim bir türlü yardımlarınızı bekliyorum.

kayıt işlemi ado ile yapıyorum tablolar ayrılacak şu yöntemle yap diyen olursa eğer onu düzeltebiliriz.
.zip paketleme.zip (Dosya Boyutu: 173,98 KB | İndirme Sayısı: 8)
Son Düzenleme: 04/03/2011, 14:08, Düzenleyen: saygincilli.
Cevapla
Çözüldü #2
Sayın Saygın;
Ekte gönderdiğimi bir inceleyin, eğer istediğiniz böyle veya buna benzer bir şeyse devam ederiz.
.rar paketleme-Hayri16.rar (Dosya Boyutu: 46,92 KB | İndirme Sayısı: 8)
Hayri16, 12-11-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla
Çözüldü #3
yok değil bütün kayıtları gösteriyo burdaki liste
benim istediğim "giren mal bilgisi kaydet" butonuna tıkladığımız zaman kaydedilen verinin sadece material ve batch kısmını listeye atıcak sadece göstermek amaçlı mesela 10 tane material girdik 10 tanesinide listede gösterecek tekrar girilmesin diye göstermek amaçlı
Cevapla
Çözüldü #4
Saygın o zaman Liste66 nın sütun sayısını 2 yapalım. Satır kaynağını boş bırakalım. Satır Kaynak türü'nü değerler listesi yapalım.
Private Sub btnmalbilgikayit_Click() yordamını aşağıdaki şekilde yazalım.
Private Sub btnmalbilgikayit_Click()
strSQL = "SELECT * FROM tbl_GirenMalBilgisi "
Set rstkayit = New ADODB.Recordset
rstkayit.Open strSQL, CurrentProject.Connection, adOpenKeyset, adLockOptimistic
With rstkayit
.AddNew
.Fields("GirenMalID") = Me.txtmalID
.Fields("Material") = Me.txtmaterial
.Fields("Batch") = Me.txtbatch
.Update
End With
With rstkayit
'Aşağıdaki satırdaki kod işimizi görecek.
Liste66.AddItem Me.txtmaterial & ";" & Me.txtbatch

.MoveLast
showRecord2 intCount & " Kayıtta " & .AbsolutePosition
End With
End Sub
Yine olup olmadığı konsusunda dönersen sevinirim. Kolay gelsin
Hayri16, 12-11-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla
Çözüldü #5
Run-time error '424':
object required

evet hayri bey yazdığımız koda böyle bi hata veriyor "nesne gerekliymiş"
tamam hayri bey sorunu çözdüm liste kutusunda problem varmış

Teşekkürler
Son Düzenleme: 04/03/2011, 13:43, Düzenleyen: saygincilli.
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da
Task