aynı alanda bilgiler yanyana olabilirmi

1 2 3
27/06/2009, 10:53

zetyu

bir kaç gündür saatlerce inceledim ama herhangi bir örnek bulamadım..

tam anlatamayabilirim diye ekte resimde açıklaması var..

tabloda tel kısmında telefon numaraları var.bu telefon numaralarını sorguda tel bir alanda aynı hücre içinde aralarında virgül yada noktalı virgul koyarak yanyana olması mumkun mü
ekte resim var
27/06/2009, 14:02

mehmetdemiral

Sayın okileturc, ben de soruya yanıt arıyordum kafamda ama sanırım farklı sütunlardaki verileri değil, bir tablonun tek sütunundaki veriler için istenmiş. Yani problem bir tablo düşünüp tel1 tel2 tel3 alanlarını yanyana yazmak olsaydı yanıtınız doğruydu. O zaman sorguda iş kolayca çzöülürdü. Ama resimde gördüğüm kadarıyla bir tablodaki tel1 alanında altalta sıralanmış olan farklı verilerin yanyana sıralanması isteniyor. Bununla ilgili bir çözüm örneği vardı elimde ama şu anda bulamadım. Nette de aradım, tatmin edici örnekler gelmedi. Toplama işlemi olsaydı sum komutuyla kolaydı ama burdaki değerler telefon numarası olduğundan, toplanmadan yanyana yazılması gerekiyor. Şu an bir çözüm gelmiyor aklıma, ama mutlaka bilen bir üstat çıkacaktır.
Ama sanıyorum hatalı bir mesaj olduğunu farketmiş ve silmiş diye düşünüyorum..
27/06/2009, 14:18

okileturc

ayniyle öyle oldu hocam, soruyu yanlış anlamışım ama atar atmaz sildim, sizin cevabınızı görsrydim bırakırdım
27/06/2009, 14:36

mehmetdemiral

Sorun değil hocam.. Anladım zaten..)
27/06/2009, 15:55

okileturc

Yaptık bir hata cezasını çekelim
Formdaki bir butona yazdım
ama sanırım isteğe göre uyarlanabilir
tablodan alınabilir vb
Kod:
Dim z  
z = Forms!TELLER!TELALT.Form.RecordsetClone.RecordCount
Forms!TELLER!TELALT.SetFocus
DoCmd.GoToRecord , , acFirst
Do While z > 0
Forms!TELLER!TOPLU = Forms!TELLER!TOPLU & Forms!TELLER!TELALT.Form![TEL_NO] & ", "
z = z - 1
DoCmd.GoToRecord , , acNext
Loop

Örnek ektedir
Kolay gelsin
27/06/2009, 16:02

mehmetdemiral

Sayın okileturc tebrikler. Çözüm sorgu için istenmiş ama sonuçta form üzerinden de olsa bir şekilde yapılabilmesi güzel. Gerisi artık gelir.
1 2 3