Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

EliteRio Web

no script de noticias que repete as informações do banco SQL

Por , em ASP Clássico

Recommended Posts

EliteRio Web    0

EliteRio Web
Postado

Boa tarde amigos, estou desenvolvendo um sistema de noticias interno na empresa sendo que fiz em MDB e estava funcionando na boa. Mas agora ao migrar para SQL Server ele esta repetindo as informações na pagina inicial.

 

<% 
<!--#include file="adm/controle.asp" -->

Option Explicit

'Criando variáveis
Dim localbd, meubd, rsMenu, rsNoticias, rsProcedi, rsSolu,rsProcedimento, rsSolucao

'Indicando local do Banco de dados
'localbd="driver={microsoft access driver (*.mdb)};dbq=" & server.mappath("foxdicas.mdb")
'localbd = "DBQ=" & Server.Mappath("foxdicas.mdb") & ";Driver={Microsoft Access Driver (*.mdb)};"

'Set localbd = Server.CreateObject("ADODB.Connection")

'localbd = Server.CreateObject("ADODB.Connection")
Set localbd = CreateObject("ADODB.Connection")
localbd = "driver={SQL Server};" & _
"server=CENTRO03;" & _
"database=sco;" & _
"Uid=intranet;" & _
"Pwd=xxxxxxx
'localbd.open meubd, rsMenu, rsNoticias, rsProcedimento, rsSolucao


'Setando conexões adodb.Connection
set meubd=server.createobject("ADODB.Connection")
set rsMenu=server.createobject("ADODB.Recordset")
set rsNoticias=server.createobject("ADODB.Recordset")
set rsProcedimento=server.createobject("ADODB.Recordset")
set rsSolucao=server.createobject("ADODB.Recordset")

meubd.Open localbd
'Esta SELECT irá selecionar todos os tipos de notícias
'Em nosso caso, iremos desenvolver um menu diretamente com os itens cadastrados , meubd
rsMenu.Open "SELECT * from noticias_tipo order by tipo", meubd


'Agora iremos fazer um IF para validar se foi enviado um querystring
'Pois usaremos a mesma página para mostrar os determinados tipos de notícias
'Se for igual a vazio, ele fará a primeira SELECT, senão ele fará a segunda de acordo com o código
%>
<%
if request.querystring("tipo")="" then
rsNoticias.Open "SELECT * from noticias, noticias_tipo where destaque=1 and noticias.tipo=codtipo and day(expirar)>="& day(now) &" and month(expirar)>="& month(now) &" and year(expirar)>="& year(now) &" order by data desc", meubd
else
rsNoticias.Open "SELECT * from noticias, noticias_tipo where noticias.tipo="& request.querystring("tipo") &" and noticias.tipo=codtipo and day(expirar)>="& day(now) &" and month(expirar)>="& month(now) &" and year(expirar)>="& year(now) &" order by data desc", meubd 
end if
%>

<html>
<head>
<title>:: Banco de Conhecimentos >> Seu conhecimento virtual</title>
<script type="text/javascript" src="simpletreemenu.js"></script>
<script language="JavaScript" type="text/JavaScript">
function loadImages() {
if (document.getElementById) { // DOM3 = IE5, NS6
document.getElementById('hidepage').style.visibility = 'hidden';
}
else {
if (document.layers) { // Netscape 4
document.hidepage.visibility = 'hidden';
}
else { // IE 4
document.all.hidepage.style.visibility = 'hidden';
}
}
}
</script>

<link href="simpletree.css" rel="stylesheet" type="text/css">

<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"><style type="text/css">
<!--
a:link {
text-decoration: none;
}
a:visited {
text-decoration: none;
}
a:hover {
text-decoration: none;
}
a:active {
text-decoration: none;
}
-->
</style></head>

