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

Problemas Para Vizualizar Dados

Guest - ANNELISE -

Perguntado por Guest - ANNELISE -,

 Share

Pergunta

Guest - ANNELISE -

Guest - ANNELISE -

Postado
Postado

galera...é o seguinte:

tenho uma pagina para mostrar a foto e uma descricao sobre o funcionario...so que não consigo mostrar os dois ultimos funcionarios registrados no banco...mostra sempre o mesmo...repetido......ou seja: duas fotos e descricoes iguais.

vejam o codigo......(existe uma paginação)

<style type="text/css">

<!--

body {

background-attachment: scroll;

background-image: url(index_branco.jpg);

background-repeat: no-repeat;

background-position: center top;

}

-->

.link {font-family:verdana; font-size: 1; color: black; text-decoration: none}

.link:active {font-family:verdana; font-size: 1; color: black; text-decoration: none}

.link:hover {font-family:verdana; font-size: 1; color: black; text-decoration: underline}

</style>

<TABLE width=767 border=0 align="center" cellPadding=0 cellSpacing=3>

<TBODY>

<TR>

<TD width=223>&nbsp;</TD>

<TD width=518>&nbsp;</TD>

<TD width=14>&nbsp;</TD>

</TR>

<TR>

<TD width=223 height="133">&nbsp;</TD>

<TD width=518><table width="71%" border="0" cellpadding="0">

<tr>

<td width="15%">

<div align="left"> </div>

</td>

<td width="85%"><object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,29,0" width="250" height="90">

<param name="movie" value="bannerzinho.swf">

<param name="quality" value="high">

<embed src="bannerzinho.swf" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" width="250" height="90"></embed>

</object>

</td>

</tr>

</table>

</TD>

<TD width=14>&nbsp;</TD>

</TR>

<TR>

<TD><div align="center">

<table width="164" border="0" align="right" cellpadding="0">

<tr>

<td width="160"><div align="center"></div>

<div align="left"><a href="default.asp"><img src="botao_PAGINA_INICIAL.png" width="120" height="34" border="0"></a></div>

</td>

</tr>

</table>

</div>

</TD>

<TD><div align="center">

<table width="80%" border="0" align="left" cellpadding="0">

<tr>

<td width="33%"><a href="http://mail.santacasabh.org.br"><img src="BOTAO_EMAIL.png" width="134" height="34" border="0"></a></td>

<td width="28%"><a href="participe_tb.asp"><img src="BOTAO_PARTICIPETB.png" width="134"?????†††é??ü????????????•??????•????????††††††??†††††††?????????????????????†††††††††??????????????g????)??????? height="34" border="0"></a></td>

<td width="39%"><a href="paineldecontrole.asp"><img src="BOTAO_PAINEL.png" width="134" height="34" border="0"></a></td>

</tr>

</table>

</div>

</TD>

<TD>&nbsp;</TD>

</TR>

<TR>

<TD colspan="3">

<div align="left">

<table width="29%" border="0" align="left" cellpadding="0">

<tr>

<td width="13%">&nbsp;</td>

<td width="87%"><a href="detalhecorpoclinico.asp" class="detalhecorpoclinico.asp"><img src="BOTAO_CORPO.png" width="163" height="26" border="0"></a></td>

</tr>

<tr>

<td>&nbsp;</td>

<td><a href="detalhe_gestao_online.asp"><img src="BOTAO_GESTAO.png" width="163" height="26" border="0"></a></td>

</tr>

<tr>

<td>&nbsp;</td>

<td><a href="atoadministrativoinicial.asp"><img src="BOTAO_ATOS.png" width="163" height="26" border="0"></a></td>

</tr>

<tr>

<td>&nbsp;</td>

<td><a href="educacaopesquisainicial.asp"><img src="BOTAO_EDUCACAO.png" width="163" height="26" border="0"></a></td>

</tr>

<tr>

<td>&nbsp;</td>

<td><a href="detalhenumeros.asp"><img src="BOTAO_NUMEROS.png" width="163" height="26" border="0"></a></td>

</tr>

<tr>

<td>&nbsp;</td>

<td><a href="ultimas_noticias.asp"><img src="BOTAO_ULTIMASNOTICIAS.png" width="163" height="26" border="0"></a></td>

</tr>

<tr>

<td>&nbsp;</td>

<td><a href="detalhefuncionario.asp"><img src="BOTAO_CONHECA.png" width="163" height="26" border="0"></a></td>

</tr>

<tr>

<td>&nbsp;</td>

<td><a href="detalhe_alto_astral_texto.asp"><img src="BOTAO_ALTOASTRAL.png" width="163" height="26" border="0"></a></td>

</tr>

<tr>

<td>&nbsp;</td>

<td><a href="detalheutilidades.asp"><img src="BOTAO_UTILIDADES.png" width="163" height="26" border="0"></a></td>

</tr>

<tr>

<td>&nbsp;</td>

<td><a href="pequenos_anuncios.asp"><img src="BOTAO_PEQANUNCIOS.png" width="163" height="26" border="0"></a></td>

</tr>

<tr>

<td>&nbsp;</td>

<td><a href="rh_resumo.asp"><img src="BOTAO_RH.png" width="163" height="26" border="0"></a></td>

</tr>

</table>

<table width="438" border="0" align="left" cellpadding="0">

<tr>

<td width="431">&nbsp;</td>

<td width="12">&nbsp;</td>

</tr>

<tr>

<td> <p align="center">&nbsp;</p>

</td>

<td>&nbsp;</td>

