Müşteriden yapılan tahsilatın Kasaya aktarma

Müşteriden yapılan tahsilatın Kasaya aktarma - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Müşteriden yapılan tahsilatın Kasaya aktarma (/konu-musteriden-yapilan-tahsilatin-kasaya-aktarma.html)

Sayfalar: 1 2 3

Cvp: Müşteriden yapılan tahsilatın Kasaya aktarma - ozguryasin - 21/08/2015

Kod:

Dim rs as new adodb.recorset

Rs.open "tabloadi", currentproject.connection,adopenkeyset,adlockoptimistic

Rs.addnew

Rs!tabloalanadi=me.metinkutusuadi

Rs!tabloalanadi=me.metinkutusuadi

Rs.update

Rs.close: set rs=nothing

Gerekli yerleri düzeltin. Butona ekleyin kodları. Diğer tabloya yani kasa tablosunada veriyi yazdırırsınız.

Cvp: Müşteriden yapılan tahsilatın Kasaya aktarma - ozguryasin - 21/08/2015

Eper referans bölümünde
Microsoft ActiveX Data Objects 2.xx Library

Ekli değil ise kod çalışmaz.
Vba bölümünde
Tool > References...

Ten ekleyiniz.

Cvp: Müşteriden yapılan tahsilatın Kasaya aktarma - fascioğlu - 21/08/2015

Sayın Özgür Yasin hocam,
Eğer vaktiniz varsa çalışma dosyasını ekledim örnek üzerinden yardımcı olabilirseniz sevinirim.
Saygılarımla.

Cvp: Müşteriden yapılan tahsilatın Kasaya aktarma - ozguryasin - 21/08/2015

Şu an iş yerindeyim. Cepten tazıyorum. Saat 17:00 dan sonra bakalım

Cvp: Müşteriden yapılan tahsilatın Kasaya aktarma - atoz112 - 21/08/2015

Sayın fascioglu,

Alıntı:...Ürün adı Ürüncıkış tablosuna gelmiyor,...

talebinize yönelik olarak,alternatif olması adına;
Aşağıdaki kod ifadesini,

Kod:

Me.urunadı = DLookup("URUNAD", "tbl_URUNLER", "[URUNID]=" & Me.urunıd)

frm_URUNCIKIS adlı formunuzdaki KAYDET butonu içerisine ve

Kod:

DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70

kod ifadesinin bir üst satırına eklemek sureti ile tbl_URUNCIKIS adlı tablonuzdaki urunadı alanına istediğiniz verileri getirmiş olacaksınız.buton içeriği aşağıdaki gibi olacak.bilginize.iyi çalışmalar,saygılar.

Kod:

Me.urunadı = DLookup("URUNAD", "tbl_URUNLER", "[URUNID]=" & Me.urunıd)

DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70

Cvp: Müşteriden yapılan tahsilatın Kasaya aktarma - fascioğlu - 21/08/2015

Sayın Atoz 112 hocam,
Çok teşekkür ederim.
Saygılarımla.