ÇATI-DER

<% IP = Request.ServerVariables("REMOTE_ADDR") sene = cint(Request.Querystring("sene")) ay = Request.Querystring("ay") If cint(ay) > 12 or len(ay) =0 Then ay = month(date) End If ay = cint(ay) If len(Request.Querystring("sene")) =0 Then sene = year(date) End If aay = ay %> <% Set Bag = Server.CreateObject("ADODB.Connection") Bag.Open bag_dize %> <% sub deger(bugun_kac, bugun_kacall, buay_kac, buay_kacall, busene_kac, busene_kacall, toplam_kac, toplam_kacall, ort_kac, ort_kacall, baslama_tarihi) '*** İSTENİLDİĞİNDE DIŞARI YANSITILABİLİR DEĞERLERİN ÜRETİMİ Set gun_q = Server.CreateObject("ADODB.Recordset") Set darbeall_q = Server.CreateObject("ADODB.Recordset") Set ay_q = Server.CreateObject("ADODB.Recordset") Set ayall_q = Server.CreateObject("ADODB.Recordset") Set sene_q = Server.CreateObject("ADODB.Recordset") Set seneall_q = Server.CreateObject("ADODB.Recordset") Set top_q = Server.CreateObject("ADODB.Recordset") Set topall_q = Server.CreateObject("ADODB.Recordset") Set ort_q = Server.CreateObject("ADODB.Recordset") Set ortall_q = Server.CreateObject("ADODB.Recordset") set baslama = bag.execute ("select * from darbeler order by gun_id") gun_sql = "select sum(darbe) as qdarbe from darbeler where gun = " & bugun & " and ay=" & buay& " and sene=" & busene ay_sql = "select sum(darbe) as qdarbe from darbeler where ay = " & buay & " and sene=" & busene ayall_sql = "select sum(darbeall) as qdarbeall from darbeler where ay = " & buay & " and sene=" & busene sene_sql = "select sum(darbe) as qdarbe from darbeler where sene = " & busene seneall_sql = "select sum(darbeall) as qdarbeall from darbeler where sene = " & busene darbeall_sql = "select sum(darbeall) as qdarbeall from darbeler where gun = " & bugun & " and ay=" & buay& " and sene=" & busene top_sql = "select sum(darbe) as qdarbe from darbeler " topall_sql = "select sum(darbeall) as qdarbeall from darbeler " ort_sql = "select avg(darbe) as qdarbe from darbeler " ortall_sql = "select avg(darbeall) as qdarbeall from darbeler " If not baslama.eof Then gun_q.open gun_sql, bag, 1, 3 darbeall_q.open darbeall_sql, bag, 1, 3 ay_q.open ay_sql, bag, 1, 3 ayall_q.open ayall_sql, bag, 1, 3 sene_q.open sene_sql, bag, 1, 3 seneall_q.open seneall_sql, bag, 1, 3 top_q.open top_sql, bag, 1, 3 topall_q.open topall_sql, bag, 1, 3 ort_q.open ort_sql, bag, 1, 3 ortall_q.open ortall_sql, bag, 1, 3 ' burada sayfada kullanılabilecek değişkenlere değerler atanıyor bugun_kac = gun_q("qdarbe") bugun_kacall = darbeall_q("qdarbeall") buay_kac = ay_q("qdarbe") buay_kacall = ayall_q("qdarbeall") busene_kac = sene_q("qdarbe") busene_kacall = seneall_q("qdarbeall") toplam_kac = top_q("qdarbe") toplam_kacall = topall_q("qdarbeall") ort_kac = round(ort_q("qdarbe")) ort_kacall = round(ortall_q("qdarbeall")) baslama_tarihi = baslama("gun") & " "& aytespit(baslama("ay")) &" " & baslama("sene") gun_q.Close darbeall_q.Close ay_q.Close ayall_q.Close sene_q.Close seneall_q.Close top_q.Close topall_q.Close ort_q.Close ortall_q.Close baslama.Close End If Set ort_q = Nothing Set ortall_q = Nothing Set top_q = Nothing Set topall_q = Nothing Set sene_q = Nothing Set seneall_q = Nothing Set ayall_q = Nothing Set ay_q = Nothing Set gun_q = Nothing Set darbeall_q = Nothing Set baslama = Nothing end sub %><% function sifir(unsur) %><% If isnull(unsur) Then unsur="0" End If sifir=unsur %><% end function %><% Bag.Close Set Bag = Nothing %> ÇATI-DER

