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

Erro: False em Link

cichetto

Perguntado por cichetto,

 Share

Pergunta

cichetto

cichetto

Postado
Postado

Especificamente, é a linha abaixo, que deveria me retornar com uma página com o registro específico contendo detalhes de um produto, depois de várias tentativas, o mais "proximo" que chequei foi o retorno, com a página montada, mas sem o conteudo, sendo que a url, que deveria ser algo como: Maquinas_Detalhe.asp?secao=C&registro=10, retorna com: Maquinas_Detalhe.asp?False

<a href="Maquinas_Detalhe.asp?<%=secao="&v_secao&"&registro="&v_reg1&"%>"><%=recset("artista")%></a>
A seguir o código da página inteira. Por favor, se alguém puder me ajudar, agradeço muito, desde já. Nome do documento: Maquinas_Detalhe.asp ------------------------------------ 
<%
DIM V_reg1
dim a
dim v_fim        
v_secao=request.QueryString("secao")
v_reg1=request.QueryString("registro")

v_art=request.QueryString("artista")
%>
<html>
<head>
</head>
<body bgColor="#FFFFFF" leftMargin="0" topMargin="0" text="#000000">
<script language="JavaScript">
<!--
function abrej(la,lb,lc)
{
alert("Produto Inserido em Seu Pedido de Compras");
window.open("carrinho.asp?titulo="+la+"&artista="+lb+"&valor="+lc, 'foto','top=0 left=0  scrollbars=no,toolbar=no,location=no,directories=no,status=no,menubar=no,resizable=no,width=60,height=60');
}
// -->
</script>

<table border="0" cellpadding="0" cellspacing="1" width="100%" bordercolor="#4A4A4A">
<tr>
<td>
<p align="center"><font size="2" face="Tahoma"><!--#include file="barra_superior.asp"-->
</font>
</td>
</tr>
<tr>
<td>
<table border="0" cellpadding="0" cellspacing="0" bordercolor="#4A4A4A" width="100%" height="20">
<tr>
<td height="18" valign="top">


<table border="0" cellspacing="0" width="100%" bordercolor="#121212" id="table2" cellpadding="0">
<tr>
<td valign="top" align="center" width="50%">
<p align="left">
<img border="0" src="Imagens/menu_maquinas.gif" width="300" height="30"></td>
<td valign="top" align="center" width="50%" bgcolor="#FFCC00">
<p align="right"><a href="Processa.asp">
<img border="0" src="Imagens/menu_propostas.gif" width="150" height="30"></a></td>
</tr>
<tr>
<td height="22" valign="top" align="center" colspan="2">
<hr color="#FFCC00" size="1"></td>
</tr>
<tr>
<td height="22" valign="top" align="center" colspan="2">
<table border="0" cellpadding="0" cellspacing="0" width="100%" id="table20">
    <tr>
        <td width="50%" background="Imagens/fundo_1.jpg">
        <img border="0" src="Imagens/engrenagem_fundo.gif" width="105" height="90"></td>
        <td width="50%" align="justify" background="Imagens/fundo_1.jpg">
<div align="center">
<table border="0" cellpadding="0" cellspacing="0" width="100%" id="table34">
<tr>
<td bgcolor="#CEB573">
<p align="right">
<a href="Clicks.asp?url=Default.asp">
<img border="0" src="Imagens/marca.gif" width="13" height="13"></a><img border="0" src="Imagens/importante.gif"><img border="0" src="Imagens/canto_dir_mar.gif" width="18" height="18"></td>
</tr>
<tr>
<td bgcolor="#D5C58D">
<table border="0" cellpadding="2" cellspacing="1" width="100%" id="table35">
<tr>
<td align="justify">
<table border="0" width="100%" id="table36">
<tr>
<td align="justify">
<p align="left"><font size="2">Tendo 
        interesse nesta máquina, clique em &quot;<b>Adicionar a Sua Proposta</b>&quot;, no 
        final da página. Para completar e mandar sua proposta de compra das 
        máquinas, clique acima em &quot;<b><a href="Processa.asp">Sua Proposta</a></b>&quot;.</font></td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
</div>
        </td>
    </tr>
</table>
</td>
</tr>
<tr>
<td valign="top" colspan="2">
<div align="left">
<table border="0" cellspacing="1" width="100%" id="table10">

