Ir para conteúdo
Fórum Script Brasil
  • 0

Tabela Lado A Lado


Guest Wellington Sales

Pergunta

Guest Wellington Sales

Olá pessoal, sou novanto também em asp, mas estou me saindo bem. Mas encontrei uma dificuldades com uma coisa tenho um sistema de notícias que mostra as materias uma a baixo da outra.

exe.:

Papa morre no Vaticano

Guerra no Iraque continua

Lula é contra o aumento da gasolina

Seca castiga Rio Grande do sul

Mas eu quero que elas aparecam assim

ex.:

Papa morre no Vaticano Lula é contra o aumento da gasolina

Guerra no Iraque continua Seca castiga Rio Grande do sul

Abaixo segue o código

##############################################

<table width="360" border="0" cellspacing="0" cellpadding="0">

<tr>

<td>

<table width="360" cellpadding="2" cellspacing="2">

<% sqlstmt = "SELECT * FROM noticias ORDER BY data, id DESC"

Set rs = Server.CreateObject("ADODB.Recordset")

rs.Open sqlstmt, Dados, 3, 3

TotalRecs = rs.recordcount

x = 0

For x = 3 to 9999

If rs.eof then

Exit For

Else

date1 = rs("data")

id = rs("ID")

name1 = rs("titulo")

link = "<a href='noticias.asp?id=" & id & "' target='_parent'>" & name1 & "</a>"

%>

<tr>

<td height="2"><font color="#4D4B4D" face="verdana, Arial, Helvetica, san-serif" size="1"><strong>

Lançamento

<br>

<% if rs("foto") = "N" then %>

<img src="imagens/semfoto.gif" border="0" align="left" hspace="8" vspace="2">

<% else %>

<img src="imagens/<%=rs("foto")%>" border="1" align="left" hspace="8" vspace="2">

<% end if %>

<div align="left">

<% =link %>

<% =description%>

</span></font> </strong>

</tr>

<tr>

<td height='5' valign='bottom'><img src="imagens/pixel.gif" width="1" height="1">

</tr>

<%

rs.MoveNext

End If

Next%>

</table></td>

</tr>

</table>

##############################################

Conto com a ajuda de vocês , que já me ajudaram 2 vezes.

Link para o comentário
Compartilhar em outros sites

6 respostass a esta questão

Posts Recomendados

  • 0

Cara eu não consegui nem inclui no´meu código, estou postando o meu código pra você dá uma olhadinha.

<table width="360" border="0" cellspacing="0" cellpadding="0">

<tr>

<td>

<table width="360" cellpadding="2" cellspacing="2">

<% sqlstmt = "SELECT * FROM noticias ORDER BY data, id DESC"

Set rs = Server.CreateObject("ADODB.Recordset")

rs.Open sqlstmt, Dados, 3, 3

TotalRecs = rs.recordcount

x = 0

For x = 3 to 9999

If rs.eof then

Exit For

Else

date1 = rs("data")

id = rs("ID")

name1 = rs("titulo")

link = "<a href='noticias.asp?id=" & id & "' target='_parent'>" & name1 & "</a>"

%>

<tr>

<td height="2"><font color="#4D4B4D" face="verdana, Arial, Helvetica, san-serif" size="1"><strong>

Lançamento

<br>

<% if rs("foto") = "N" then %>

<img src="imagens/semfoto.gif" border="0" align="left" hspace="8" vspace="2">

<% else %>

<img src="imagens/<%=rs("foto")%>" border="1" align="left" hspace="8" vspace="2">

<% end if %>

<div align="left">

<% =link %>

<% =description%>

</span></font> </strong>

</tr>

<tr>

<td height='5' valign='bottom'><img src="imagens/pixel.gif" width="1" height="1">

</tr>

<%

rs.MoveNext

End If

Next%>

</table></td>

</tr>

</table>

Se você conseguir faz funcionar isso ficaria grato.

Link para o comentário
Compartilhar em outros sites

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152,2k
    • Posts
      651,8k
×
×
  • Criar Novo...