Misyonumuz; Milli ve manevi değerlere bağlı gençliğin topluma kazandırılması... İlkelerimiz; Önemsemek, Benimsemek, Planlamak, Sosyal ilişkilere önem vermek, hizmet taraftarları olmak, bütün imkanları seferber ederek fedakarca çalışmak, Hedeflerimiz; hakkı daima üstün tutan, insan hak ve özgürlüklerini savunan, istikamet sahibi, istişarenin önemini bilen ve uygulayan, sorumluluklarının bilincinde, istikrarlı, izzet sahibi, ülkemizin geleceklerini iyi bilen, bilgili, çalışkan, inançlı, insanımızı seven bir nesil yetiştirmek en büyük hedefimiz ve zorunluluğumuzdur.

Eğitim Programlarımız:

Derneğimiz bünyesinde Eğitim Programlarımız her Çarşamba günü saat : 20:30’ da Hayat Dersleri ile her hafta farklı bir konuda katılımcılarımıza bilgiler verilmekte ve karşılıklı soru cevaplarla... yazının devamı >>

Konferanslarımız:

Çatı-Der her ayın son Cuma gününü genellikle aylık konferanslarına ayırmaktadır. Toplumu ilgilendiren, duyarsız kalınamayacak konularda düzenlenen bu konferanslara alanının uzman isimler, eğitimci ve yazarlar davet edilmektedir

Doğa ve Tarih Gezileri:

Dört bir yanı tarih ve doğa güzellikleriyle dolu Türkiye’ mizin bu güzelliklerini görmek tarihe şahitlik etmiş mekanlarda o günlere yeniden yad etmek amacıyla yılın belirli dönemlerinde öğrencilerimiz ve üyelerimiz için gezi programları düzenlemiştir.. Ankara, Bursa, Konya, Nevşehir illeri bunlardan bazıları.

Çatı-Der'de Yeni Yönetim

Ana gayesi evrensel değerler peşinde koşarak insanlığa hizmet etmek olan Ve ‘’Binlerce Yıl Sürecek bir yürüyüş tek bir adımla başlar’’ düsturundan ilham alarak yaklaşık iki yıldır faaliyetini sürdüren ÇATI-DER’ de nöbet değişikliği yapıldı. Yazının Devamı>>

Çatı-Der Duyurular:

SİTE İSTATİSTİĞİ

Site Yayın Başlangıç Tarihi

17 Mayıs 2008 / Cumartesi

Hayat, aşığa göre uzun ince bir yol, dünya ise iki kapılı bir han. Her halükarda ezelden ebede uzanan bir yolculuk sürecindeyiz.Bu kısacık süreç; yaptıklarımızın ve yapmadıklarımızın hesabının görüleceği zaman dilimidir. Kendimiz için yapacaklarımızın... Yazının Devamı >>

Toplumsal dayanışmamızı geliştirici faaliyetlerimiz içerisinde yer alan sosyal amaçlı faaliyetlerimiz içerisinde İftar yemekleri, fakir ve ihtiyaç sahibi aile ve bireylere yönelik yardım çalışmaları, öğrencilere yönelik burs ve yardımlar, hastane ziyaretleri, başsağlığı ziyaretleri, yeni evlenen çiftler için ev ziyaretleri yer tüm hızıyla devam ediyor.

ÇATI-DER’ in temel kuruluş gayeleri arasında yer alan çevre ve doğaya yönelik çalışmalar yapmak için Derneğimiz yoğun bir gayret göstermeye devam ediyor. Ağaç dikimi ve hatıra ormanı çalışmalarında, çevre gezileri, doğayı koruma konusunda bilimsel çalışmaları yürütmekte kararlı olan derneğimiz hizmet yazışında sırayı kaptırmıyor.

Çatı - Der Gelişim Programları ile toplumun temel direği aile ve birey eğitimine de önem vermektedir.Aile içi iletişim seminerleri Anne-Baba eğitimi seminerleri, Şahsiyet gelişimi ve Kişisel Gelişim seminerleriyle Aile ve birey gelişimine katkı sağlamaktadır.Yarınlarımızın geleceği çocuklarımız hem eğleniyor hem eğitiliyorlar.

ÇATI-DER ÇEVRE, EĞİTİM KÜLTÜR, YARDIMLAŞMA DERNEĞİ

Bu site en iyi 1024x768 Çözünürlükte izlenir.Tüm hakları Çatı-Der'e aittir. Gizlilik İlkelerimiz İçin Tıklayınız

Web Editörü: Hüseyin ÖZTÜRK