Jump to content


Photo

Dividir Meu Fórum Em Asp


  • Faça o login para participar
1 reply to this topic

#1 Bruno_Botafoguense

Bruno_Botafoguense

    Novato no fórum

  • Usuários
  • 14 posts
  • Sexo:Não informado

Posted 25/01/2004, 16:48

Gostaria de saber como é que crio mais páginas pro meu fórum.

Tipo, atualmente tem 1 página com espaço pra 55 tópicos. Eu queria fazer 3 páginas com espaço para 55 tópicos. Como faço isso?

Aki está o código:

<!--#Include File="conecta.asp"-->
<html>

<head>
<meta http-equiv="Content-Language" content="pt-br">
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>F&oacute;rum TV Online</title>
<link rel="stylesheet" href="css" type="text/css">
<style type="text/css">
<!--
A:link {color:black;}
A:visited {color:none;}
A:hover {text-decoration:underline;}
A:active {color:none;}
A {text-decoration:none}
-->
</style>
<script language="JavaScript">
<!--
function MM_jumpMenu(targ,selObj,restore){ //v3.0
eval(targ+".location='"+selObj.options[selObj.selectedIndex].value+"'");
if (restore) selObj.selectedIndex=0;
}
//-->
</script>
</head>

<body topmargin="0" leftmargin="0" background="back.gif" bgcolor="#FFFFFF" text="#000000" link="#000000" vlink="#000000" alink="#000000">
<cener> <table width="780" border="0" cellpadding="0" cellspacing="0">
<tr>

<td height="166">
<table border="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="780" height="8" bgcolor="#FFFFFF" cellpadding="0">
<tr>
<td width="80%" align="center" height="26" background="bgtopforum.jpg"><span class="aviso">
</span>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="16%">
<div align="center"><b><span class="IP"><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><font face="Verdana" size="1" color="#FFFFFF"><a href="http://tvol.lkonline...nline.net"><img src="logotopforum.jpg" width="135" height="24" border="0"></a>
</font></font></font></span></b></div>
</td>
<td width="61%">
<div align="center"><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><font face="Verdana" size="1" color="#FFFFFF">
<b><font color="#003333">O MELHOR F&Oacute;RUM SOBRE TELEVIS&Atilde;O,
PARA VOC&Ecirc; COLOCAR SUAS ID&Eacute;IAS!</font></b></font></font></font></div>
</td>
<td width="23%"> <span class="aviso">
<div align="center">
<select class=input-index
name=select4
onChange="MM_jumpMenu('parent',this,0)" size="1" style="background-color: #EFF2EE; color: BLACK; font-family: verdana; font-size: 7pt; border: 1 solid #006600">
<option selected>>>> MENU TV ONLINE</option>
<option>===================</option>
<option value="http://tvol.lkonline...t/index.htm">-> Página
Principal</option>
<option value="index.asp">-> Fórum</option>
<option value="http://tvol.lkonline...aterias.htm">->
Matérias</option>
<option value="http://tvol.lkonline...teintro.htm">->
Caliente </option>
<option value="http://tvol.lkonline...unistas.htm">->
Colunistas</option>
<option value="http://tvol.lkonline...evistas.htm">->
Entrevistas </option>
<option value="http://tvol.lkonline...morreal.htm">->
Especial Amor Real</option>
<option value="http://tvol.lkonline...iva2003.htm">->
Retrospectiva 2003</option>
<option value="http://tvol.lkonline...ramacao.htm">->
Programação e Filmes</option>
<option value="http://tvol.lkonline...reosite.htm">->
Sobre o Site</option>
<option value="http://tvol.lkonline...t/links.htm">-> Links
para Emissoras </option>
<option></option>
<option value="nolimite.htm">>>> NOVELAS: </option>
<option>===================</option>
<option></option>
<option>GLOBO:</option>
<option value="http://tvol.lkonline...ocolate.htm">->
Chocolate c/ Pimenta</option>
<option value="http://tvol.lkonline...banacan.htm">->
Kubanacan</option>
<option value="http://tvol.lkonline...bridade.htm">->
Celebridade </option>
<option></option>
<option>SBT:</option>
<option value="http://tvol.lkonline...olimite.htm">->
No Limite da Paixão</option>
<option value="http://tvol.lkonline.../pulgas.htm">-> Poucas,
Poucas Pulgas</option>
<option value="http://tvol.lkonline...anavial.htm">->
Canavial de Paixões</option>
<OPTION></OPTION>
</select>
</div>
</span> </td>
</tr>
</table>
<span class="aviso"> </span> </td>
</tr>
</table>

