Access SQL   ›   ACCESS SORULARI VE ÖRNEK UYGULAMALARI   ›   ACCESS SORULARI   ›   [FORM] form da çoklu veri seçme ve kaydetme

[FORM] form da çoklu veri seçme ve kaydetme
metocan
Yeni Üye 15-40

*
Kayıt Tarihi: 27.04.2019
Toplam 7 konu açtı.
Toplam 31 yorum yaptı.
Toplam 0 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2007 TR, Office 2013 TR,
Beğeniler: 0 / 0
#1
05-05-2019, 19:22
Merhaba Arkadaşlar Şimdiden hayırlı ramazanlar

soruma gelecek olursak

1. resimde müşteriye ait ödenmemiş mallar görünüyor bu malların bir kısmını veya hepsini seçip hesap gör dediğimde 2. resimdeki bölüm açılacak bu bölümde sadece seçili ürünler gelecek gelen ürünlere ait hesaplama altta yapacak yapılan hesap sonrasında kaydet dediğimde TblHesap Tablosuna kayıt edecek aynı zamanda, seçtiğimiz satırların durum kodunu değiştirerek 2 yapacak ve günün tarihini atacak şekilde düzenlemek istiyorum.

yardımcı olabilirseniz sevinirim


Eklenti Dosyaları
.jpg   1.jpg (Boyut: 251,76 KB / İndirilme: 140)
.jpg   2.jpg (Boyut: 274,14 KB / İndirilme: 78)
.rar   Ticaret.rar (Boyut: 105,64 KB / İndirilme: 63)



  Bul
  Alıntı
Bu mesajı beğenenler:
metocan
Yeni Üye 15-40

*
Kayıt Tarihi: 27.04.2019
Toplam 7 konu açtı.
Toplam 31 yorum yaptı.
Toplam 0 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2007 TR, Office 2013 TR,
Beğeniler: 0 / 0
#2
07-05-2019, 16:24 (En son düzenleme: 07-05-2019, 23:28 metocan.)
Kimsenin bir fikri yok sanirim. Fikir vermeniz bile yeterli cevap olması gerekmiyor

Müşteri hesap ekraninda

Bazı guncellemeler yaptım şimdi sadece en sonda kaydet dediğimde altta yapilan hesabı kaydetmesi ve orta bölümdeki tarih durum ve seç değerlerini varsayılan değerle değiştirsin


Eklenti Dosyaları
.rar   Ticaret2.rar (Boyut: 110,72 KB / İndirilme: 54)



  Bul
  Alıntı
Bu mesajı beğenenler:
dsezgin
Forum Yöneticisi

*
Kayıt Tarihi: 24.03.2013
Toplam 26 konu açtı.
Toplam 8.742 yorum yaptı.
Toplam 983 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2013,
Beğeniler: 48 / 211
#3
08-05-2019, 05:19
Visual Basic
  1. Private Sub Komut13_Click()
  2. If DCount("*", "TblHesap", "kisiid=" & Me.kisilerID) = 0 Then
  3. CurrentDb.Execute "INSERT INTO TblHesap ( kisiid, tarih, toplam, gider ) " & _
  4. "VALUES(" & Me.kisilerID & ", date(), " & Me.toplam & ", " & Me.gider2 & ")"
  5. Else
  6. CurrentDb.Execute "UPDATE TblHesap Set tarih=date(),toplam=" & Me.toplam & ",gider=" & Me.gider2 & " Where (((kisiid)=" & Me.kisilerID & "))"
  7. End If
  8. CurrentDb.Execute "UPDATE Tblislem SET durumID=2, durumtarih=date() Where (((musteriID)=" & Me.kisilerID & ") And ((durumID)=1) And ((sec)=-1))"
  9. Me.ALTFRM_Musteri_Hesap_Hareketler.Form.Requery
  10. End Sub



TblHesap tablosuna kayit ekleme islemi yukaridaki prosedur ile yapilabilir. Bu kayit odeme ile degisken olacagi icin tutulma gerekcesi ne olabilir. Islem tablosunda durum statusun bagli verileri istendiginde cagrilabilir. Deneme uygulamasi gibi gorunuyor, Dsum, dlookup, fonksiyonlari ile daha kestirme hesaplama yapabilirsiniz. Forumdaki fonksiyon bolum dokumanlarini inceleyebilirsiniz.


.rar   Ticaret2.rar (Boyut: 96,22 KB / İndirilme: 75)
Access Fonksiyonlarının(Deyimler), Sorgu da kullanımı
Rapor veya-Pdf-Dosyalarını Birleştirme Uygulaması



  Website   Bul
  Alıntı
