Access SQL   ›   ACCESS SORULARI VE ÖRNEK UYGULAMALARI   ›   ACCESS SORULARI   ›   [SORGU] İlişkisiz kutuya ve sorgu

[SORGU] İlişkisiz kutuya ve sorgu
dsezgin
Forum Yöneticisi

*
Kayıt Tarihi: 24.03.2013
Toplam 26 konu açtı.
Toplam 8.743 yorum yaptı.
Toplam 983 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2013,
Beğeniler: 48 / 211
#13
09-08-2018, 12:03
VBA, Tools, Referanslardan Microsoft ActiveX Data Objects .... Library isaretli olmali. Uygulamanizda Turkce harf ve alan tanimlamalarinda bosluk kullanmaniz da ayrica sorun olabiliyor. Oneri mesajinda Turkce karakterleri degistirmeye calistim.
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:
ÜmitSamlı
Aktif Üye 150-200

*
Kayıt Tarihi: 21.08.2011
Toplam 26 konu açtı.
Toplam 179 yorum yaptı.
Toplam 0 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2010,
Beğeniler: 5 / 0
#14
09-08-2018, 13:05
Gerçekten çok teşekkürler bu sefer olmuş.

Fakat 2 sorunum daha var.

1. Sıralamayı parça numarası yerine kalan yüzdeye göre artan yapabilir miyiz?
2. Bu SQL den sonra kayıt yaptıktan sonra güncellemesi çok uzun zaman alıyor. Bunun önüne geçebilir miyiz?



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

*
Kayıt Tarihi: 24.03.2013
Toplam 26 konu açtı.
Toplam 8.743 yorum yaptı.
Toplam 983 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2013,
Beğeniler: 48 / 211
#15
10-08-2018, 00:00
En hizli yontem, 01_ARaymould Kalıp Listesi tablosunda EnSnYuzde alani acip, 04_ARaymould Kalıp Bakım Formu Giriş tablosunda ki Bir Sonraki Periyodik Bakıma Kalan Baskı Yüzdesi : alanina en son kayit yaptirirken bu alanada degerin yazdirilmasi ve Liste kutusu satir kaynagina
SQL
  1. SELECT Part_Number, EnSnYuzde FROM [01_ARaymould Kalıp Listesi] ORDER BY EnSnYuzde


Yazilmasi ile en hizli gosterim saglanir.

Guncelleme sorgusu :

SQL
  1. UPDATE [01_ARaymould Kalıp Listesi] SET [01_ARaymould Kalıp Listesi].EnBuyukYuzde = Getir([Part_Number],Nz(DMax("[Bakıma Geliş Zamanı]","[04_ARaymould Kalıp Bakım Formu Giriş]","[Parça Numarası]='" & [Part_Number] & "'")))
  2. WHERE (((Nz(DMax("[Bakıma Geliş Zamanı]","[04_ARaymould Kalıp Bakım Formu Giriş]","[Parça Numarası]='" & [Part_Number] & "'")))>0) AND (([01_ARaymould Kalıp Listesi].[WHERE IS the tool])="A.Raymond"));


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:
ÜmitSamlı
Aktif Üye 150-200

*
Kayıt Tarihi: 21.08.2011
Toplam 26 konu açtı.
Toplam 179 yorum yaptı.
Toplam 0 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2010,
Beğeniler: 5 / 0
#16
13-08-2018, 15:42
Kafam çok karıştı burada lütfen kusura bakmayın. Aslında bir önceki sorularımda sadece yüzdeye göre sıralama kısmını çözebilirsek ben yavaşlama olayını bir şekilde hallederim.


"En hizli yontem, 01_ARaymould Kalıp Listesi tablosunda EnSnYuzde alani acip, 04_ARaymould Kalıp Bakım Formu Giriş tablosunda ki Bir Sonraki Periyodik Bakıma Kalan Baskı Yüzdesi : alanina en son kayit yaptirirken bu alanada degerin yazdirilmasi ve Liste kutusu satir kaynagina " özellikle bu kısmı kavrayamadım.



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

*
Kayıt Tarihi: 24.03.2013
Toplam 26 konu açtı.
Toplam 8.743 yorum yaptı.
Toplam 983 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2013,
Beğeniler: 48 / 211
#17
13-08-2018, 19:05
Yuzde degerinin girildigi kutunun guncelleme olay yordamina, asagida ki kod ile 01_ARaymould... tablosu yeni olusturacagimiz EnBuyukYuzde alanina en son girilen yude degeri kaydedilecektir.
Visual Basic
  1. Private Sub Bir_Sonraki_Periyodik_Bakıma_Kalan_Baskı_Yüzdesi___AfterUpdate()
  2. CurrentDb.Execute "UPDATE [01_ARaymould Kalıp Listesi] Set EnBuyukYuzde = " & Replace(Me.Bir_Sonraki_Periyodik_Bakýma_Kalan_Baskı_Yüzdesi__, ",", ".") & " Where (((Part_Number)='" & Me.[Parça Numarası] & "'))"
  3. Me.Liste608.Requery
  4. End Sub



[Resim: attachment.php?aid=21350]



.rar   UmitSamli.rar (Boyut: 1,16 MB / İndirilme: 60) Ornegini inceleyebilirsiniz.


Eklenti Dosyaları
.png   umit.png (Boyut: 52,43 KB / İndirilme: 126)
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:
ÜmitSamlı
Aktif Üye 150-200

*
Kayıt Tarihi: 21.08.2011
Toplam 26 konu açtı.
Toplam 179 yorum yaptı.
Toplam 0 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2010,
Beğeniler: 5 / 0
#18
28-08-2018, 15:02
Merhaba,

Geç cevabım için kusura bakmayın. Son çözümünüz sanırım tamda istediğim gibi oldu. Biraz deneyip herhangi bir sorunla karşılaşıyormuyum kontrol edeceğim. Bir sorun olursa bu konu üzerinden tekrar gündeme getiririm. Yardımlarınız ve desteğiniz için çok teşekkür ederim. Hakkınızı helal edin

Saygılarımla,
Ümit ŞAMLI



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


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  [FORM] İLİŞKİSİZ FORMDAN TABLOYA VERI KAYDETME moskovic 24 20.304 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
  [FORM] Combobox Evet Hayır Seçiminde Açılan Kutuya Zorunlu Veri Girişi Mesajı Gelmesi. DENTAVAX 12 479 17-07-2022, 20:51
Son Mesaj: DENTAVAX
  Kayıt Kaynağı Direkt Tablo Olan Formdaki Ilişkisiz Bir Textbox'a Text Girememe. tarkanaykın 4 254 21-03-2022, 02:38
Son Mesaj: tarkanaykın
  [FORM] Formdan Ilişkisiz Metin Kutusu Kaydı anno 2 261 07-01-2022, 11:59
Son Mesaj: anno
  [FORM] Açılır Kutuya Veri Almak m_demir 8 409 25-11-2021, 17:11
Son Mesaj: m_demir
  Açılan Kutuya Yevmiyetarihine Göre Ay Adı Atama Ahmet51 4 250 18-11-2021, 16:42
Son Mesaj: Ahmet51
  [FORM] Ilişkisiz Formdan Tabloya Uzun Metin Kayıt Etme Willingness 4 375 26-05-2021, 16:40
Son Mesaj: Willingness

Foruma Git:


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