Konu Araçları | Seçenekler: | Gösterim Stili
Tarih
30/08/2010 13:16
Konu Sahibi
Subco
Yorumlar
9
Okunma
2386
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy

Subco

Aktif Üye
Kullanici Avatari
Aktif Üye
235
09/04/2009
3
Ülke Dışı
Ofis 2003
22/05/2017,13:08
Çözüldü 
Arkadaslar Merhaba,

asagida ki kod forumdan alinmsitir. Bu kod veri tabanindaki butun tablo ve sorgulari getirmektedir (conboya). Ben butun tablo ve sorgulari degil, belirli tablo ve sorgularin gelmesi icin bu kodda nasil degisiklikler yapabilirim. (ornegin; a, b c, d tblolari gelsin. k.l.m.n sorgulari gelsin. Digerlerini istemiyorum. kodun icine bu tablo ve sorgu isimlerini yazabilirmiyiz.

*******************************
Dim obj As AccessObject, dbs As Object
Set dbs = Application.CurrentData
Dim s As String
'Önce tablolarý al
For Each obj In dbs.AllTables
If Left(obj.Name, 4) <> "mSys" Then s = s & obj.Name & ";"
Next
'Þimdi de sorgularý
For Each obj In dbs.AllQueries
s = s & obj.Name & ";"
Next
If s <> "" Then Kaynaklar.RowSource = s
**********************************

Selamlar


İrtifâ-ı kadr için tevâzu lazım Âdem'e, Şemsi gör kim sâyesin salmış ayaklar altına. Hersekli Arif Hikmet

Subco, 09-04-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla

alpeki99

Düşünmek en zor iştir...
Kullanici Avatari
Uzman
O....
6.092
29/10/2008
Bursa
Yazılım Geliştirici
Ofis 2010 32 Bit
20/10/2017,09:01
Çözüldü 
Bir tablo yapın üç alan olsun. Birinci alan form, sorgu, rapor vs. nin adını kaydetsin. İkinci alana form, sorgu, rapor vs. türü ne ise onu yazarsınız. Üçüncü alana ise gösterilip gösterilmeyeceği ile ilgili bir Evet/Hayır alanı koyarsınız. Göstermek istediklerinizi Evet olarak işaretlersiniz.

Bir form yapın orada da tablodaki gösterilmesini Evet olarak işaretlediğiniz şeyleri gösterirsiniz.


AccessTr.Net teknik konular içeren bir sitedir. Bu tip sitelerde en iyi şekilde yardım alabilmeniz için Site Kurallarını mutlaka okumanız ve buna göre hareket etmeniz lazım.
Cevapla

Subco

Aktif Üye
Kullanici Avatari
Aktif Üye
235
09/04/2009
3
Ülke Dışı
Ofis 2003
22/05/2017,13:08
Çözüldü 
Sn.Alpteki99,
Ilginiz icin cok tesekkur ederim.
Ancak;
ben bu istediklerimi 1.mesajdaki kod un icinde yapmak istiyorum. Bu kod un icinde bir tablo veya bir sorguyu belirlemek istiyorum.

Dediginiz sekilde yaptigim zaman bu, kodun oldugu combo da nasil calistirilir ki SIZIN formunuz?

Selamlar


İrtifâ-ı kadr için tevâzu lazım Âdem'e, Şemsi gör kim sâyesin salmış ayaklar altına. Hersekli Arif Hikmet

Subco, 09-04-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla

alpeki99

Düşünmek en zor iştir...
Kullanici Avatari
Uzman
O....
6.092
29/10/2008
Bursa
Yazılım Geliştirici
Ofis 2010 32 Bit
20/10/2017,09:01
Çözüldü 
Combo'nun kaynağı olarak sorgunuz olacak değil mi? İşte o sorguda bahsetmiş olduğum tablodan bilgi çekeceksiniz. Kriter ne? Göster alanı Evet olarak işaretli olanlar.


AccessTr.Net teknik konular içeren bir sitedir. Bu tip sitelerde en iyi şekilde yardım alabilmeniz için Site Kurallarını mutlaka okumanız ve buna göre hareket etmeniz lazım.
Cevapla

Nurullah_Serdar

FaTSaLı
Kullanici Avatari
Aktif Üye
568
22/11/2008
189
Giresun
Ofis 2007
01/07/2013,13:21
Çözüldü 
istediğin tablo ve sorgularını ayırt edeceğin bir özellik yap.listelenmesini istediğin tabloların başına lst ekle lsttblanatablo gibi.
kodda da
If Left(obj.Name, 4) <> "mSys" Then s = s & obj.Name & ";"
bölümünü
If Left(obj.Name, 3) = "lst" Then s = s & obj.Name & ";"
olarak değiştir.
sorgularınıda aynı şekilde yapabilirsin.


İyiki Varsın Access Img-grin
Cevapla

Subco

Aktif Üye
Kullanici Avatari
Aktif Üye
235
09/04/2009
3
Ülke Dışı
Ofis 2003
22/05/2017,13:08
Çözüldü 
Ozur dilerim arkadaslar,

ancak bunu tam olarak anlayamadim, bir ornekle anlatabilirmisiniz.

(izahata muhtac olmam hasabiyle rahatsizlik verdigim icin kusura bakmayin lutfen)

Selamlar


İrtifâ-ı kadr için tevâzu lazım Âdem'e, Şemsi gör kim sâyesin salmış ayaklar altına. Hersekli Arif Hikmet

Subco, 09-04-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla


Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
Çözüldü Sorguda İlk 9 Karakter Alma blumanx 2 168 27/09/2017, 23:22 blumanx
Çözüldü Satın Alma Takip Te Yöneticilere Onaylatma mahsumyavuz 2 163 24/08/2017, 12:15 mahsumyavuz
Çözüldü Belirli Kayıtları Arşivleme conquerora 6 414 17/08/2017, 03:44 ozanakkaya
Çözüldü Web Browserdeki Checkbox Değerini Alma idrisy 4 250 31/07/2017, 23:33 ozanakkaya
Çözüldü Açılır Kutudaki Değeri Alma Sorunu derzulya 5 247 11/07/2017, 16:08 derzulya

Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2017 MyBB Group.
Forum use Krzysztof "Supryk" Supryczynski addons.