Ben bi haber kodu aldım haberlerin 2.sayfasında site taslağı gidiyor sadece haberler kalıyor.
2.Sayfa şu şekilde çıkıyor Bunu 1.sayfadaki gibi nasıl yaparım..
Haber inc kodu
Yardımlarınız için şimdiden teşekkürler....
2.Sayfa şu şekilde çıkıyor Bunu 1.sayfadaki gibi nasıl yaparım..
Haber inc kodu
Kod:
<!-- #include file="veri.asp"-->
<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 mesax1 = Server.CreateObject("ADODB.Recordset")
sorbbs1 = "Select * from haber where manset=1 order by id desc"
mesax1.Open sorbbs1,conn,1,3
baslik=mesax1("haberbaslik")
kisa=mesax1("haberkisa")
himages=mesax1("images")
%>
<script>
<!--
/*
Textual Tooltip Script-
© Dynamic Drive (www.dynamicdrive.com)
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")
sorbbs = "Select * from haber where manset=1 ORDER BY id desc"
mesax.Open sorbbs,conn,1,3
%>
<%
i=0
do while i < 10 and not mesax.eof
%>
icerik[<%=i%>]='<center><font color="red" size="3"><b><%=mesax("haberbaslik")%></font></b></center><b><%=left(mesax("haberkisa"),145)%></b>'
<%
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.all.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 (www.dynamicdrive.com)
For full source code, installation instructions,
100's more DHTML scripts, and Terms Of
Use, visit dynamicdrive.com
*/
var icerik2=new Array()
<%
Set mesax00 = Server.CreateObject("ADODB.Recordset")
sorbbs00 = "Select * from haber where manset=1 ORDER BY id desc"
mesax00.Open sorbbs00,conn,1,3
%>
<%
i=0
do while i < 10 and not mesax00.eof
%>
icerik2[<%=i%>]='<img src="<%=mesax00("images")%>" width="225" height="165">'
<%
mesax00.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 width="98%" border="0" cellspacing="0" cellpadding="3">
<tr>
<td colspan="2" height="53" valign="top"> </td>
</tr>
<tr>
<td width="34%" valign="top" align="center"> </td>
<td width="36%" valign="top">
</td>
</tr></CENTER>
<!--#include file="veri.asp"-->
<%
yanyana = 2
Set mesax = Server.CreateObject("ADODB.Recordset")
restablo = "Select * from haber order by id desc"
mesax.pagesize = 8
mesax.open restablo,conn,1,1
if request.QueryString("s")="" or request.querystring("s")=0 then
s=1
else
s=request.QueryString("s")
end if
mesax.AbsolutePage = s
%>
<p align="left"> </p>
<CENTER>
<table cellspacing=0 cellpadding=3 width="100%">
<tr>
<% for k=1 to mesax.pagesize %>
<% if mesax.eof or mesax.bof then exit for %>
<% if yan=yanyana then
response.write ("<tr>")
yan=0
End if
%><td bgcolor=#FFFFFF>
<table border="0" width="100%" height="120">
<tr>
<td bgcolor="#F5F5F5" height="15"> <IMG SRC="arrow.gif" BORDER="0" ALT=""> <b><FONT SIZE="2" COLOR="#173862"><%=mesax("haberbaslik")%></FONT></b></td>
</tr>
<tr>
<td >
<A HREF="haber_oku.asp?id=<%=mesax("id")%>" onclick="newWindow(this.href, 'popup', 4, 600, 1, 1, 0, 0, 0, 1, 0); return false;" menubar="0" status="0" scrollbars="0" toolbar="no" target="_blank"><FONT SIZE="1" COLOR="#A81F12">
<img border="0" src="<%=mesax("images")%>" width="119" height="107%" align="<%=mesax("taraf")%>" align="absmiddle"style="BORDER-RIGHT: orange 1px solid; BORDER-TOP: orange 1px solid; BORDER-LEFT: orange 1px solid; BORDER-BOTTOM: orange 1px solid"
hspace="6" vspace="3">
</A>
<FONT SIZE="2" COLOR="#000000">
<%=left(mesax("haberkisa"),110)%>...
<BR>
<A HREF="haber_oku.asp?id=<%=mesax("id")%>" onclick="newWindow(this.href, 'popup', 4, 600, 1, 1, 0, 0, 0, 1, 0); return false;" menubar="0" status="0" scrollbars="0" toolbar="no" target="_blank"><FONT SIZE="1" COLOR="#A81F12">Devamı...</FONT> </A></FONT></td>
</tr>
</table>
</td>
<% yan=yan+1
if yan = (yanyana+1) then
response.write ("</tr>")
end if
%>
<% mesax.movenext : next%>
</table>
</CENTER>
<div align="center">
Sayfa
<% for x=1 to mesax.pagecount %>
<a href="haber.asp?sayfa=haber_inc&s=<%=x%>" class=ler>|<%=x%>|</a>
<% next %>
Toplam <%=mesax.recordcount%> Haber
</div>
<BR>
Yardımlarınız için şimdiden teşekkürler....