• 24-12-2009, 21:57:27
    #1
    arkadaşlar merhaba eskiden yorumları gayet güzel gösteriyordum bir sorun yok takır takır çalışıyordu ama ben idsiz bir şekilde sef linkler yaptım bu sefer hangi konuya tıklarsam tıklayayım aynı şekil büütn yorumlar listeneliyor.. sef link yapmadan önce ID'ye göre aliyordum bu şekil

    <%
    Set yor= Server.CreateObject("ADODB.Recordset")
    sor3 = "Select * from yorum where onay=1  and yaziID=" & id & ""
    yor.Open sor3,db,1,3
    %>
    Ama şimdi yorumları listeyemiyorum hangi yazıya tıklarsam tıklayayım yine bütün yorumlar geliyor..
    oku.asp'nin kodları burada bir el atarsanız sevinirim

    <head>
    <meta http-equiv="Content-Language" content="tr">
    </head>
    
    <%
    Set db = Server.CreateObject("Adodb.Connection")
    db.open"Provider=Microsoft.jet.oledb.4.0;data source=" & Server.MapPath("db.mdb")
    %>
    
    <table border="1" width="19%" id="table1">
    	<%
    	set tablo = Server.CreateObject("ADODB.Recordset")
    	sql="select * from seo where seo='"& link &"'"
    	tablo.open sql,db,1,3
    	do while not tablo.eof
    	%>
    		   <tr>
    		<td><%=tablo("detay")%></td>
    	</tr>
    	<%
    	tablo.movenext
    	loop
    	%>
    	
    </table>
    <p>&nbsp;</p>
    
    <%
    Set Comment = Server.CreateObject("ADODB.Recordset")
    sor3 = "Select * from yorum where onay=1 order by id desc"
    Comment.Open sor3,db,1,3
    %>	
    <table border="1" width="19%" id="table2">
    	<tr>
    		<td>Yorumlar</td>
    	</tr>
    	<% do while not comment.eof%>
    	<tr>
    		<td><%=comment("Yazan")%></td>
    	</tr>
    	<%
    	comment.movenext
    	loop
    	%>
    </table>
    teşekkür ederim şimdiden
  • 24-12-2009, 22:02:10
    #2
    sayfa düzeni tahmin ettiğin gibiyse şu vericeğim şekilde olması lazım.
    <head>
    <meta http-equiv="Content-Language" content="tr">
    </head>
    
    <%
    Set db = Server.CreateObject("Adodb.Connection")
    db.open"Provider=Microsoft.jet.oledb.4.0;data source=" & Server.MapPath("db.mdb")
    %>
    
    <table border="1" width="19%" id="table1">
    	<%
    	set tablo = Server.CreateObject("ADODB.Recordset")
    	sql="select * from seo where seo='"& link &"'"
    	tablo.open sql,db,1,3
    	do while not tablo.eof
    	yorumid=tablo("id") %>
    		   <tr>
    		<td><%=tablo("detay")%></td>
    	</tr>
    	<%
    	tablo.movenext
    	loop
    
    	%>
    	
    </table>
    <p>&nbsp;</p>
    
    <%
    Set Comment = Server.CreateObject("ADODB.Recordset")
    sor3 = "Select * from yorum where onay=1 and yaziID=" & yorumid & "" order by id desc"
    Comment.Open sor3,db,1,3
    %>	
    <table border="1" width="19%" id="table2">
    	<tr>
    		<td>Yorumlar</td>
    	</tr>
    	<% do while not comment.eof%>
    	<tr>
    		<td><%=comment("Yazan")%></td>
    	</tr>
    	<%
    	comment.movenext
    	loop
    	%>
    </table>
    bayadır asp kodlama yapmıyorum. hata yapmadıysam sorunun çözülür
    olmazsa sayfanın linkini pm at bakayım
  • 24-12-2009, 22:07:38
    #3
    dostum malesef link yok localde çalışıyorum bende sef link yapmadan önce senin gibi yapıyordum oluyordu ama sef link yaptıktan sonra iş karıştı :S
  • 24-12-2009, 22:15:19
    #4
    tamam işte gene aynı mantık. sef de linkteki kelime ile eşleyip içeriği alıyosunya. içeriği aldığında o içeriğin id sinide alıcaksın. bi değişkene atıycaksın yani o id i. sonra o id e ait yorumları çekiceksin.
  • 24-12-2009, 22:21:27
    #5
    arkadaşım yapıyorum bir türlü olmuyor anlamadım gitti :S kafayı yiyecem uğraşıyorum uğraşıyorum yapamıyorum sorun bende galiba beceriksizin tekiyim :S
  • 24-12-2009, 22:26:57
    #6
    yok beceriksizlik değilde. arada olur öyle. çok basit bi şeyi atladığım için sabaha kadar uğraştığım zamanları bilirim biraz dinlen gel tekrar bak sorunu çözersin
  • 24-12-2009, 22:41:37
    #7
    vallah pc başında kalktım meyve felan yedim sakin kafayla dediğin mantığı yaptım oldu teşekkür ederim ilgilendiğin için
    iyi geceler