</tr>

<tr>

<td>

<table width="100%" border="0" align="center" cellpadding="0">

<tr>

<td>

<%

'Efetuando a conexão com a base de dados criada -----------------------

Set Conn = Server.CreateObject("AdoDb.Connection")

Conn.provider="Microsoft.Jet.OLEDB.4.0"

Conn.connectionstring=Server.Mappath("bdintranet.mdb")

Conn.open

'--------------------------------------------------------------------------

'Vamos criar o objeto Record Set -> neste caso é necessário declará-lo,

'pois vamos utilizar algumas funções deste objeto

Set RS = Server.CreateObject("adodb.recordset")

RS.PageSize = 2 'quantidade de registros por página. Você pode alterar sem conforme precise.

'Vamos fazer a busca na tabela contatos

SQL = "select * from funcionario order by ID_funcionario"

RS.Open SQL,Conn,3,3

'Vamos agora verificar exceções do tipo “fim de arquivo” (EOF), se a página atual é menor

'que zero, se é maior que o número total de?????†††é??ü????????????•??????•????????††††††??†††††††?????????????????????†††††††††??????????????g????)??????? páginas, etc.

IF RS.EOF then

Response.Write "nenhum registro encontrado"

Response.End 'paramos o programa

ELSE

'Definindo em qual pagina o visitante está

IF Request.QueryString("pagina")="" then

intpagina=1

ELSE

IF cint(Request.QueryString("pagina"))<1 then

intpagina=1

ELSE

IF cint(Request.QueryString("pagina"))> RS.PageCount then

intpagina=RS.PageCount

ELSE

intpagina=Request.QueryString("pagina")

END IF

END IF

END IF

END IF

'Fim das verificações de exceções

'Usamos a propriedade AbsolutePage para dizer ao RS que página ele esta

RS.AbsolutePage=intpagina

' Inicia o contador que vai controlar os registros mostrados

intrec=0

'Enquanto o contador for menor que a quantidade de registros mostrados ou

' não for o final do arquivo

While intrec < RS.PageSize and not RS.EOF

%>

</td>

</tr>

<tr>

<td><div align="center"><a href="Default.asp"> </a>

<table width="418" border="0" align="left" cellspacing="0">

<tr>

<td><table width="417" border="0" align="left" cellspacing="1" bordercolor="#FFFFFF">

<tr bordercolor="#CCCCCC" bgcolor="#FFFFFF">

<td width="413"> <div align="justify"><font color="#000000" size="2" face="Verdana, Arial, Helvetica, sans-serif"><font size="2" face="Verdana, Arial, Helvetica, sans-serif">

</font><font size="2" face="Verdana, Arial, Helvetica, sans-serif">

</font></font><font color="#000000" size="2" face="Verdana, Arial, Helvetica, sans-serif"><font color="#000000" size="1" face="Verdana, Arial, Helvetica, sans-serif"><img src="<%=RS("foto")%>" width="78" height="76" align="left" heigth="100"></font></font><font color="#000000" size="2" face="Verdana, Arial, Helvetica, sans-serif"><font color="#000000" size="1" face="Verdana, Arial, Helvetica, sans-serif"><%=replace(Rs("descricao_funcionario"),chr(13),"<br>")%></font></font><font size="1" face="Verdana, Arial, Helvetica, sans-serif"></font></div></td>

</tr>

</table></td>

</tr>

</table>

</div>

</td>

</tr>

<tr>

<td><div align="center">

<div align="center"></div>

<div align="center">

<%

' response.write RS("titulo_anuncio") & " - " & RS("titulo_anuncio") & " - " & RS("titulo_anuncio") & "<BR>"

'---------------------------------------------------------------------------------------------

RS.MoveNext

' Acrescenta +1 ao contador

intrec=intrec+1

'Se for EOF (fim de arquivo), imprimir branco na tela

IF RS.EOF then

response.write " "

END IF

Wend 'fim do loop

'Vamos verificar se não é a página 1, para podermos colocar o link “anterior”.

IF intpagina > 1 then

%>

<a href="atoadministrativolistaportaria2005.asp?pagina=<%=intpagina-1%>"><img src="BOTAO_ANTERIOR.png" width="120" height="30" border="0"></a>

<%

END IF

'Se não estivermos no último registro contado, então é mostrado o link p/ a próxima página

IF strcomp(intpagina,RS.PageCount) <> 0 then

%>

<a href="atoadministrativolistaportaria2005.asp?pagina=<%=intpagina + 1%>"><img src="BOTAO_PROXIMA.png" width="120" height="30" border="0"></a>

<%

END IF

%>

</div>

</div></td>

</tr>

</table></td>

<td>&nbsp;</td>

</tr>

</table>

</div>

</TD>

</TR>

</TBODY>

</TABLE>

SE ALGUM PUDER ME AJUDAR....AGRADECEREI MT..

BJUS

Link para o comentário
Compartilhar em outros sites

3 respostass a esta questão

Posts Recomendados

  • 0
Guest - ANNELISE -

Guest - ANNELISE -

Postado
Postado

ESTOU USANDO O TOP(ACCESS), MAS MESMO ASSIM,MOSTRA SOMENTE O ULTIMO QUE FOI INCLUIDO NO BANCO.

SELECT TOP 2 * FROM TABELA

É ISSO não É?

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.

×
 Share
Ir para lista de Perguntas


  • Estatísticas dos Fóruns

    • Tópicos
      152,3k
    • Posts
      652,3k
×
×
  • Criar Novo...