<% DB_CONNECTIONSTRING = "Provider=Microsoft.JET.OLEDB.4.0; Data Source=" & Server.Mappath("admin/db/yonetim.mdb") & ";" DB_USERNAME = "" DB_PASSWORD = "" Set baglanti=server.createobject("ADODB.Connection") baglanti.open DB_CONNECTIONSTRING, DB_USERNAME, DB_PASSWORD %> <% Function Tarih(sGelen) Tarih="" sGelen = Replace(sGelen, "." , "/") Tarih=sGelen End Function %>

	<% sql="SELECT * FROM HABERLER ORDER BY TARIH DESC" set rs2=baglanti.execute(sql) %> <% while not rs2.eof%> "><%=rs2("BASLIK")%> <%=rs2("KISA_METIN")%> <%rs2.movenext wend rs2.close set rs2=nothing baglanti.close set baglanti=nothing %>
Anasayfa  Kurumsal  Faaliyet Alanlarımız  Referanslarımız  Araç Parkı   İletişim