implant


  Aktif KonularAktif Konular  Forum Üyelerini GösterÜye Listesi  Forumu AraArama  YardımYardım
  Kayıt OlKayıt Ol  GirişGiriş
ASP / ASP.NET
 ASPTurkiye.com Forum : ASP / ASP.NET
Konu Konu: Sayfalama Yanıt YazYeni Konu Gönder
An error occurred on the server when processing the URL. Please contact the system administrator.

If you are the system administrator please click here to find out more about this error.

Yazanlarda
Mesaj << Önceki Konu | Sonraki Konu >>
YEŞİL AŞKI
Yeni Üye
Yeni Üye


Kayıt Tarihi: 26-Haziran-2006
Gönderilenler: 5
Gönderen: 26-Haziran-2006 Saat 20:14 | Kayıtlı IP Alıntı YEŞİL AŞKI

<%
Set conn = Server.CreateObject("ADODB.Connection" )
conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("db.mdb" )

haber = Request.QueryString("haber" )

Set objRS = Server.CreateObject("ADODB.Recordset" )
sql = "select * from isimler where haber like '%" & haber & "%' order by haber"
objRS.Open sql,conn,1,3

sonucsayisi = objRS.RecordCount
If haber="" Then
response.write "<font color=#000000 size=2 face=Tahoma>"
response.write "<br>Lütfen Bir Değer Giriniz.</br><br> <INPUT TYPE=" "button" " VALUE=" " << Geri " " onClick=" "history.go(-1)" ">"
response.write "
</font>"
response.End
End If

If objRS.Eof Then
response.write "<font color=#000000 size=2 face=Tahoma>"
response.write "<br>Hiç Kayıt Bulunamadı.</br><br> <INPUT TYPE=" "button" " VALUE=" " << Geri " " onClick=" "history.go(-1)" ">"
response.write "
</font>"
response.End
Else
response.write "<font face=Tahoma size=2 color=#000000>Bulunan Sonuçlar</font><br><br>"
response.write "<table border=0 cellpadding=0 cellspacing=0 width=525>"
response.write "<tr>"
response.write "<td align=center width=90>"
response.write "<font color=#000000 size=2 face=Tahoma><strong>"
response.write "Tarih"
response.write "</strong></font></td><td align=center width=120>"
response.write "<font color=#000000 size=2 face=Tahoma>"
response.write "Başlık"
response.write "
</font></td>"
response.write "<td align=center width=335>"
response.write "<font color=#000000 size=2 face=Tahoma><strong>"
response.write "Özet"
response.write "</strong></font></td>"
response.write "</tr><tr><td colspan=4 align=center><img src=../images/cizik.gif></td></tr>"
Do While not objRS.Eof
response.write "<tr><td width=90 valign=top align=center>"
response.write "<font color=#000000 size=2 face=Tahoma>"
response.write objRS("tarih" )
response.write "</font>"
response.write "</td><td align=center width=120 valign=top>"
response.write "<font color=steelblue size=1 face=Tahoma><strong>"
response.write objRS("baslik" )
response.write "</strong></font></td>"
response.write "<td align=justify width=335 valign=top>"
response.write "<a href= "
response.write objRS("link" )
response.write ">"
response.write objRS("ozet" )
response.write "<font color=#000000 size=2 face=Tahoma></a></font>"
response.write "</td>"
response.write "</tr><tr><td colspan=4 align=center><img src=../images/cizik.gif></td></tr>"
objRS.Movenext
Loop
End If
response.write "</table>"
%>

burada arama sonuçları tek sayfada gözüküyor.bunu 10 tane sonuçtan sonra diğer sonuçları 2 diye bir buton yapıp diğer 2 ye basarak sonuçların devamına bakmalarını nasıl sağlayabilirim.Acemiyim asp ye yeni başladım.
Yukarı Dön Göster YEŞİL AŞKI's Özellikler Diğer Mesajlarını Ara: YEŞİL AŞKI