çok işe yarayacak uygulama, birde sorgular eklense yemede yanında yat.
komut 43 click olayının sonuna
Kod:
For i = 0 To dbs3.QueryDefs.Count - 1
Me.liste.AddItem (dbs3.QueryDefs(i).Name)
Next i
bu kodu eklediğinizde sorgularıda listeleyecektir. benim uygulamamda sorgu olmadığı için eklememiştim.
kolay gelsin.
sn.Nurullah
incelemeden teşekkür etmiştim
ama gerçekten güzel hazırlanmış bir çalışma imiş ellerinize sağlık
hayal gücümüzü genişletiyorsunuz
emeğinize sağlık çok güzel bir çalışma
sorguları seçince hata veriyor.
bende denedim. hata vermiyor. hata veren durumu veya yeri söylermisiniz?
birde dikkatimi çeken birşey. evet/hayır türü olan alanlarda filtre uygularken ölçüt olarak "Yes" veya "no" olarak değer belirleyin.
Sayın Nurullah_Serdar hocam,
acaba sorgularda ölçüt olunca mı göstermiyor. Normal ölçüt olmayan sorguyu açıyor fakat ölçüt varsa seçince direk hata çıkıyor. Debug da "Set rstliste = dbs3.OpenRecordset("Select * from " & Me.liste)" burayı gösteriyor.
teşekkür ederim.