<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0" background="images/lineback.jpg">
<table width="778" border="0" cellspacing="3" cellpadding="0" align="center" bgcolor="#ffffff">
<tr valign="middle">
<td height="100" colspan="3" background="images/topo_dicas.jpg" bgcolor="#E7E7E7"><font size="1" color="#FFFFFF" face="Arial, Helvetica, sans-serif"><b></b></font></td>
</tr>
<tr>
<td colspan="3" bgcolor="#000077"><font face="Arial, Helvetica, sans-serif" color="#EEEEEE" size="-3">
<!--#include file="horario.asp" --></font></td>
</tr>
<tr>
<td width="126" height="277" valign="top" bgcolor="#E7E7E7"><font size="1" color="#FFFFFF"face="Arial, Helvetica, sans-serif">
</font> <table width="126" border="0" cellspacing="1" cellpadding="2">
<tr>

<td width="126" bgcolor="#f9f9f9"><div align="left"><font size="1" face="Arial, Helvetica, sans-serif">
<ul id="treemenu1" class="treeview">
<li><a href="principal.asp">Principal</a></li>

<li><a href="principal.asp">Dicas</a>
<ul rel="open">
<li>Banco de Dados
<ul rel="open">
<li><a href="principal.asp?tipo=32">Access</a></li>
<li><a href="principal.asp?tipo=33">Firebird</a></li>
<li><a href="principal.asp?tipo=34">Mysql</a></li>
<li><a href="principal.asp?tipo=35">Sql Server</a></li>
<li><a href="principal.asp?tipo=36">Oracle</a></li>
<li><a href="principal.asp?tipo=37">Paradox</a></li>
</ul>
</li>
<li>Cursos
<ul rel="open">
<li><a href="principal.asp?tipo=58">Cursos</a></li>
</ul>
</li>
<li>Câmeras 
<ul rel="open">
<li><a href="principal.asp?tipo=97">Web Cam</a></li>

<li><a href="principal.asp?tipo=98">Câmeras Digitais</a></li>
<li><a href="principal.asp?tipo=99">Câmeras IP</a></li>
</ul>
</li>
<li>Desenvolvimento
<ul rel="open">
<li><a href="principal.asp?tipo=1">Delphi</a></li>

<li><a href="principal.asp?tipo=2">Visual Basic</a></li>
<li><a href="principal.asp?tipo=3">Java</a></li>
<li><a href="principal.asp?tipo=4">Javascript</a></li>
<li><a href="principal.asp?tipo=5">Html</a></li>
<li><a href="principal.asp?tipo=6">ASP</a></li>
<li><a href="principal.asp?tipo=7">PHP</a></li>
<li><a href="principal.asp?tipo=8">Clipper</a></li>
</ul>
</li>
<li>Design
<ul rel="open">
<li><a href="principal.asp?tipo=63">Auto Cad</a></li>
<li><a href="principal.asp?tipo=64">Homedesign</a></li>
<li><a href="principal.asp?tipo=65">Maya</a></li>
<li><a href="principal.asp?tipo=66">3D Studio</a></li>
<li><a href="principal.asp?tipo=67">Blender</a></li>
</ul>
</li>
<li>Drivers
<ul rel="open">
<li><a href="principal.asp?tipo=106">Drivers</a></li>
</ul>
</li>
<li>Exchange
<ul rel="open">
<li><a href="principal.asp?tipo=70">Exchange 5.5</a></li>
<li><a href="principal.asp?tipo=71">Exchange 2003</a></li>
</ul>
</li>
<li>Fornecedores
<ul rel="open">
<li><a href="principal.asp?tipo=104">Lojas</a></li>
<li><a href="principal.asp?tipo=105">Empresas</a></li>
</ul>
</li>
<li>Graficos
<ul rel="open">
<li><a href="principal.asp?tipo=59">PhotoShop</a></li>
<li><a href="principal.asp?tipo=60">Paint Shop Pro</a></li>
<li><a href="principal.asp?tipo=61">Corel Draw</a></li>
<li><a href="principal.asp?tipo=62">Fireworks</a></li>
</ul>
</li>
<li>Hardware
<ul rel="open">
<li><a href="principal.asp?tipo=11">HD</a></li>
<li><a href="principal.asp?tipo=12">CD-ROM</a></li>
<li><a href="principal.asp?tipo=13">Memória</a></li>
<li><a href="principal.asp?tipo=14">Placa de Vídeo</a></li>
<li><a href="principal.asp?tipo=15">Placa de Som</a></li>
<li><a href="principal.asp?tipo=16">Placa USB</a></li>
<li><a href="principal.asp?tipo=17">Placa Wireless</a></li>
<li><a href="principal.asp?tipo=18">Processador</a></li>
<li><a href="principal.asp?tipo=19">Cooler</a></li>
<li><a href="principal.asp?tipo=20">Floppy</a></li>
<li><a href="principal.asp?tipo=21">DVD-ROM</a></li>
<li><a href="principal.asp?tipo=22">Placa de Modem</a></li>
<li><a href="principal.asp?tipo=23">BIOS</a></li>
<li><a href="principal.asp?tipo=24">Placa Mãe</a></li>
<li><a href="principal.asp?tipo=25">Monitor</a></li>
<li><a href="principal.asp?tipo=26">Scanner</a></li>
</ul>
</li>
<li>Impressora
<ul rel="open">
<li><a href="principal.asp?tipo=42">Jato de Tinta</a></li>
<li><a href="principal.asp?tipo=43">Laser Jet</a></li>
<li><a href="principal.asp?tipo=44">Matricial</a></li>
<li><a href="principal.asp?tipo=45">Jato de Cera</a></li>
<li><a href="principal.asp?tipo=46">Multifuncional</a></li>

