Usamos cookies para medir audiência e melhorar sua experiência. Você pode aceitar ou recusar a qualquer momento. Veja sobre o iMasters.
Bom dia galera, fiz uma página chamada edição anteriores. Nela eu uso um link para uma página asp com a seguinte url
http://localhost/aqui/templates/capa.asp?edicao=605
Até ai tudo bem porém tá dando erro no meu querystring.
* Tipo de erro:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E07)
[Microsoft][Driver ODBC para Microsoft Access] Tipo de dados imcompatível na expressão de critério.
/aqui/templates/capa.asp, line 31
O que pode tá havendo?
capa.asp
<%
Option Explicit
'Criando variáveis
Dim localbd, meubd, rsNoticias, rsNoticias2, rsOutras, rsedicao, rsSocial, rsAconteceu, RsGrampos, RsEsportes, RsArtigos, Rscapa, RsBanner, rsNoticias3
'Indicando local do Banco de dados
localbd="driver={microsoft access driver (*.mdb)};dbq=" & server.mappath("../bd/bd_aqui.mdb")
'Setando conexões
set meubd=server.createobject("adodb.connection")
set rsNoticias=server.createobject("adodb.recordset")
set rsNoticias2=server.createobject("adodb.recordset")
set rsNoticias3=server.createobject("adodb.recordset")
set rsOutras=server.createobject("adodb.recordset")
set rsedicao=server.createobject("adodb.recordset")
set rsSocial=server.createobject("adodb.recordset")
set rsAconteceu=server.createobject("adodb.recordset")
set rsGrampos=server.createobject("adodb.recordset")
set rsEsportes=server.createobject("adodb.recordset")
set rsArtigos=server.createobject("adodb.recordset")
set rsCapa=server.createobject("adodb.recordset")
set rsBanner=server.createobject("adodb.recordset")
meubd.Open localbd
'Esta SELECT irá selecionar as matérias com a última edição cadastrada
rsedicao.open "Select * from noticias order by edicao desc", meubd
'Esta SELECT irá selecionar a manchete da capa
rsNoticias.Open "SELECT * from noticias, noticias_tipo where edicao="&request.querystring("edicao")&" and destaquecapa=2 and codtipo=noticias.tipo", meubd
rsNoticias2.Open "SELECT * from noticias, noticias_tipo where edicao = (select max(edicao) from noticias) and destaquecapa=1 and codtipo=noticias.tipo order by subtitulo", meubd
rsNoticias3.Open "SELECT * from noticias, noticias_tipo where edicao = (select max(edicao) from noticias) and destaquecapa=3 and codtipo=noticias.tipo order by subtitulo", meubd'Agora selecionaremos todos os outros registros onde o tipo é igual ao da notícia selecionada
rsOutras.Open "SELECT * from noticias where destaquecapa=1 order by subtitulo", meubd
rsSocial.Open "SELECT * from noticias where tipo=13 order by edicao desc", meubd
rsAconteceu.Open "SELECT * from noticias where tipo=1 order by edicao desc", meubd
rsArtigos.Open "SELECT * from noticias where tipo=2", meubd
rsGrampos.Open "SELECT * from noticias where tipo=8 order by edicao desc", meubd
rsEsportes.Open "SELECT * from noticias where tipo=7 order by edicao desc", meubd
'rsCapa.open "Select * from capa where edicao="& rsNoticias("edicao") &" order by edicao desc", meubd
rsBanner.open "Select * from banner", meubd%>
<html>
<head>
<title>aQui Online</title>
</head>
<link rel="stylesheet" href="../css/capa.css" type="text/css" title="Editorias" media="all"/>
<body>
<span class="style2"></span>
<div id="geral">
<div id="topo">
<div id="logo"><img src="../imagens/logo_aqui.jpg" width="200" height="86" border="0" usemap="#Map">
<map name="Map">
<area shape="rect" coords="4,2,197,83" href="index.asp" target="_parent" alt="Página Principal">
</map>
</div>
<div id="banner">
<div align="center"><img src="<%=rsBanner("banner_grande")%>"></div>
</div>
<div id="data">
<form method="POST" action="buscar.asp">
<div>
<span class="traco3">------------------------------------------------------------------------------------------------------------------------------------------------------</span><br>
Volta Redonda / Barra Mansa - <%=rscapa("data")%> - EdiÇÃo nº <%=rsNoticias("edicao")%>
<span class="traco2">----------------------</span>
<input name="Submit" type="submit" value="Busca">
<input name="noticias" type="text" size="15">
</div>
</form>
<span class="traco3">------------------------------------------------------------------------------------------------------------------------------------------------------</span><br>
</div>
</div>
<div id="menu1">
<ul id="menu">
<li><a href="index.asp">Capa</a></li>
<li><a href="aconteceu.asp?cod=<%=rsAconteceu("codnoticia")%>">Aconteceu</a></li>
<li><a href="noticias.asp?tipo=2">Artigos</a></li>
<li><a href="noticias.asp?tipo=3">Barra Mansa</a></li>
<li><a href="noticias.asp?tipo=4">Cartas</a></li>
<li><a href="noticias.asp?tipo=5">CSN</a></li>
<li><a href="noticias.asp?tipo=6">Especial</a></li>
<li><a href="esportes.asp?cod=<%=rsEsportes("codnoticia")%>">Esportes</a></li>
<li><a href="grampos.asp?cod=<%=rsGrampos("codnoticia")%>">Grampos</a></li>
<li><a href="noticias.asp?tipo=9">Polícia</a></li>
<li><a href="noticias.asp?tipo=10">Política</a></li>
<li><a href="noticias.asp?tipo=11">Região</a></li>
<li><a href="noticias.asp?tipo=12">Rio Claro</a></li>
<li><a href="social.asp?cod=<%=rsSocial("codnoticia")%>">Social</a></li>
<li><a href="noticias.asp?tipo=14">Volta Redonda</a></li>
<li><a href="class/tudoaqui.asp">Classificados</a></li>
<li><a href="arquivo.asp">Edições Anteriores</a></li>
<li><a href="expediente.asp">Expediente</a></li>
</ul>
<br>
<div id="semana">
<span class="semana">EDIÇÃO DA SEMANA</span><br>
<img src="<%=RsCapa("capa_menor")%>" hspace="0" vspace="5" border="1">
<a href="<%=Rscapa("capa_pdf")%>">
<span class="pdf"> 1ª Capa em PDF </span></a>
</div>
<div id="publicidade">
<span class="semana">PUBLICIDADE</span>
<%
while NOT rsBanner.EOF
%>
<img src="<%=rsBanner("banner_menores")%>" vspace="5">
<%
rsBanner.movenext
wend
%>
</div>
</div>
<div id="conteudo">
<div id="foto"><img src="<%=rsNoticias("foto")%>" border="1"></div>
<h1 class="antetitulo"><%=rsNoticias("tipo")%></h1>
<h1><a href="<%=rsNoticias("tipo2")%>.asp?cod=<%=rsNoticias("codnoticia")%>"><%=rsNoticias("subtitulo")%></a></h1>
<p><%=rsNoticias("chamada")%></p>
</div>
<div id="box4">
<h6 class="traco">- - - - - - - - - - - - - - - - - - - - - - - - - - -
- - - - - - - - - - - - - - - - - - - - - - - - - - - </h6>
<%
'iremos fazer uma repetição das Notícias
while NOT rsNoticias2.EOF
%>
<h1 class="antetitulo"><%=rsNoticias2("tipo")%></h1>
<h6><a href="<%=rsNoticias2("tipo2")%>.asp?cod=<%=rsNoticias2("codnoticia")%>"><%=rsNoticias2("subtitulo")%></a></h6>
<h6 class="traco">- - - - - - - - - - - - - - - - - - - - - - - - - - -
- - - - - - - - - - - - - - - - - - - - - - - - - - - </h6>
<%
rsNoticias2.movenext
wend
%>
</div>
<div id="box2">
<%
while not rsNoticias3.eof
%>
<div id="box3">
<img src="<%=rsNoticias3("chamadas_foto")%>" border="1">
<h5><a href="<%=rsNoticias3("tipo2")%>.asp?cod=<%=rsNoticias3("codnoticia")%>"><%=rsNoticias3("subtitulo")%></a></h5>
</div>
<%
rsNoticias3.movenext
wend
%>
<br>
<p>NEWSLETTER</p>
<label><input name="textfield" type="text" size="23">
</label>
</div>
<div id="rodape">
<p>© Jornal aQui. Todos os direitos reservados. Este material não pode ser publicado, reescrito ou redistribuído sem prévia autorização.</p>
</div>
</div>
</body>
</html>'Limpando as variáveis
set meubd= nothing
set rsNoticias= nothing
set rsEdicao= nothing
set rsoutras= nothing
%>
Carregando comentários...