Bu mesajı beğenenler:
halily
Access Takımı

*
Kayıt Tarihi: 29.06.2014
Toplam 3 konu açtı.
Toplam 1.597 yorum yaptı.
Toplam 429 puanı bulunmakta.
Beğeniler: 13 / 93
#4
08-05-2019, 15:08 (En son düzenleme: 08-05-2019, 16:22 halily.)
kaydet butonunun kodu
Visual Basic
  1. SQLGuncelle = " Update Tblislem  Set [durumID] = 2  " & _
  2.               " WHERE ((Tblislem.islemID) in (" & txtKayitler & "));"
  3.  
  4. CurrentDb.Execute SQLGuncelle


dilerim işinize yarar


Eklenti Dosyaları
.rar   Ticaret_hy2.rar (Boyut: 80,63 KB / İndirilme: 68)



  Bul
  Alıntı
Bu mesajı beğenenler:
metocan
Yeni Üye 15-40

*
Kayıt Tarihi: 27.04.2019
Toplam 7 konu açtı.
Toplam 31 yorum yaptı.
Toplam 0 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2007 TR, Office 2013 TR,
Beğeniler: 0 / 0
#5
09-05-2019, 00:13 (En son düzenleme: 09-05-2019, 00:18 metocan.)
(08-05-2019, 05:19)dsezgin demiş ki:
Visual Basic
  1. Private Sub Komut13_Click()
  2. CurrentDb.Execute "INSERT INTO TblHesap ( kisiid, tarih, toplam, gider ) " & _
  3. "VALUES(" & Me.kisilerID & ", date(), " & Me.toplam & ", " & Me.gider2 & ")"
  4. End Sub


Hocam yardımların için teşekkür ederim evet biraz deneme uygulaması gibi bişey oldu olursa istediğim gibi ince ayar kısmına sonra gececem.

Kaydet tuşuna bastığında kayit yapıyor ama bir daha basınca yine yapıyor ikinci kayit yapmaması için ne yapilabilinir

update kisminda sadece kişi adı yazdığınız için o kişiye ait bütün değerleri ödendi yapıyordu seç taplosunuda ben ekledim sorun düzeldi



  Bul
  Alıntı
Bu mesajı beğenenler:
dsezgin
Forum Yöneticisi

*
Kayıt Tarihi: 24.03.2013
Toplam 26 konu açtı.
Toplam 8.742 yorum yaptı.
Toplam 983 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2013,
Beğeniler: 48 / 211
#6
09-05-2019, 02:02
(09-05-2019, 00:13)metocan demiş ki: Kaydet tuşuna bastığında kayit yapıyor ama bir daha basınca yine yapıyor ikinci kayit yapmaması için ne yapilabilinir

Mesaj: #3'u Gunccelledim...
Access Fonksiyonlarının(Deyimler), Sorgu da kullanımı
Rapor veya-Pdf-Dosyalarını Birleştirme Uygulaması



  Website   Bul
  Alıntı
Bu mesajı beğenenler:


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  Formu Pdf Olarak Kaydetme snapper 8 257 01-11-2023, 22:59
Son Mesaj: dsezgin
  [TABLO] çoklu Birleşik Giriş Kutusu RASİMPEH 2 147 19-09-2023, 04:53
Son Mesaj: RASİMPEH
  [FORM] İLİŞKİSİZ FORMDAN TABLOYA VERI KAYDETME moskovic 24 20.300 06-07-2023, 12:11
Son Mesaj: dsezgin
  Ilişkisiz Formdan Tabloya Verı Kaydetme erol1919 2 206 18-06-2023, 21:13
Son Mesaj: alperalper
  [VBA] Alan Kontrollü Kaydetme Işlemi Ahmet51 2 208 25-05-2023, 14:07
Son Mesaj: Ahmet51
access-sql-3 Access I Bulut Uygulamaları Ile Anlık çoklu Kullanıcı Erişimi BeyTor 12 602 23-04-2023, 22:05
Son Mesaj: BeyTor
  Ana Menüden 2.form Açtığımda Form Görev çubuğuna Inmiyor. 32'den 64'e Geçiş Hatası OGUZTURKYILMAZ 3 250 13-04-2023, 23:39
Son Mesaj: OGUZTURKYILMAZ
  şartlı Veri Kaydetme kerrem 3 190 17-01-2023, 08:09
Son Mesaj: alperalper

Foruma Git:


Bu konuyu görüntüleyen kullanıcı(lar): 1 Ziyaretçi