<table width="100%" border="0" cellspacing="0" cellpadding="0" bgcolor="#9AAF9D" height="2">
<tr>
<td height="1"></td>
</tr>
</table>
<table width="780" border="0" cellspacing="0" cellpadding="0" height="126">
<tr>

<td background="forumtop1.jpg" height="124" valign="bottom">
<table width="100%" border="0" cellspacing="0" cellpadding="0" height="26">
<tr>
<td height="32">

<table width="100%" border="0" cellspacing="0" cellpadding="0" height="25">
<tr>

<td valign="middle" height="33" width="30%">
<div align="center"><img src="setaforum.gif" width="14" height="14" align="middle">
<font size="1"><b><font face="Verdana, Arial, Helvetica, sans-serif"><a href="forum_postar.asp">NOVA
MENSAGEM</a></font></b></font></div>
</td>

<td height="33" width="37%">
<div align="center"><img src="setaforum.gif" width="14" height="14" align="middle">
<b><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><a href="java script:abrir('tutorial.htm');">COMO
MUDAR A LETRA E INSERIR IMAGEM</a></font></b></div>
</td>

<td height="33" width="33%">
<div align="center"><img src="setaforum.gif" width="14" height="14" align="middle">
<b><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><a href="faleforum.php" target="_blank">FALE
CONOSCO</a></font></b></div>
</td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
<div align="center"></div>
<table width="100%" border="0" cellpadding="0" cellspacing="0" height="41">
<tr>
<td height="35">

<div align="center"><span class="aviso"><font face="Verdana, Arial, Helvetica, sans-serif" color="#FF6600"><b><font size="2" color="#993300">
<script language="JavaScript">

function abrir(URL) {

var width = 490;
var height = 500;

var left = 200;
var top = 10;

window.open(URL,'janela1', 'width='+width+', height='+height+', top='+top+', left='+left+', scrollbars=yes, status=yes, toolbar=no, location=no, directories=no, menubar=no, resizable=no, fullscreen=no');

}

</script>
</font></b></font>O seu espa&ccedil;o, agora mais r&aacute;pido,
para voc&ecirc; debater a vontade sobre os assuntos do mundo da
televis&atilde;o.</span></div>
</td>
</tr>
</table>

</td>
</tr>
</table>
<table border="0" cellpadding="2" cellspacing="0" width="780" height="112">
<%
AbreConexao
EPFODAO = "SELECT * FROM forum ORDER BY ID desc"
Set rsForum = conexao.execute(EPFODAO)
For x = 1 to 55
If rsForum.EOF then
Exit For
Else

%>
<tr>
<td width="100%" align="center" bgcolor="#FFFFFF" height="10" colspan="2">
<div align="left"><br>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="14">&nbsp;</td>
<td width="764">
<table border="0" cellpadding="0" cellspacing="0" width="748" bgcolor="#F5F5F5">
<tr>
<td width="100%" height="60">
<table width="738" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td height="35">
<div align="center"><font face="Verdana" size="3"><b><%=rsForum("Titulo")%></b></font></div>
</td>
</tr>
</table>
<table width="738" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td width="738"><font face="Verdana" size="2"><%=rsForum("Mensagem")%><br>
</font><font face="Verdana" size="1">(<%=rsForum("Autor")%>
- <%=rsForum("Data")%> - <%=rsForum("Hora")%> - <i>IP:
<%=rsForum("IP")%></i>)</font>&nbsp;&nbsp;<font size="1" face="Verdana, Arial, Helvetica, sans-serif"><i></i><b>
</b> </font><font face="Verdana"
size="1">
<%if Session("login") = 0 then%>
<%else%>
<a href="forum_editar.asp?id=<%=rsForum("id")%>">Editar
Tópico</a>
<%end if%>
<br>
<a href="forum_replica.asp?id=<%=rsForum("ID")%>"><img
border="0" src="replica.gif"
alt="Postar replica à este tópico" width="73" height="17"> &nbsp;</a><br>
</font>
<div align="right">
<table border="0" cellpadding="0" cellspacing="0" width="85%">
<tr>
<%
Comando = "SELECT * FROM reply WHERE MsgID = "&rsForum("ID")&" ORDER BY ID"
Set rsReply = conexao.execute(Comando)
if rsReply.EOF then

