YAZARIN TÜM YAZILARI
<% '------------- veri tabanına bağlanıyorum Set Connect = Server.CreateObject("ADODB.Connection") Connect.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("hspntl/yorumcu.mdb") %> <% id= Request("id") Set kset = Server.CreateObject ("ADODB.RecordSet") Sql = "Select * from tbl_akinOzcer_tr where id = " &id& "" kset.Open Sql,Connect,1,3 %>
 


<%= kset("tarih") %>
 
  <%= kset("manset") %> <%= kset("icerik") %>