Şub
20Başlıkları listelettiğiniz bilgilerin devamını nasıl gösterileceği hep merak konusu olmuştur. Bu yazımızda çok merak edilen bir konuyu işleyeceğiz.
Liste.asp ve ListeDetay.asp adında iki asp belgemiz olsun.
Liste.asp'de bütün haber'lerin başlıklarını listeletelim.
Ve başlığa tıklayınca ListeDetay.asp'de haberin kendisi gösterilsin. Liste.asp'de Liste.asp'ye haberin id'si ile birlikte link vereceğiz. Örneğin ListeDetay.asp?haberid=5 gibi. Ve bu id'yi ListeDetay.asp'de çekeceğiz. Bir sql cümlesi ile bu id'ye denk gelen haber'i göstereceğiz.
Veritabani.mdb adında veritabanı, içinde haberler adında tablo oluşturun.
(id otomatik sayı, baslik text, haber not)
Liste.Asp için kodlarımızın şöyle olduğunu düşünelim;
Set baglanti=server.createobject("adodb.connection")
yol=server.mappath("veritabani.mdb")
baglanti.open "Provider=microsoft.jet.oledb.4.0; data source=" & yol
Set Rs=baglanti.execute("select * from haberler")
While not Rs.EOF
With Response
.write "<a href='ListeDetay.asp?haber_id="&Rs("id")&"'>"
.write Rs("baslik")
.write "</a>"
End With
Rs.Movenext
Wend
Rs.Close:baglanti.close
%>
ListeDetay.Asp ise aşağıdaki gibi olmalıdır.;
Set baglanti=server.createobject("adodb.connection")
yol=server.mappath("veritabani.mdb")
baglanti.open "Provider=microsoft.jet.oledb.4.0; data source=" & yol
haber_id=request.querystring("haber_id")
Set Rs = baglanti.execute("select * from haberler where id="&haber_id&"")
Response.write Rs("haber")
rs.close
%>
Liste.Asp'de kayıtlarımızı listeletirken With deyimini kullandık.
With deyimi hakkında bilgi almak için aşağıdaki yazıyı okuyabilirsiniz.
http://www.aspogren.net/kaynak-oku/36/with-kullanimi.html
Bol ASP'li günler

11 yorum var
#127.-tufankırac-05 Nisan 2007 Perşembe
hocams ListeDetay.asp de id="&haberid&"") güzelde ikinci tırnak işareti biraz anlamsız durmuyor mu? onun yerine ')' yazsak daha i olur bence yoksa ben mi yanılıyorum?....
#128.-SrcnCkr-05 Nisan 2007 Perşembe
Yazılan işlem doğru, bir işlemi bir kaç yoldan da yapabilirsin denemen gerek.
#136.-Oksiyus-08 Nisan 2007 Pazar
Hata Tipi:
Microsoft VBScript derleme hatası (0x800A03EE)
')' gerekli
/aspdersleri/ListeDetay.asp, line 7, column 61
Set Rs = baglanti.execute(" select * from haberler where id="&haber_id&"
Bu Hatayi Veriyor..
#137.-fatiherikli-08 Nisan 2007 Pazar
o satırı
Set Rs = baglanti.execute(" select * from haberler where id="&haber_id)
yada
Set Rs = baglanti.execute(" select * from haberler where id="&haber_id&"")
yap, sorun düzelir.
#138.-Oksiyus-08 Nisan 2007 Pazar
<%
Set baglanti=server.createobject("adodb.connection")
yol=server.mappath("veritabani.mdb")
baglanti.open "Provider=microsoft.jet.oledb.4.0; data source=" &yol& ""
id=request.querystring("id")
Set Rs = server.createobject("ADODB.RecordSet")
Set Rs = baglanti.execute(" select * from haberler where id="&haber_id&"")
rs.open SQL,baglanti,1,3
%>
şu Sekil Yaptı Yine Aynı.. 
#140.-fatiherikli-08 Nisan 2007 Pazar
Set Rs = server.createobject("ADODB.RecordSet")
Bu satırı kaldır. İki tane aynı bağlantı ismi olmaz.
#142.-oksiyus-09 Nisan 2007 Pazartesi
Öylede Denedim Yine Aynı
#186.-The scorpion-12 Mayıs 2007 Cumartesi
script calısmıyor . bi bakarsanız sevirim .
#292.-serdar-21 Temmuz 2007 Cumartesi
bu kod çalışmıyor
Set Rs = baglanti.execute(" select * from haberler where id="&haber_id&"")
------------------------------------------------------------^
#295.-meriç-22 Temmuz 2007 Pazar
selam,
Dosya listeleme hakkında;
Sunucudaki bir klasörün içindeki txt uzantılı dosyaları listelemek istiyorum. Bunu nasıl yapabilirim. sunucumda mektup adında bir klasorum var ve içinde txt uzantılı bir suru dosya var. Bu dosyalardan birinin içerigini görüntülemek için dosya adını giriyorum. Bana mektup isimli klasorun içinde bulunan txt uzantılı dosyaları listeleyebilecek bir yöntem önerebilirmisiniz.
Teşekürler,
#297.-Cem Sevinç-23 Temmuz 2007 Pazartesi
id demissin haber id demissin stringleri doqru acmamissin
dogrula kardes..