else
While not rsReply.EOF
%>
<td width="100%"><i><font face="Verdana" size="2"><%=rsReply("Mensagem")%><br>
<font color="#000000">( <%=rsReply("Autor")%>
- <%=rsReply("Data")%> - <%=rsReply("Hora")%>
- IP: <%=rsReply("IP")%> ) </font><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><i></i><b>
</b> </font><font face="Verdana"
size="1"> <b><font color="#003333"></font></b></font><font color="#000000"><br>
&nbsp;</font></font></i></td>
</tr>
<%rsReply.movenext
wend
rsReply.close
%>
<%end if%>
</table>
</div>
</td>
</tr>
</table>
<div align="right"></div>
</td>
</tr>
</table>
</td>
</tr>
</table>
<br>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="5" height="1"></td>
<td width="770">
<table width="768" border="0" cellpadding="0" cellspacing="0" bgcolor="#BFBFBF" height="1">
<tr>
<td height="1"></td>
</tr>
</table>
</td>
</tr>
</table>

</div>
<div align="center"></div>
</td>
</tr>
<%rsForum.MoveNext
End If
Next
rsForum.close
FechaConexao
%>
</table>
<div align="center"><br>
</div>
<table width="780" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="0%">&nbsp;</td>

<td width="58%" bgcolor="#FFFFFF">
<div align="center"><font face="Verdana" size="3"><b><a href="forum_postar.asp"><img border="0"
src="postar.gif" width="184" height="41"></a></b></font></div>
</td>

<td width="42%" bgcolor="#FFFFFF"> <a href="#top" class="confirmacao">TOPO</a>
</td>
</tr>
</table>

<div align="center"><br>
<span class="aviso">O TV Online n&atilde;o se responsabiliza pelas mensagens
aqui postadas pelos usu&aacute;rios.<br>
Pedimos aos visitantes, que usem letra com tamanho at&eacute; 3 pt ou 12 pixels.
</span><br>
<br>
</div>
<table width="780" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td bgcolor="#666666" height="1" background="pontos1.gif"></td>
</tr>
<tr>
<td bgcolor="#F2F5F1" height="21">
<table width="780" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="3%">&nbsp;</td>
<td width="94%"><font color="#003300" face="Verdana, Arial, Helvetica, sans-serif" size="1" class="RODAPE">&copy;
Copyrigth TV Online. Todos os direitos reservados (2003 - 2001) -
Melhor Visualizado na resolu&ccedil;&atilde;o de 800 x 600 pixels</font></td>
<td width="3%" valign="bottom"><font face="Verdana, Arial, Helvetica, sans-serif" size="1"><font face="Verdana, Arial, Helvetica, sans-serif" size="1"><font color="#000066"><span class="padrao"><i class="recomenda">
</i></span></font></font></font></td>
</tr>
</table>
</td>
</tr>
</table>


</body>

</html>


#2 KAKO-

KAKO-

    loading: again.........

  • Usuários
  • 236 posts
  • Sexo:Não informado
  • Localidade:Joinville
  • Interesses:ASP / PHP

Posted 26/01/2004, 13:59

de uma olhada nesse link:
Paginação

se isso nao for realmente o q vc procura, vc pode procurar pelo sistema de busca do imasters por "paginação"

falow!
<?php
$nome = "Flávio Rodrigues";
$site = "http://www.expresso.com.br";
$idade = "21";
?>

nada é uma palavra esperando tradução...




1 user(s) are reading this topic

0 membro(s), 1 visitante(s) e 0 membros anônimo(s)

IPB Skin By Virteq