http://www.alnumel.com/-%20Buttons_dosyalar/vs01.png
Lütfen Bekleyiniz...
Sayfamız Yükleniyor...

   
  OyUnSoOn.TR.gg
  Ana Sayfa
 

 

Web sitemiz hakkında ne düşündüğünüzü bilmek isteriz. Lütfen görüşlerinizi ortak konuk defterine yazın; böylece düşüncelerinizi diğer ziyaretçilerle paylaşabiliriz.

Açıklamalarınızı Ekleyin



Açıklamalarınızı gönderdikten sonra, kütüğe eklediklerinizi görmek için bu sayfayı tarayıcınızla yeniden yüklemeniz gerekir.

 
  
  Bugün 2 ziyaretçi (3 klik) kişi burdaydı! hit counters  
 
Konular bölümünde kodların anlamını yazdım.Önce orayı okumanızı tavsiye ederim. db.mdb adında bir veritabanımız olsun ve içinde isimler adında bir tablo olsun.ısimler tablosunun içindede ID(AutoNumber) ve isim(text) adlarında 2 tane alanımız olsun. isimler adı altında frost ve lancelot gibi 2 tane isim olsun.şimdi form.html sayfamızı yapalım ki burdan aramak istediğimiz isimi yazacağız. form.asp ------------------------------------------------------------- Form
------------------------------------------------------------- evet formumuz tamam siz bu sayfadan giriş yapacaksınız ve bir isim yazacaksınız. buda arabul.asp olsun ------------------------------------------------------------- <% Set conn = Server.CreateObject("ADODB.Connection") conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("db.mdb") isim = request.querystring("isim") set objRS = Server.CreateObject("ADODB.Recordset") sql = "select * from isimler where isim like '%" & isim & "%' " objRS.open sql,conn,1,3 if objRS.eof then response.write "Hiç kayıt bulunamadı." response.end else do while not objRS.eof response.write "Bulunan Sonuçlar" response.write "
" response.write objRS("isim") objRS.movenext loop end if %> Bu web sitesi ücretsiz olarak Bedava-Sitem.com ile oluşturulmuştur. Siz de kendi web sitenizi kurmak ister misiniz?
Ücretsiz kaydol