Tenho uma página ASP que apresenta uma Foto Grande do Produto e em baixo um Carousel JQuery onde apresenta a Miniatura da Foto de todos os Produtos do Grupo.
Tudo estava bem até que percebi o Problema. quando tenho um Grupo de Produtos onde existe somente 1 ou 2 Produtos cadastrados a apresentação da Miniatura não ocorre, e para piorar não dá nem erro, simplesmente o quadro aparece vazio.
Segue abaixo trechos do Código
' Select que recebe e identifica qual é o Grupo selecionado
TabProdutoGrupo = Server.CreateObject("adodb.recordset")
sql = "select * from ProdutoGrupo where ProdutoGrupoID = "&Request.QueryString("ID")&""
set TabProdutoGrupo = Conexao.execute(sql)
' Variável que recebe o Código do Grupo
CodigoProdutoGrupo = CStr(TabProdutoGrupo("ProdutoGrupoID"))
' Select que carrega os Produtos ligados ao Grupo selecionado ondenando pelo campo ProdutoID Ascendente
TabProduto = Server.CreateObject("adodb.recordset")
sql = "select * from Produto where ProdutoGrupoID = "&CodigoProdutoGrupo&" order By ProdutoID ASC"
set TabProduto = Conexao.execute(sql)
<!-- Início da Div de apresentação das miniaturas -->
<div id="carosel" style="border:solid">
<div class="carosel">
<ul>
<%
IF Not TabProduto.EOF Then
Count = 0
Do While Not TabProduto.EOF
CodigoProduto = CStr(TabProduto("ProdutoID"))
Foto = TabProduto("ProdutoFoto")
FotoPq = TabProduto("ProdutoFotoPequena")
ProdutoNome = TabProduto("ProdutoNome")
Response.Write("<li><img src='ProdutoGrupo/Produtos/"&FotoPq&"' width='147' height='81' border='0' /></li>")
TabProduto.MoveNext
count=count+1
loop
Else
Response.Write("não achou nada")
End IF
%>
</ul>
</div>
</div>
<!-- Fim da Div de apresentação das miniaturas -->
Desde já agradeço qualquer sugestão.Atenciosamente
