AccessTr.neT
Çapraz Sorgudan Alınan Veriler - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Çapraz Sorgudan Alınan Veriler (/konu-capraz-sorgudan-alinan-veriler.html)

Sayfalar: 1 2 3


Çapraz Sorgudan Alınan Veriler - karaayhan - 02/11/2008

örneği inceledim benim soruma cevap değil sanırım
benim istediiğim örnek ekte ve sorum şu olacak;

kişilerin memleketleri var kaytılarda ve bunlardan çaprazsorgu ekli ve çapraz sorguyu kayıt kaynağı olarak kullanan bir rapor bu rapor sütun başlıkları memleketi şeklinde ayarlı (çapraz sorguda böyle yani)

yeni bir kişi ekliyorum ve memleketi eskilerden biri değil farklı mesela samsun olsun bu kişiyi çapraz sorguya eklemesine rağmen rapora nasıl ekleriz keza bir kişiyi sildiğimizde bunu raprodan nasıl kaldırırız o sütünu yani sorum bu

kolay gelsin:huh:


Cvp: forma çapraz sorgudan alınan veriler - syrup - 02/11/2008

selam ayhan. senin istediğin türde dinamik bir rapor için sağlam uğraşmak lazım.sen bence raporuna çapraz sorguyu sürükle bırak. altrapor oluşturacak bunu kabul etme data sourceü sen yine query olarak ayarla.raporunkiini değil alt formun. ister sil ister ekle. sınırın sayfa genişliği kadar.


Cvp: forma çapraz sorgudan alınan veriler - esrefigit - 02/11/2008

çarpraz sorgu olduğu ve raporda il stunlarını yanyana istediğiniz için her seferinde create eden bir kod yazmanız gerekir.


Option Compare Database

Dim ctlLabel As Control, ctlText As Control
Dim intDataX As Integer, intDataY As Integer
Dim intLabelX As Integer, intLabelY As Integer
Dim rst As New ADODB.Recordset
Dim fld As ADODB.Field




Sub yenicontroller()

intLabelX = 100
intLabelY = 100
intDataX = 1000
intDataY = 100

rst.Open "Tablo1_Çapraz", CurrentProject.Connection, adOpenKeyset, adLockOptimistic



DoCmd.OpenReport "Rapor1", acViewDesign

For Each fld In rst.Fields


Set ctlText = CreateReportControl("Rapor1", acTextBox, , fld.Name, fld.Name, _
intDataX, intDataY)

Set ctlLabel = CreateReportControl("Rapor1", acLabel, acPageHeader, , fld.Name, intDataX, intDataY)

Next fld
DoCmd.Restore

DoCmd.OpenReport "Rapor1", acViewPreview


End Sub


Private Sub Komut10_Click()
Call yenicontroller

End Sub

create edilen denetimler raporda hizalaması ayarlanmadı koda bak işine yararsa onuda hallederiz


Cvp: forma çapraz sorgudan alınan veriler - mehmetdemiral - 02/11/2008

Bence verilerin alındığı tabloların sorgular üzerinden alınarak, bir form üzerinden filtrelenerek oluşturulması lazım. Yani çapraz sorgudan veri her alınacağında bir form üzerinden seçim yapılır, tablo yapma sorguları tabloları oluşturur ve çapraz sorgu bu oluşan tablolardan veri alır. Tabii bu işlemler için sorgu onayları kodla kapatılır. Ben bununla ilgili bir örnek daha önce yayınlamıştım. Ekleyeyim de inceleyin belki işe yarar.
NOT: Bu örnek sizin sorunuzla ilgili değil, sadece yöntemi anlatmak için ekledim. Yanlış anlayıp "Biz ne anlattık siz ne eklediniz" demeyin diye yazıyorum bunlarıImg-grin))


Cvp: forma çapraz sorgudan alınan veriler - karaayhan - 02/11/2008

sayın esrefigit ,
örneğe uyguladım kodunuzu ama çalışmadı sorun nedir bir bakarmısnıız
varsa yapacağınız değişikliği ayrıca belirtiniz lütfen

sayın demiral teşekkürler güzel örnek,

kolay gelsinImg-grin


Cvp: forma çapraz sorgudan alınan veriler - esrefigit - 02/11/2008

örneğin ekte kutuların düzenlemesini sen yaparsın