[SORGU] Sorgu Sonucunu Metin Kutusuna Yazdırma
#1
access-sql-3 
Arkadaşlar herkese merhaba,

Elimde bir personel listesinin olduğu bir tablo ve izin listesinin olduğu bir tablo var. Formumun üzerinde TAB menu bulunmakta. Tab0 da kimlik bilgileri olan tablo bilgileri geliyor ve izin hakediş bilgileri geliyor. Personel bilgisi ile izin hakedişleri aynı tabloda bulunmakta. Tab1 de ise kullanılan izinler var.
Şimdi:
Her personelin izin bilgilerini Tab1 deki listeye aşağıdaki kodla çekiyorum.
SQL
  1. SELECT Tblizinler.Kimlik, Tblizinler.[Personel TC], Tblizinler.[İzin Türü], Tblizinler.[İzin Başlangıç], Tblizinler.[İzin Bitiş], Tblizinler.[İzin Süresi], Tblizinler.[Onay Durumu], Tblizinler.[Personel Kimlik]
  2. FROM Tblizinler
  3. WHERE (((Tblizinler.[Personel TC])=[Formlar]![İnsan Kaynakları]![Tc]))
  4. ORDER BY Tblizinler.Kimlik, Tblizinler.[İzin Başlangıç] DESC;



Buraya kadar hiçbir sorun yok. Sorunum şu. Tab0 da bulunan bir Metin içine oluşturacağım sorgunun sonucunu almak istiyorum.
SQL
  1. SELECT Tblizinler.[Personel TC], SUM(Tblizinler.[İzin Süresi]) AS [Toplaİzin Süresi]
  2. FROM Tblizinler
  3. GROUP BY Tblizinler.[Personel TC];



İzinler tablosunda kişilerin izinlerini toplatıp TC ye göre gruplandırıyorum. Ancak Metin içine bu sorgunun 2. sütunu olan izin toplamını nasıl alabilirim?? Bu arada T.C kimlik filtre olarak kullanıyorum herkesin toplamı gelsin istemiyorum. Tab0 da TC metin içindeki tc kimlik numarasına göre listeliyorum.

Konuyla ilgili yardımlarınızı bekliyorum. Aşağıdaki şekilde toplama yaptırdım ancak sonuç hep yanlış çıkıyor birde sonucu alabilmek için izinlerlistesine tıklamak gerekiyor. Niye böyle oldu anlamadım. Ancak en güzel sorgudan almak gerektiğini düşünüyorum. Bu şekilde almanın bir yolu varsa eğer ikinci aşamada 2015 ve 2016 izinlerinden önce eskinin kullanılıp daha sonra yeniye geçmesi şeklinde ve sözleşmelilerde eski izin olmaması gibi kriter ekleyeceğim.

Visual Basic
  1. Private Sub izintopla()
  2. Dim say As Integer
  3.  
  4. KalanIzinSuresi = 0
  5. For say = 1 To [IzinListesi].ListCount
  6. KalanIzinSuresi = KalanIzinSuresi + [IzinListesi].Column(5)
  7.  
  8. Next
  9. End Sub





  Alıntı
Bu mesajı beğenenler:
#2
=dSum("[İzin Süresi];"Tblizinler";"[Personel TC]='" & [Forms]![İnsan Kaynakları]![Tc] & "'")

metin kutusu kontrol kaynagina yazabilirsiniz.



  Alıntı
Bu mesajı beğenenler:


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  [FORM] Açılır Menüdeki Veriyi Metin Kutusuna Aktarma Pasham 1 340 19-02-2026, 21:18
Son Mesaj: adnan
  Açılan Kutudan Kritere Göre Veriyi Başka Alana Yazdırma osman06 8 632 23-11-2025, 11:33
Son Mesaj: dsezgin
  [FORM] Metin Kutusundaki Değeri Başka Bir Metin Kutusuna Aktarmak TheREDROSE 2 461 02-08-2024, 11:56
Son Mesaj: TheREDROSE
  Acceste Liste Kutusundan Seçilen Veriyi Metin Kutusuna Gönderme Pasham 24 1.952 04-04-2024, 01:18
Son Mesaj: halily
  [FORM] Aktif Saati Tablodaki Saat Arasına Göre Bulup Forma Yazdırma yahyamacit 5 658 14-03-2024, 11:07
Son Mesaj: yahyamacit
  [FORM] Inputbox Kutusuna Girilen Değere Pasword Maske Uygulama orderyazbim 2 536 22-01-2024, 22:12
Son Mesaj: orderyazbim
  [VBA] Dosya Yolu Yazdırma benuva 2 568 26-11-2023, 19:06
Son Mesaj: benuva
  Uzun Metin Formatını Sql De Kısa Metin Formatına çevirebilir Miyiz? adnnfrm 2 634 06-08-2023, 03:51
Son Mesaj: adnnfrm

Foruma Git:


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