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

Subco

Aktif Üye
5205
 10
 47
 238
 09/04/2009
3
 Ülke Dışı
 
 Ofis 2003
 07/05/2018,15:14
Çö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.

alpeki99

alpeki99

Uzman
6
Ol....
 39
 162
 6.134
 29/10/2008
 Bursa
 Yazılım Geliştirici
 Ofis 2010 32 Bit
 22/06/2019,10:56
Çö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.

...........
Subco

Subco

Aktif Üye
5205
 10
 47
 238
 09/04/2009
3
 Ülke Dışı
 
 Ofis 2003
 07/05/2018,15:14
Çö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.

alpeki99

alpeki99

Uzman
6
Ol....
 39
 162
 6.134
 29/10/2008
 Bursa
 Yazılım Geliştirici
 Ofis 2010 32 Bit
 22/06/2019,10:56
Çö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.

...........
Nurullah_Serdar

Nurullah_Serdar

Aktif Üye
611
 37
 21
 568
 22/11/2008
189
 Giresun
 
 Ofis 2007
 09/10/2018,12:51
Çö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

Subco

Subco

Aktif Üye
5205
 10
 47
 238
 09/04/2009
3
 Ülke Dışı
 
 Ofis 2003
 07/05/2018,15:14
Çö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.

...........

Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
Çözüldü Belli Bir Karaktere Kadar Parça Alma hbal09 6 212 24/05/2019, 14:02
Son Yorum: halily
Çözüldü Ara Toplam Alma edacan19 14 356 09/05/2019, 14:37
Son Yorum: edacan19
Çözüldü Web Sitesinden Tabloya Veri Alma aliyuzen 3 378 10/04/2019, 15:43
Son Yorum: ozanakkaya
Çözüldü İşlemlerin Belirli Sayıda Veriye Uygulanması ertans 5 263 13/02/2019, 18:21
Son Yorum: ozanakkaya
Çözüldü Ms Access Excel Veri Alma Sorunu / Ms Access Import Data hakkih 13 2.109 10/01/2019, 21:40
Son Yorum: hakkih

Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2019 MyBB Group.