<% 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 %>