Forum
Aktif konular
Üyeler
Kurallar
Arama
Asp De Harfle Sayfalama Asp De Harfle Sayfalama
-
merhaba değerli müridlerim
Asp'de Veritabanındaki Adların sayfada harflere göre sıralamak için ne yapabilirim ? sizden ricam örnek bekliyorum değerli müridlerim
şöle ABCDE gibi url harfler olucak harfe tıklanınca o harfle başlayan tüm adlar sayfada listelenecek
Teşekkürler
-
harfimiz=request.querystring("Harf")
Set sirala = Connect.Execute("select * from uyeler where Left(kadi,1) like '%" & harfimiz &"%' and onay=1 order by kadi Asc")
-
yaptım ama sanırsam tek biyerde sorunum var çözemedim
<%
DbYol = Server.MapPath("db\hemseriler.mdb")
Set cbn = Server.CreateObject("Adodb.Connection")
cbn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="& DbYol &";"harfimiz=request.querystring("Harf")
Set sirala = Connect.Execute("select * from tbhemseri where Left(stadisoyadi,1) like '%" & harfimiz &"%' and onay=1 order by stadisoyadikadi Asc")
if not sirala.eof then
do while not sirala.eof
Response.Write(""&sirala("stadisoyadi")&"<br/>")
sirala.movenext
loop
end if
set sirala=nothing
%> -
link.asp?Harf=A
<%
DbYol = Server.MapPath("db\hemseriler.mdb")
Set baglanti = Server.CreateObject("ADODB.Connection")
baglanti.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("" & DbYol & "")
harfimiz=request.querystring("Harf")Set sirala = baglanti.Execute("select * from tbhemseri where Left(stadisoyadi,1) like '%" & harfimiz &"%' and onay=1 order by stadisoyadikadi Asc")
do while not sirala.eof
Response.Write sirala("stadisoyadi")&"<br> /"
loop%>
-
aktas_967 bunu yazdı:
-----------------------------
yaptım ama sanırsam tek biyerde sorunum var çözemedim
-----------------------------
Tek bir yer dediğin yer neres? Yukarıda arkadaş sana örnek olsun diye vermiş birşeyler ama senin tablonda onay diye bir alanın yoksa sil o kısmı sadece bu şekilde olsun sorgun;
Connect.Execute("select * from tbhemseri where Left(stadisoyadi,1) = '%" & harfimiz &"%'")
-
Müdür Hata aldım neyapabilirim
<a href="as.asp?Harf=A"></a>
<%Set baglanti = Server.CreateObject("ADODB.Connection")
baglanti.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("db\hemseriler.mdb")
harfimiz=request.querystring("Harf")Set sirala = baglanti.Execute("select * from tbhemseri where Left(stadisoyadi,1) like '%" & harfimiz &"%' and onay=1 order by stadisoyadikadi Asc")
do while not sirala.eof
Response.Write sirala("stadisoyadi")&"<br>"
loop%>
Hata Tipi:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E10)
[Microsoft][ODBC Microsoft Access Sürücüsü] Çok az parametre. 1 bekleniyor.
/cankiri/as.asp, line 8 -
-
<a href="as.asp?Harf=A"></a>
<%Set baglanti = Server.CreateObject("ADODB.Connection")
baglanti.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("db\hemseriler.mdb")
harfimiz=request.querystring("Harf")Set sirala = baglanti.Execute("select * from tbhemseri where Left(stadisoyadi,1) like '%" & harfimiz &"%'")
do while not sirala.eof
Response.Write sirala("stadisoyadi")&"<br>"
loop%>
-
z.defteri olacaksa dikkat et, sql yersin !!
-
zumsuk bunu yazdı:
-----------------------------
z.defteri olacaksa dikkat et, sql yersin !!
-----------------------------
sadece zdefteri değil bunu nerde kullanırsa kullansın yer bi filtreden geçirmesi gerekio -
Aslan müridim helal sana yanlız döngüye girerken kasıyor açmıyor dögüyü kaldırınca çalışıyor döngülerde bir problemmi var do while not not = olumsuz demek değilmiydi
Kısayol
Şikayet
Özel Mesaj
Alıntı yap
Cevapla