Soru Sql Sorgu Sıralama Kod Hatası

toprak2349

Altın Üye
Katılım
10 Ocak 2017
Mesajlar
39
Excel Vers. ve Dili
2013 Türkçe
Vba ile sql sorgu yaparken sorgunun içine sıralama kodunu nasıl ekleyebilirim ?
Mevcut sorgum:
Kod:
If Me.OptionButton23 = True Then txtOlcut = txtOlcut & " and asfalt='Var'"


If Me.OptionButton24 = True Then txtOlcut = txtOlcut & " and asfalt='Yok'"


txtOlcut = Mid(txtOlcut, 5)


rs.Open "select * from envanter order by nufus ", baglan, adOpenKeyset, adLockPessimistic


rs2.Open "select * from envanter where " & txtOlcut  order by nufus ", baglan, adOpenKeyset, adLockPessimistic
Bu sorguda rs.open çalışıyor.
Ama rs2.open sorgusu çalışmıyor. Rs2 sorgusunda order by nufus syntax ının muhtemelen yanlış yazıyorum, doğrusunu nasıl yazabilirim ?
Yani sorguda hem txtOlcut kriterlerine göre sorgu yapsın ve bunu nufus a göre sıralasın !
yardımcı olabilir misiniz?
 

Mehmet Şahin

Destek Ekibi
Destek Ekibi
Katılım
13 Ekim 2005
Mesajlar
1,326
Excel Vers. ve Dili
Excel 2010 - 2013 Türkçe - İngilizce
Kod:
" asfalt='Yok'"
şeklinde dener misiniz, yani "and" silinmeli.
 

toprak2349

Altın Üye
Katılım
10 Ocak 2017
Mesajlar
39
Excel Vers. ve Dili
2013 Türkçe
Kod:
" asfalt='Yok'"
şeklinde dener misiniz, yani "and" silinmeli.
Hocam "and" silinmesi için txtOlcut = Mid(txtOlcut, 5) kodunu kullanıyorum. hata order by nufus kısmında hata veriyor. Yani ben order by nufus syntax ını yanlış mı yazıyorum acaba bulamadım ? ' veya " hatası mı var anlayamadım !
Kod:
rs2.Open "select * from envanter where " & txtOlcut  order by nufus ", baglan, adOpenKeyset, adLockPessimistic
 

Erdem_34

Destek Ekibi
Destek Ekibi
Katılım
4 Mayıs 2007
Mesajlar
3,173
Excel Vers. ve Dili
OFİS 2013 TÜRKÇE-İNG. 64 BİT
Aşağıdaki gibi deneyebilir misiniz.

Kod:
"select * from envanter where " & txtOlcut & " order by nufus"
 

Mehmet Şahin

Destek Ekibi
Destek Ekibi
Katılım
13 Ekim 2005
Mesajlar
1,326
Excel Vers. ve Dili
Excel 2010 - 2013 Türkçe - İngilizce
:) Dikkatsizlik, acelecilik ve doğru okumama her sorunun başıdır.
 
Üst