Ir para conteúdo

POWERED BY:

Arquivado

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

fabiosc80

Problemas com integração ASP + JS

Por , em ASP Clássico

Recommended Posts

fabiosc80    0

fabiosc80
Postado

Pessoal vejam esse site:

 

VEJAM SÓ

 

Porque meu select ta mostrando mais de uma empresa e categoria repetida?

 

E Pq nao consigo listar todas as categorias e subcategorias?

 

Abaixo segue o código eu nao estou sabendo fazer o loop do do while acho tb...

 

Como faço?

 

PS: Não to com dúvida no JS e SIM no ASP

 

ASP [/tr][tr]<!--#include file="conexao.asp"-->

<%

dim Sql,TB,BC

 

'string para exibir os dados

 

Sql = "SELECT distinct Emp.CodigoEmpresa, Emp.Nome, Cat.CodigoCategoria, Cat.NomeCategoria, Sub.CodigoSubCategoria, Sub.NomeSubCategoria FROM (Empresa Emp RIGHT JOIN Categoria Cat ON Emp.CodigoEmpresa = Cat.CodigoEmpresa) LEFT JOIN SubCategoria Sub ON Cat.CodigoCategoria = Sub.CodigoCategoria"

 

%>

<html>

<head>

<title>:: NO MUNDO DA LUA ::</title>

 

<meta NAME="description" CONTENT="Insert Description Here">

<meta NAME="keywords" CONTENT="Insert Keywords Here">

 

<script language="Javascript" type="text/javascript">

function openWin()

{

var value = "main.html";

 

var nav = navigator.appVersion.charAt(0);

var nap = navigator.appName;

var xx = screen.width / 2 - 500;

var yy = screen.height / 2 - 400;

window.open(value,'DCFWin','resizable=no,screenX='+xx+',screenY='+yy+',width=500,height=400,status=no,location=no,toolbar=no,menubar=no,scrollbars=no');

}

</script>

 

<style type="text/css">

<!--

BODY {

background-image: URL(images/bg_sp.jpg);

background-repeat: repeat-x}

-->

</style>

 

<link rel="stylesheet" href="style1.css" type="text/css" media="screen">

 

</head>

 

<body marginwidth="0" marginheight="0" leftmargin="0" topmargin="0" scroll="no">

 

<table border="0" width="100%" cellspacing="0" cellpadding="0">

<tr>

<td width="50%" valign="top">

<object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000"

codebase="http://active.macromedia.com/flash4/cabs/swflash.cab#version=4,0,0,0"

id="Movie1" width="433" height="219">

<param name="_cx" value="11456">

<param name="_cy" value="5794">

<param name="FlashVars" value="-1">

<param name="Movie" value="movie1.swf">

<param name="Src" value="movie1.swf">

<param name="WMode" value="Window">

<param name="Play" value="-1">

<param name="Loop" value="-1">

<param name="Quality" value="High">

<param name="SAlign" value>

<param name="Menu" value="-1">

<param name="Base" value>

<param name="AllowScriptAccess" value="always">

<param name="Scale" value="ShowAll">

<param name="DeviceFont" value="0">

<param name="EmbedMovie" value="0">

<param name="BGColor" value>

<param name="SWRemote" value><embed name="movie1" src="movie1.swf" quality="high" bgcolor="#FFFFFF" width="433" height="219" type="application/x-shockwave-flash" pluginspage="http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash">

</object>

 

</td>

<td width="50%">

<p align="center"><object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000"

codebase="http://active.macromedia.com/flash4/cabs/swflash.cab#version=4,0,0,0"

id="anima1" width="225" height="190" align="right">

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

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

<param name="bgcolor" value="#FFFFFF">

<embed name="anima1" src="anima1.swf" quality="high" bgcolor="#FFFFFF"

width="225" height="190"

type="application/x-shockwave-flash"

pluginspage="http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash">

</embed>

</object>

</td>

</tr>

</table>

<table border="0" width="100%" cellspacing="0" cellpadding="0">

<tr>

<td width="100%" background="images/top3.jpg" height="25">

<table border="0" width="100%" cellspacing="0" cellpadding="0">

<tr>

<td width="84%">

<p align="center"><applet Code=apPopupMenu Archive=apPopupMenu.jar Width=602 Height=20 MAYSCRIPT>

<param name="Copyright" value="Apycom Software - www.apycom.com">

<param name="font" value="Arial,12,0">

<param name="fontColor" value="000000">

<param name="fontHighColor" value="ff0000">

<param name="isHorizontal" value="true">

<param name="overSound" value="pix/put.au">

<param name="solidArrows" value="true">

<param name="clickSound" value="pix/empty.au">

<param name="systemSubFont" value="false">

<param name="buttonType" value="1">

<param name="status" value="link">

<param name="alignText" value="left">

<param name="backColor" value="d6d6d6">

<param name="backHighColor" value="d6d6d6">

<param name="menuItems" value="

<%AbreBanco

Set TB = BC.Execute(sql)%>

{ ,index.html,_self,pix/new1-05.gif}

 

{-}

 

{A Empresa,java script:open('aempresa.html','_blank','scrollbars=no,width=500,height=400,status=no,location=no,toolbar=no,menubar=no,'),_blank,pix/new4-038.gif}

 

{-}

 

{Produtos,pix/setup.gif}

 

<%

Do While not TB.EOF

%>

 

 

{|<%=TB("

Nome")%>}

 

 

{||<%=TB("

NomeCategoria")%>,java script:open('produtos/allure/allure.html','_blank','scrollbars=no,width=500,height=400,status=no,location=no,toolbar=no,menubar=no,'),_blank}

<%If TB("

CodigoSubCategoria") <> "" then %>

{||<%=TB("

NomeCategoria")%>}

{|||<%=TB("

NomeSubCategoria")%>,java script:open('produtos/feiticoo/casaldoamor.html','_blank','scrollbars=no,width=500,height=400,status=no,location=no,toolbar=no,menubar=no,'),_blank}

<%End if%>

 

 

<%

TB.MoveNext

Loop

%>

 

 

 

{||<%=TB("

Categoria.NomeCategoria")%>,java script:open('produtos/allure/aromatizadores.html','_blank','scrollbars=no,width=500,height=400,status=no,location=no,toolbar=no,menubar=no,'),_blank}

 

 

 

{-}

 

{Cadastro,pix/new4-0034.gif}

 

{|Cadastre-se para Acessar nossa Loja Virtual.,java script:open('cadastrosenha.html','_blank','scrollbars=no,width=500,height=400,status=no,location=no,toolbar=no,menubar=no,'),_blank}

{-}

{Loja Virtual,http://www.nomundodalua.com.br/inloja,_blank,pix/new4-0035.gif}

{-}

{Fale Conosco,java script:open('faleconosco.html','_blank','scrollbars=no,width=500,height=400,status=no,location=no,toolbar=no,menubar=no,'),_blank,pix/mail.gif}

{-}

"

>

</applet></td>

<td width="16%" valign="middle">

<p align="right">

[/tr]

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