<tr>
<td valign="top" align="left" width="60"> 
<p align="center"> </td>
<td valign="top" align="left"><font size="2" face="Tahoma">
<%
con= "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("admin/produtos.mdb") & ";"
set cbm=server.createobject("ADODB.Connection")
cbm.open con
if   v_art=false then
    vcquery="select * from Maquinas where secao='"&v_secao&"' order by data DESC" 
else
    vcquery="select * from Maquinas where artista like '" & v_art &  "%' order by data DESC" 
end if    
Set RecSet=cbm.execute(vcquery)
if not RecSet.eof then
c=0 
for b=1 to v_reg1-1
recset.movenext
            if (recset.eof) then
            c=1
            exit for     
            end if
        next
        if c=0 then
        v_fim=V_REG1+1
        a=1
        for b=1 to 1
%> 
</font>
</td>
</tr>
<tr>
<td valign="top" align="left" width="60" background="Imagens/fundo_1.jpg">
<p align="center">
<img border="0" src="Imagens/engrenagem11.gif" width="60" height="40"></p>
</td>
<td valign="top" align="left">
<table border="0" cellpadding="4" cellspacing="0" width="100%" bordercolor="#000000" id="table11">
<tr>
<td height="18" bgcolor="#CBDCE7">
<font face="Tahoma"><b>
<img border="0" src="Imagens/circulo.gif" width="18" height="21" align="left"><%=recset("artista")%></b></font></td>
</tr>
<tr>
<td height="18" bgcolor="#CBDCE7">
<p align="center">
<font size="2" face="Tahoma">
<a href="java script:imagem('admin/produtos/<%=recset("foto")%>')">
<img border="0" src="admin/produtos/<%=recset("foto")%>" width="640" height="480" alt="<%=recset("artista")%>"></a></font><p align="center">
&nbsp;</td>
</tr>
<tr>
<td valign="middle" height="18">
</td>
</tr>
<tr>
<td height="18" bgcolor="#CBDCE7">
<font size="2" face="Tahoma"> <b>Outras Informações:</b></font></td>
</tr>
<tr>
<td valign="middle" height="18">
<font size="2" face="Tahoma"> 
<%=recset("titulo")%></font></td>
</tr>
<tr>
<td height="18" align="justify" bgcolor="#CBDCE7">
<font size="2" face="Tahoma"> 
<b>Características Técnicas</b></font></td>
</tr>
<tr>
<td height="18" align="justify">
<font size="2" face="Tahoma">
<%= Replace(recset("texto"),VbCrLf,"<br>") %>
</font></td>
</tr>
<tr>
<td height="18" align="justify" bgcolor="#CBDCE7">
<font size="2" face="Tahoma">
<%
L_VALOR=0.00
L_VALOR=CCUR(Recset("valor"))
L_VALOR=cDBL(L_VALOR)
%><b>Preço: <%=FORMATCURRENCY(L_VALOR)%>&nbsp;</b></font></td>
</tr>
<tr>
<td height="18" align="justify">
<table border="0" cellpadding="2" cellspacing="1" width="100%" id="table21">
    <tr>
        <td width="50%">&nbsp;</td>
        <td width="50%" align="justify">
<div align="center">
<table border="0" cellpadding="0" cellspacing="0" width="100%" id="table40">
<tr>
<td bgcolor="#CEB573">
<p align="right">
<a href="Clicks.asp?url=Default.asp">
<img border="0" src="Imagens/marca.gif" width="13" height="13"></a><img border="0" src="Imagens/importante.gif"><img border="0" src="Imagens/canto_dir_mar.gif" width="18" height="18"></td>
</tr>
<tr>
<td bgcolor="#D5C58D">
<table border="0" cellpadding="2" cellspacing="1" width="100%" id="table41">
<tr>
<td align="justify">
<table border="0" width="100%" id="table42">
<tr>
<td align="justify">
<p align="left"><font size="2">Tendo 
        interesse nesta máquina, clique em &quot;<b>Adicionar a Sua Proposta</b>&quot;, 
        abaixo. Para completar e mandar sua proposta de compra das máquinas, 
        clique acima em &quot;<b><a href="Processa.asp">Sua Proposta</a></b>&quot;.</font></td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
</div>
        </td>
    </tr>
</table>
</td>
</tr>
<tr>
<td>
<p align="center"><font size="1"><img border="0" src="imagens/comprar.gif" onclick ="abrej('<%=replace(recset("titulo"),"'"," ")%>','<%=replace(recset("artista"),"'","  ")%>','<%=recset("valor")%>' )" ></font></td>
</tr>
<tr>
<td><hr color="#9C3908"></td>
</tr>
</table>
</td>
</tr>
<%
recset.movenext
if (recset.eof) then 
    exit for     
    end if
    next
    end if
