Access SQL   ›   ACCESS SORULARI VE ÖRNEK UYGULAMALARI   ›   ACCESS SORULARI   ›   [VBA] Recordset Kaynağını Sorgu Olarak Tanımlama

[VBA] Recordset Kaynağını Sorgu Olarak Tanımlama
alperalper
Kıdemli Üye 400-1000

*
Kayıt Tarihi: 06.11.2013
Toplam 93 konu açtı.
Toplam 624 yorum yaptı.
Toplam 88 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2016, Office 2019,
Beğeniler: 0 / 31
#7
23-08-2022, 09:28
Sorgu içeriği boş olmasına rağmen 570 döndüğü için kayıt varmış gibi görüyor..Len () işe yaramadı yani.



  Bul
  Alıntı
Bu mesajı beğenenler:
husem
Kıdemli Üye 400-1000

*
Kayıt Tarihi: 06.05.2013
Toplam 192 konu açtı.
Toplam 756 yorum yaptı.
Toplam 34 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2003,
Beğeniler: 18 / 14
#8
23-08-2022, 11:34
strsql.listcount-1
olarak deneyibilirmisiniz



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

*
Kayıt Tarihi: 29.06.2014
Toplam 3 konu açtı.
Toplam 1.709 yorum yaptı.
Toplam 464 puanı bulunmakta.
Beğeniler: 13 / 108
#9
23-08-2022, 13:45
(22-08-2022, 19:24)alperalper demiş ki: strsql içine değer atanmış mı ona balacaktım. Revordset'i kontrol edebiliyorum.
bu ifadenizden anladığım recordsetteki kayıt sayısını bulabildiğiniz ama strsql içeriğinin dolu olup olmadığını bulmayı bilmediğiniz
dolayısıyla benim cevabım sadece strsql'e değer atanıp atanmadığını kontrol eder,
eğer sonuç 570 çıkmışsa strsql değişkenine değer atanmış demektir
isterseniz atadığınız değer "selam dünyalı" olsun fark etmez içerik var demektir,
içeriğin olması ifadenin yada recordsetin doğru tanımlandığı anlamına gelmiyor
ne istediğiniz daha açık bir şekilde ifade ederseniz yardımcı olmaya çalışırız



  Bul
  Alıntı
Bu mesajı beğenenler:
alperalper
Kıdemli Üye 400-1000

*
Kayıt Tarihi: 06.11.2013
Toplam 93 konu açtı.
Toplam 624 yorum yaptı.
Toplam 88 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2016, Office 2019,
Beğeniler: 0 / 31
#10
23-08-2022, 17:49
Hocam recordset'te sorun yok. Strsql eğer boş olursa strsql'in recordset olarak atamasında hata oluyor. Ben öncesinde strsql içine bakmak istiyorum. Eğer sorgu boş ise çıkış yaptıracağım. Bu kontrolü yapamadım



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

*
Kayıt Tarihi: 24.03.2013
Toplam 27 konu açtı.
Toplam 9.097 yorum yaptı.
Toplam 1.103 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2013,
Beğeniler: 57 / 240
#11
24-08-2022, 01:21
Set rst=......

if rst.RecordCount=0 then exit sub

do.....

Satirini ekleyin.
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:
alperalper
Kıdemli Üye 400-1000

*
Kayıt Tarihi: 06.11.2013
Toplam 93 konu açtı.
Toplam 624 yorum yaptı.
Toplam 88 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2016, Office 2019,
Beğeniler: 0 / 31
#12
24-08-2022, 15:21 (En son düzenleme: 24-08-2022, 18:16 alperalper.)
Arkadaşlar olmuyor. Hatayı tam işaretlediğim alanda alıyorum... Sorgunun içi boş olduğu için böyle oluyor diye tahmin ediyorum. Sorgu içi dolu iken yapmıyor. Recordset atamada sorun olmasa kontrol edeceğim ama olmuyor 


Visual Basic
  1. Dim strSQL As String
  2. strSQL = "SELECT tbl_hesap_tablosu_hizmet.id, tbl_hesap_tablosu_hizmet.donem_id, tbl_hesap_tablosu_hizmet.hizmet_ustgrup_id, tbl_hesap_tablosu_hizmet.hizmet_altgrup_id, tbl_hesap_tablosu_hizmet.hizmet_turu, tbl_hesap_tablosu_hizmet.hizmet_sinifi, tbl_hesap_tablosu_hizmet.kdv_oranı, tbl_hesap_tablosu_hizmet.hesaplanan_taahhut_tutarı, tbl_hesap_tablosu_hizmet.fiyat_farki_tutari, tbl_hesap_tablosu_hizmet.hesaplanan_tutar, tbl_hesap_tablosu_hizmet.hesaplanan_kesinti_tutari, tbl_hesap_tablosu_hizmet.hesaplanan_damga_vergisi, tbl_hesap_tablosu_hizmet.hesaplanan_kdv, tbl_hesap_tablosu_hizmet.kdv_tevkifat_orani, tbl_hesap_tablosu_hizmet.hesaplanan_kdv_tevkifati, tbl_hesap_tablosu_hizmet.hesaplanan_kdv0_hizmet, tbl_hesap_tablosu_hizmet.kesintiler"
  3. strSQL = strSQL & " FROM tbl_hesap_tablosu_hizmet"
  4. strSQL = strSQL & " WHERE (((tbl_hesap_tablosu_hizmet.donem_id)=" & donem_id & ") AND ((tbl_hesap_tablosu_hizmet.hizmet_ustgrup_id)=" & hizmet_ustgrup_id & "));"
  5.  
  6. Set db = CurrentDb
  7.  
  8. Set rst = db.OpenRecordset(strSQL, dbOpenDynaset) '......................... HATAYI TAM BU ARADA ALIYORUM.





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


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  [MAKRO] Alt Formda Filtrelemenin Iptali Ve Alt Formun Liste Olarak Görünmesi. M_Kemal_Askeri 2 172 21-04-2026, 23:57
Son Mesaj: M_Kemal_Askeri
  [FORM] Kritere Bağlı Olarak Değerlerin Toplanması M_Kemal_Askeri 2 164 10-04-2026, 01:05
Son Mesaj: M_Kemal_Askeri
  [SORGU] çarpraz Sorguda Sütun Değeri Olarak Birden çok Alan Seçebilir Miyiz? abkbek 2 440 13-08-2024, 21:18
Son Mesaj: abkbek
  [RAPOR] Access De Ki Raporu Word Belgesi Olarak Vba Kodu Ile Açma Ahmet51 10 987 01-08-2024, 10:28
Son Mesaj: dsezgin
  [FORM] Onay Kutususun şarta Bağlı Olarak Otomatik Olarak Işaretlenmesi Samih KARSLI 2 465 06-04-2024, 18:49
Son Mesaj: Samih KARSLI
  Virgülle Ayrılmış Verilerin Her Bir Değerini Yeni Kayıt Olarak Ekleme adnnfrm 5 702 28-11-2023, 01:37
Son Mesaj: dsezgin
  Formu Pdf Olarak Kaydetme snapper 8 914 01-11-2023, 22:59
Son Mesaj: dsezgin
  12 Saatlik (am-pm) Metin Olarak Girilmiş Saat Verisini 24 Saatlik Olarak Gösterme Hk. adnnfrm 2 566 05-10-2023, 03:16
Son Mesaj: adnnfrm

Foruma Git:


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