köşe yazarı problem...

merhaba öncelikle yapmaya çalıştığım olayı anlatayım. bazı sitelerde örneğin internethaber.com daki gibi yazar kısmını yapmaya çalışıyorum. lakin yeni bir kayıt girildiğinde aynı yazardan sayfadan ikinci bir defa çıkıyor yazının id leri farklı olmasına rağmen nasıl çözebiliriz acaba o kosmın kodlamasını aşağıdaki gibi...

<div id="scriptmenu">
<%
Set zec = Server.CreateObject("ADODB.Recordset")
sql = "Select * from zecyazi where Onay=1 order by sira"
zec.Open sql,ObjCon_ilet,1,3
%>
<%
do while not zec.eof
%>

<table width="100%"class="mnu" bordercolor="#FFFFFF" border="1" cellspacing="0" cellpadding="1" style="border-collapse:collapse">
<tr bgColor="#F2F2F2" onMouseOver="bgColor='#FF9240'" onMouseOut="bgColor='#F2F2F2'">
<td class="mnutbl2" valign="middle">

<font size="3">
<%
sira=zec("sira")
top=1
%>
<%Set sql = ObjCon_ilet.Execute("select TOP "&top&" * from zecyazi where onay=1 and sira=" & sira & " Order by yaziid desc" )%>
<a href="haber_oku.asp?yaziid=<%=zec("yaziid")%>" onMouseover="changetext(icerik[1]);changetext1(icerik2[1])"><FONT color="black" face="Verdana" style="font-size: 8pt"><%=zec("yazarismi")%></FONT></a>

</td>
</tr>
</table>
<%
If not sql.Eof Then
sql.Movenext
End If
%>

<%
zec.movenext
Loop
%></div>


her ihtimale karşı db si ile birlikte 2 mb olduğu için kendi siteme rarlı dosya olarak upload ettim. yardımlarınız için şimdiden teşekkürler.

http://www.aksarayguncel.com/upload/ykose.rar

ben tam olarak anlıyamadım

örnek adres gösterirsen yardımcı olmya calısırım

örnek olarak internethaber.com adresinde yer alan köşe yazarı sistemini yapmaya çalışıyorum.


<!-- #include file="dbyegit.asp"-->

<LINK href="zitil.css" type=text/css
rel=stylesheet>

<style type="text/css">
<!--
.style1 {
font-size: 9px;
font-weight: bold;
color: #FF0000;
}
.style3 {font-size: 9px; font-weight: bold; font-family: Tahoma;}
-->
</style>
<script type="text/javascript">

function bookmarksite(title, url){
if (document.all)
window.external.AddFavorite(url, title);
else if (window.sidebar)
window.sidebar.addPanel(title, url, "")
}

</script>

<script language="JavaScript">
function openWin(theURL,winName,features) {
window.open(theURL,winName,features);
}

// -->
</script>
<%
Set zec1 = Server.CreateObject("ADODB.Recordset")
sql1 = "Select * from zecyazi where Onay=1 order by yaziid desc"
zec1.Open sql1,ObjCon_ilet,1,3
baslik=zec1("yazarismi")
kisa=zec1("yazibaslik")
hyazarresim=zec1("yazarresim")
%>
<script>
<!--

/*
Textual Tooltip Script-
© Dynamic Drive (Dynamic Drive DHTML(dynamic html) & JavaScript code library)
For full source code, installation instructions,
100's more DHTML scripts, and Terms Of
Use, visit dynamicdrive.com
*/


var icerik=new Array()
<%
Set mesax = Server.CreateObject("ADODB.Recordset")
sql = "Select * from zecyazi where Onay=1 order by yaziid desc"
mesax.Open sql,ObjCon_ilet,1,3
%>
<%
i=0
do while i < 10 and not mesax.eof
%>
icerik[<%=i%>]='<br><center><font color="Black" style="font-size: 8pt"><b><%=mesax("yazarismi")%></font></b></center><br><center><font color="Black" style="font-size: 8pt"><%=left(mesax("yazibaslik"),25)%>'
<%
mesax.movenext
i=i+1
Loop
%>
function regenerate(){
window.location.reload()
}
function regenerate2(){
if (document.layers){
appear()
setTimeout("window.onresize=regenerate",450)
}
}

function changetext(whichcontent){

if (document.all||document.getElementById){
cross_el=document.getElementById? document.getElementById("descriptions"):document.a ll.descriptions
cross_el.innerHTML='<font face="Verdana"><small>'+whichcontent+'<font></small>'
}
else if (document.layers){
document.d1.document.d2.document.write('<font face="Verdana"><small>'+whichcontent+'</small></font>')
document.d1.document.d2.document.close()
}

}