</ul>
</li>
<li>Network
<ul rel="open">
<li><a href="principal.asp?tipo=27">Rede</a></li>
<li><a href="principal.asp?tipo=28">Rede Wireless</a></li>
<li><a href="principal.asp?tipo=29">Rede Bluotooth</a></li>
<li><a href="principal.asp?tipo=30">Frame Relay</a></li>
<li><a href="principal.asp?tipo=31">Fibras</a></li>

</ul>
</li>
<li>Notebook
<ul rel="open">
<li><a href="principal.asp?tipo=38">Notebook</a></li>
<li><a href="principal.asp?tipo=39">Portateis</a></li>
</ul>
</li>
<li>Novidades
<ul rel="open">
<li><a href="principal.asp?tipo=68">Novidades</a></li>
</ul>
</li>
<li>Office
<ul rel="open">
<li><a href="principal.asp?tipo=84">Access</a></li>
<li><a href="principal.asp?tipo=85">Communicator</a></li>
<li><a href="principal.asp?tipo=86">Excel</a></li>
<li><a href="principal.asp?tipo=87">Front Page</a></li>
<li><a href="principal.asp?tipo=88">Groove</a></li>
<li><a href="principal.asp?tipo=89">One Note</a></li>
<li><a href="principal.asp?tipo=90">Outlook</a></li>
<li><a href="principal.asp?tipo=91">Power Point</a></li>
<li><a href="principal.asp?tipo=92">Project</a></li>
<li><a href="principal.asp?tipo=93">Publisher</a></li>
<li><a href="principal.asp?tipo=94">Share Point</a></li>
<li><a href="principal.asp?tipo=95">Visio</a></li>
<li><a href="principal.asp?tipo=96">Word</a></li>
</ul>
</li>
<li>PDA
<ul rel="open">
<li><a href="principal.asp?tipo=9">PDA</a></li>
<li><a href="principal.asp?tipo=10">Smartphones</a></li>
</ul>
</li>
<li>Palestras
<ul rel="open">
<li><a href="principal.asp?tipo=69">Palestras</a></li>

