haydi-1905

Yeni sayfanın başlığı

<% Set baglanti = Server.CreateObject("ADODB.Connection") baglanti.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("veritabanı.mdb") Function Temizle(strInput) strInput = Replace(strInput,"&", "&", 1, -1, 1) strInput = Replace(strInput,"'", "'", 1, -1, 1) strInput = Replace(strInput,"""", "", 1, -1, 1) strInput = Replace(strInput, ">", ">", 1, -1, 1) strInput = Replace(strInput,"<","<", 1, -1, 1) Temizle = strInput End Function Set rs = Server.CreateObject("ADODB.Recordset") SQL = "Select * from tablo" rs.Open SQL,baglanti,1,3 %> 7-Emlak Danışmanlık http://www.7emlak.com/ 7emlak tr 7 Emlak Antalya Alanya 7-Emlak Danışmanlık http://www.7emlak.com/7emlak-real-estate-immobilien.jpg http://www.7emlak.com 200 73 <% i = 0 Do While i =< 19 And Not rs.Eof %> <%=rs("kategori")%> <%=Temizle(rs("detaylar"))%> http://www.7emlak.com/ <% i = i + 1 rs.MoveNext Loop rs.Close %>

Design by Taha

Ölümüne Galatasaray

Menü

Saat

Duyuru

Bilgi

haydi-1905

Yeni sayfanın başlığı

Menü

Takvim

Haftanın Resmi

Duyuru