function appear(){
document.d1.visibility='show'
}


//-->
</script>
<script>
<!--

/*
Textual Tooltip Script-
© Dynamic Drive (Dynamic Drive DHTML(dynamic html) & JavaScript code library)
For full source code, installation instructions,
100's more DHTML scripts, and Terms Of
Use, visit dynamicdrive.com
*/


var icerik2=new Array()
<%
Set zec00 = Server.CreateObject("ADODB.Recordset")
sql00 = "Select * from zecyazi where Onay=1 order by yaziid desc"
zec00.Open sql00,ObjCon_ilet,1,3
%>
<%
i=0
do while i < 10 and not zec00.eof
%>
icerik2[<%=i%>]='<img border="1" src="<%=zec00("yazarresim")%>" width="110" height="150">'
<%
zec00.movenext
i=i+1
Loop
%>
function regenerate1(){
window.location.reload()
}
function regenerate3(){
if (document.layers){
appear1()
setTimeout("window.onresize=regenerate1",450)
}
}

function changetext1(whichcontent){

if (document.all||document.getElementById){
cross_el=document.getElementById? document.getElementById("descriptionsa"):document. all.descriptionsa
cross_el.innerHTML='<font face="Verdana"><small>'+whichcontent+'<font></small>'
}
else if (document.layers){
document.d3.document.d4.document.write('<font face="Verdana"><small>'+whichcontent+'</small></font>')
document.d3.document.d4.document.close()
}

}

function appear1(){
document.d3.visibility='show'
}


//-->
</script>



<body onLoad="regenerate3();regenerate2();goforit()">
<CENTER><script LANGUAGE="JavaScript">
function CC_noErrors() {
return true;
}

window.onerror = CC_noErrors;
</script>

<table border="0" width="22%">
<tr>
<td colspan="2">Köşe Yazarı</td>
</tr>
<tr>
<td rowspan="2" width="55%" valign="top">

<div id="scriptmenu">
<%
Set zec0 = Server.CreateObject("ADODB.Recordset")
sql0 = "Select * from zecyazi "
zec0.Open sql0,ObjCon_ilet,1,3
%>
<%
i=0
do while i < 5 and not zec0.eof
%>

<table width="100%"class="mnu" bordercolor="#FFFFFF" border="1" cellspacing="0" cellpadding="1" style="border-collapse:collapse">
<tr bgColor="#F2F2F2" onMouseOver="bgColor='#FF9240'" onMouseOut="bgColor='#F2F2F2'">
<td class="mnutbl2" valign="middle">

<font size="3">

<%
sira=zec0("sira")
top=1
%>
<%Set sql0 = ObjCon_ilet.Execute("select TOP "&top&" * from zecyazi where onay=1 and sira=" & sira & " Order by yaziid desc" )%>
<a href="haber_oku.asp?yaziid=<%=zec0("yaziid")%>" onMouseover="changetext(icerik[<%=i%>]);changetext1(icerik2[<%=i%>])"><FONT color="black" face="Verdana" style="font-size: 8pt"><%=zec0("yazarismi")%></FONT></a>
</td>
</tr>
</table>
<%
zec0.movenext
i=i+1
Loop
%></div>

</td>
<td width="40%" valign="top">
<p align="center">
<ilayer name="d3" id="d3" width="110" height="140" visibility="hide">
<layer id="d4" height="165">
<div id="descriptionsa" align="center" height="165">
<img border="1" src="<%=hyazarresim%>" width="110" height="150">
</div>
</layer>
</ilayer>
</td>
</tr>
<tr>
<td width="40%" height="73" valign="top" background="yazarresim/kosevar.gif">
<ilayer name="d1" id="d1" width="500" height="120" visibility="hide">
<layer id="d2" width="100%" height="120">
<div id="descriptions">
<center>
<b>
<br>
<font color="black" face="Verdana" style="font-size: 8pt"><%=baslik%> </font>
</b>
</center><br>
<p align="center"><font face="Verdana" style="font-size: 8pt"><%=kisa%>
</font> </div>
</layer>
</ilayer>
</td>
</tr>
</table>

</body>

</html>

sayfanın kodlama bölümü bura. olay örnek verdiğim sitedede olduğu gibi yazarın ismi ve soyismi sol tarafa sabitlemeye çalışıyorum lakin aynı yazarın ikinci bir yazısı eklendiğinde tekrardan ikinci bir yazıyı yine isim ve soy isim olarak yayınlıyor. bir önceki mesajda link duruyor.