</ul>
</li>
<li>Proxy
<ul rel="open">
<li><a href="principal.asp?tipo=72">ISA Server</a></li>
<li><a href="principal.asp?tipo=73">WinGate</a></li>
<li><a href="principal.asp?tipo=74">Squid</a></li>

</ul>
</li>
<li>Removiveis
<ul rel="open">
<li><a href="principal.asp?tipo=100">Pen Drive</a></li>
<li><a href="principal.asp?tipo=101">Flash Card</a></li>
</ul>
</li>
<li>Segurança
<ul rel="open">
<li><a href="principal.asp?tipo=40">Malwares</a></li>
<li><a href="principal.asp?tipo=41">Segurança</a></li>
</ul>
</li>
<li>Sistemas
<ul rel="open">
<li><a href="principal.asp?tipo=47">Windows Vista</a></li>
<li><a href="principal.asp?tipo=48">Windows 98</a></li>
<li><a href="principal.asp?tipo=49">Windows ME</a></li>
<li><a href="principal.asp?tipo=50">Windows XP</a></li>
<li><a href="principal.asp?tipo=51">Windows NT</a></li>
<li><a href="principal.asp?tipo=52">Windows 2000</a></li>
<li><a href="principal.asp?tipo=53">Windows 2003</a></li>
<li><a href="principal.asp?tipo=54">Windows 2008</a></li>
<li><a href="principal.asp?tipo=55">Linux</a></li>
<li><a href="principal.asp?tipo=56">Unix</a></li>
<li><a href="principal.asp?tipo=57">Mac OS X</a></li>
</ul>
</li>
<li>Web
<ul rel="open">
<li><a href="principal.asp?tipo=75">Internet Explorer</a></li>
<li><a href="principal.asp?tipo=76">Firefox</a></li>
<li><a href="principal.asp?tipo=77">Opera</a></li>
<li><a href="principal.asp?tipo=78">Netscape</a></li>
<li><a href="principal.asp?tipo=79">Safira</a></li>
<li><a href="principal.asp?tipo=80">Skype</a></li>
<li><a href="principal.asp?tipo=81">MSN</a></li>
<li><a href="principal.asp?tipo=82">Outlook Express</a></li>
<li><a href="principal.asp?tipo=83">Netmeeting</a></li>

</ul>
</li>
<li>Web Server
<ul rel="open">
<li><a href="principal.asp?tipo=102">IIS</a></li>
<li><a href="principal.asp?tipo=103">Apache</a></li>

</ul>
</li>

</ul>
</li>


<li><a href="procedimento.asp">Procedimentos</a>
<ul rel="open">
<li><a href="procedimento.asp?tipo=2">Hardwares</a></li>
<li><a href="procedimento.asp?tipo=1">Redes</a></li>
<li><a href="procedimento.asp?tipo=3">Softwares</a></li>
<li><a href="procedimento.asp?tipo=4">Sistemas</a></li>
</ul>
</li>

<li><a href="solucoes.asp">Soluções</a>
<ul rel="open">
<li><a href="solucoes.asp?solu=2">Hardwares</a></li>
<li><a href="solucoes.asp?solu=1">Redes</a></li>
<li><a href="solucoes.asp?solu=3">Softwares</a></li>
<li><a href="solucoes.asp?solu=5">Sistemas</a></li>

</ul>
</li>
<li class="menuparent"><a href="#">Suporte</a></li>

</ul>

<script type="text/javascript">

//ddtreemenu.createTree(treeid, enablepersist, opt_persist_in_days (default is 1))

ddtreemenu.createTree("treemenu1", true, 5)
ddtreemenu.createTree("treemenu2", false)
//ddtreemenu.createTree("treemenu2", true, 5)
</script>
<!--a href="principal.asp?tipo=%=rsMenu("codtipo")%>">%=rsMenu("tipo")%></a>--></font></div></td>
</tr>
</table>
<table width="126" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="126" bgcolor="#E7E7E7"><script language=javascript>function jump(form){var myindex=form.menu.selectedIndex
if(form.menu.options[myindex].value!="0"){window.open(form.menu.options[myindex].value,target="_parent");}}</SCRIPT> 