end if  
cbm.close
  set recset=nothing
  set cbm=nothing
  V_ANTERIOR=V_REG1-1
  IF V_ANTERIOR=<1 THEN
  V_ANTERIOR=1
  END IF
%>
</form>

</table>
</div>
</td>
</tr>
<tr>
<td colspan="2" bgcolor="#E0D2A0">
<p align="center"><font size="2" face="Tahoma">
<%
if v_art=false then
response.write  "<p align='center'><a href='Maquinas_Detalhe.asp?secao="&v_secao&"&registro="&v_anterior& "' ><img border='0' src='imagens/_anteriores.gif'></a><a href='Maquinas_Detalhe.asp?secao="&v_secao&"&registro="&v_reg1+1& "'><img border='0' src='imagens/_proximos.gif'></a>"
else
response.write  "<p align='center'><a href='Maquinas_Detalhe.asp?artista="&v_art &"&registro="&v_anterior& "' ><img border='0' src='imagens/_anteriores.gif'></a><a href='Maquinas_Detalhe.asp?artista="&v_art&"&registro="&v_reg1+1& "'><img border='0' src='imagens/_proximos.gif'></a>"
end if
%></font></td>
</tr>
</table>


</td>
<td width="240" valign="top" background="imagens/fundo.jpg">
<div align="center">
<table border="0" cellspacing="0" width="95%" id="table18" cellpadding="0">

<tr>
<td valign="top" align="left" bgcolor="#8CADC6"><font size="2" face="Tahoma">
        <img border="0" src="Imagens/Titulo_Outras.gif" width="180" height="21"><%
con= "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("admin/produtos.mdb") & ";"
set cbm=server.createobject("ADODB.Connection")
cbm.open con
if   v_art=false then
    vcquery="select * from Maquinas where secao='"&v_secao&"' order by artista" 
else
    vcquery="select * from Maquinas where artista like '" & v_art &  "%' order by artista" 
end if    
Set RecSet=cbm.execute(vcquery)
if not RecSet.eof then
c=0 
for b=1 to v_reg1-1
recset.movenext
            if (recset.eof) then
            c=1
            exit for     
            end if
        next
        if c=0 then
        v_fim=V_REG1+100
        a=1
        for b=1 to 100
%>  
</font>
</td>
</tr>
<tr>
<td valign="top" align="left">
<table border="0" cellspacing="1" width="100%" bordercolor="#000000" id="table19">
<tr>
<td height="18" bgcolor="#FFCC00">
<font face="Tahoma" size="1"><b>
<a href="Maquinas_Detalhe.asp?<%=secao="&v_secao&"&registro="&v_reg1&"%>"><%=recset("artista")%></a>

</tr>
</table>
</td>
</tr>
<%
recset.movenext
if (recset.eof) then 
    exit for     
    end if
    next
    end if
end if  
cbm.close
  set recset=nothing
  set cbm=nothing
  V_ANTERIOR=V_REG1-10
  IF V_ANTERIOR=<1 THEN
  V_ANTERIOR=1
  END IF
%>
</form>

</table>
</div>
<p align="center">
<font size="2" face="Tahoma">
<!--#include file="Direita.asp"--></font>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td>
<p align="center">
<font size="2" face="Tahoma"><!--#include file="totem.asp"--></font></td>
</tr>
</table>

<p><font size="2" face="Tahoma"><script language="JavaScript"><!--

function imagem(arquivo)
{
window.open(arquivo, 'foto','top=10 left=10 scrollbars=yes,toolbar=no,location=no,directories=no,status=no,menubar=no,resizable=no,width=690,height=510');}

// --></script></font></p>
</body>

Link para o comentário
Compartilhar em outros sites

2 respostass a esta questão

Posts Recomendados

  • 0
cichetto

cichetto

Postado
  • Autor
Postado
não olhei seu código mais vamos lá... experimente:

<a href="Maquinas_Detalhe.asp?secao=<%=v_secao&"&registro="&v_reg1%>"><%=recset("artista")%></a>

Bareta: Não, não funciona, já tentei isso, o resultado ainda é: Maquinas_Detalhe.asp?False, com a página sem apresentar o resultado.

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,6k
×
×
  • Criar Novo...