Ir para conteúdo
Fórum Script Brasil

cichetto

Membros
  • Total de itens

    2
  • Registro em

  • Última visita

Tudo que cichetto postou

  1. cichetto

    Erro: False em Link

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

    Erro: False em Link

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