<FORM name=simplicateddotnet>
<select onChange=jump(this.form) name=menu>
<option style=background-color:"ffffff">Busca</option>
<option value="buscadicas.asp" style=background-color:"F9F9F9">Dicas 
</option>
<option value="buscaprocedimento.asp" style=background-color:"F9F9F9">Procedimentos 
</option>
<option value="buscasolucao.asp" style=background-color:"F9F9F9">Soluções 
</option>
</select>
</FORM></td>
</tr>
</table>
<font face="Arial, Helvetica, sans-serif">
<!--%
rsMenu.movenext
wend
%-->
</font></td>
<td width="568" valign="top"><blockquote>
<p><font face="Arial, Helvetica, sans-serif" class="estilo1"><strong><font size="1">
<% 
'Se houver registros ele mostrará esta parte 
if NOT rsNoticias.EOF then 
%>
<%
'"Aqui iremos validar se também possui código na querystring
'"Senão tiver, ele escreverá Dicas
if request.querystring("tipo")="" then
response.write "Dicas"
else
response.write rsNoticias("tipo")
end if
%>
</font></strong></font></p>
<p>
<% 
'"Repetir as notícias encontradas
while NOT rsNoticias.EOF 
%> 

</p>

<table width="85%" border="0" cellspacing="3" cellpadding="0">
<tr>
<td bgcolor="fcfcfc"><a href="dicas_detalhes.asp?cod=<%=rsNoticias("codnoticia")%>"><font color="#000000" size="1" face="Arial, Helvetica, sans-serif"><%=rsNoticias("data")%> -
<%=rsNoticias("tipo")%></font><font color="#000000" face="Arial, Helvetica, sans-serif"><br>
<strong><font size="1"><%=rsNoticias("titulo")%></font></strong></font></a></td>
</tr>
<tr>
<td bgcolor="fcfcfc"><font size="1" face="Arial, Helvetica, sans-serif"><a href="dicas_detalhes.asp?cod=<%=rsNoticias("codnoticia")%>" target="_parent" class="estilo1"><%=rsNoticias("chamada")%></a></font></td>
</tr>
<tr>
<td height="19"> </td>
</tr>
</table>

<p>
<%
rsNoticias.movenext
wend
%>
<% 
'"Caso o Recordset esteja vazio, ele mostrará a parte abaixo
else 
%>
</p>
</p>
<p align="center"><font size="1" face="Arial, Helvetica, sans-serif">Não existem notícias cadastradas com o tipo
selecionado</font></p>
<p>
<% end if %>

</p>
</blockquote></td>
<td width="72" bgcolor="#E7E7E7"><div align="center"><!--<a href="adm/index.asp" target="_parent"><img src="images/cadeado_pq.jpg" alt="Area de Administração do Banco de Dicas" hspace="0" vspace="0" border="0" align="top" longdesc="adm/index.asp"></a>--></div></td>
</tr>
<tr>
<td colspan="3" bgcolor="000077"><div align="right">
<table border="0" align="center" height="20" cellpadding="0" cellspacing="0">
<tr>
<th scope="col"><a href="adm/default.asp" target="_blank"><font color="#ffffff" size="1" face="Arial, Helvetica, sans-serif"><b>Administração</b></font></a><font color="#ffffff" size="1" face="Arial, Helvetica, sans-serif"><b> | | </b></font></th>
<th scope="col"><font color="#ffffff" size="1" face="Arial, Helvetica, sans-serif"><b> Desenvolvido por xxx - 2008</b></font></th>
</tr>
</table>
</div></td>
</tr>
</table>
<p> </p>
</body>
</html>

Compartilhar este post

Link para o post
Compartilhar em outros sites
Ir para a lista de tópicos ASP Clássico
×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.

  Aceito