Arkadaşlar Merhaba
ekteki programda satış formunun altında iki tane liste kutusu var birisi stoktaki araçlar diğerinde müşteri var. Satış yap butonuna bastığımda iki listedeki verileri sıfır_satılan_stok altına kaydedilmesinin istiyorum.
yardımcı olursanız sevinirim.
Merhaba, müşteri bilgilerinin bulunduğu liste kutusunda 2 müşteri var ise her ikisi de ayrı ayrı mı kaydedilecek, yoksa her iki liste kutusunda da seçim yapılan satırlar mı aktarılacak?
merhaba
örneğin stokta 19 araç var. müşteri sayısıda 27 olsun. stoktaki araçlardan 9. cu müşteridende 6. yı seçtiğimde yaptığım seçimleri sıfır_satılan_stok tablosuna yazdırmak istiyorum. bide iki liste kutusuna da arama kutusu eklememiz lazım.
anlayışın için şimdiden teşekkür ederim.
Butonun tıklandığında olayına aşağıdaki kodu ekleyiniz.
Dim GArac, GMusteri As String
Dim rc As DAO.Recordset
GArac = Nz(Me.Liste0.Column(0), 0)
GMusteri = Nz(Me.Liste4.Column(0), 0)
If GArac = 0 Then
MsgBox ("ARAÇ SEÇ")
Exit Sub
ElseIf GMusteri = 0 Then
MsgBox ("Musteri SEÇ")
Exit Sub
Else
Set rc = CurrentDb.OpenRecordset("sıfır_satılan_stok")
rc.AddNew
rc!arac_tipi = Me.Liste0.Column(6)
rc!arac_modeli = Me.Liste0.Column(7)
rc!otpa = Me.Liste0.Column(2)
rc!sasi_no = Me.Liste0.Column(3)
rc!motor_no = Me.Liste0.Column(4)
rc!aciklama = Me.Liste0.Column(5)
rc!musteri_id = Me.Liste4.Column(0)
rc.Update
End If
Bu, konu başlığındaki sorunuzun cevabıdır. Arama olayı için
Form Üzerinden Veri Arama bağlantısındaki konuyu inceleyiniz.
Ayrıca
Yapılmaması Gereken Ölümcül Hatalar
konusunu da inceleyiniz. Satış adında form, araç tipleri adında da tablo olmaz.
Yardımın için çok teşekkür ederim
Sayın ozanakkaya
Bu komutla aynı zamanda sıfır_satılan_stok a gönderdiğimiz araç bilgilerini sıfır_stok tablosundan silmek için ne yapmam lazım.
Anlayışın ve yardımların için şimdiden teşekkür ederim.