AccessTr.neT

Tam Versiyon: Alt Alta Düzenle
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
Sayfalar: 1 2 3
nasıl kullanacağınızı bilmiyorum ama eğer isimlendirme sistemi ulke_Sayı biçimindeyse sorgu for döngüsüyle dinamik olarak da oluşturulabilir
1 - referanslardan microsoft activex Data Object xx.x library eklenmeli
2 - aşağıdaki kod bir butona atanmalı
debug.print komutu immidiate ekranına yazar
Dim Sql As String
Dim ADO_RS As ADODB.Recordset
Dim Fld As ADODB.Field

Set ADO_RS = New ADODB.Recordset
SQL = "select * from [Ülke_Düzenle]"
ADO_RS.Open SQL, CurrentProject.Connection, 3, 1
For Each Fld In ADO_RS.Fields
If Left(Fld.Name, 5) = "Ülke_" Then
SqlUnion = SqlUnion & " union " & _
" SELECT Ülke_Düzenle.sayı, Ülke_Düzenle.Otel_Adı, Ülke_Düzenle." & Fld.Name & " As [Ülke], Ülke_Düzenle.tutar " & _
" FROM Ülke_Düzenle " & _
" WHERE ((Not (Ülke_Düzenle." & Fld.Name & ") Is Null))"
End If
Next
Debug.Print Mid(SqlUnion, 7) & ";"
Sayın. Berduş Hocam
Değerli Zamanınızı Bizlere Ayırdığınız İçin Çok Teşekkür Ederim Elinize Emeğinize Bilginize Sağlık Çok Teşekkür Ederim Zahmetler Verdirdim Size Sağolun ama yapamadım Sağolun.
açıkçası tam olarak ne istediğiniz yapıyı anlamadım
tabloların yapısının değiştirilmesi çok rastlanan bir durum değildir o nedenle tekrar sorayım tablo yapınız değişecek mi
yani diyelim bir gün tablonuzda 10 alan olacak başka bir gün 4 alan 1 ay sonra 7 alan mı olacak
Sayın berduş hocam
Evet sabit sütun ekleme olmayacak
Ozaman birlestirme sorgusuna neden karşısınız her zaman dogru bir sekilde listeyi gosterir
Sorguyu baska sorgu icinde kullanarak istediginiz yerde kullanabilirsiniz
Sayın. Berduş hocam

Aslında evet dediğiniz doğru haklısınız peki sütun ismi degistirdigim de tablodan
Birleştirme sorgusunda hata verir mi. Birde hocam şimdi ben size evet sütun sayıları şuan sabit dedim peki ekstradan bir ülke sütünü açmak istersem birleştirme sorgusuna bunu ekleye bilirmiyim

Teşekkürler
Sayfalar: 1 2 3