Ir para conteúdo

POWERED BY:

Arquivado

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

Holyspear

Carregamento com problemas...

Por , em ASP Clássico

Recommended Posts

Holyspear    0

Holyspear
Postado

Bem pessoal... atualmente estou trabalhando em um album de fotos que vai carregar dinamicamente fotos de dentro de uma pasta de arquivos.

 

Eu já tinha postado algumas dúvidas aqui anteriormente sobre esse album, mais agora a coisa está um pouquinho complicada:

O álbum está carregando os arquivos, mais eu creio que o laço está fazendo um Loop a mais, isso está gerando mais um arquivo sem dados o que ocasiona o erro. O Loop carrega as imagens em uma página dinâmica ordenados por uma tabela vertical. Mais quando chega no último registro, ao invés de mostrar a imagem, mostra uma célula de uma tabela, com os tamanhos normais, mas com o erro da imagem; o que me leva a crer que o loop nesse último quadro está acontecendo uma vez a mais, e não está encontrando mais fotos dentro da pasta, então ele para.

 

Gostaria de saber se alguém poderia me ajudar nesse Loop... Vou disponibilizar o código da página para vocês terem uma idéia do que estou falando. Até mais e abraços a todos.

 

<body><form name="tumb"><% Set FSO = Server.CreateObject ( "Scripting.FileSystemObject" )Set Pasta = FSO.GetFolder ( Server.Mappath("imagens\") )Set Rs = Server.CreateObject ( "ADODB.RecordSet" )Rs.Fields.Append "nome", 200, 255Rs.OpenFor Each Arquivo In Pasta.FilesRs.AddNew Rs.Fields("nome").Value = Arquivo.NameNextRs.MoveFirstWhile Not Rs.EoFResponse.Write "<table width=""96"" height=""71"" border=""0"" align=""center""><td width=""96""><a href=""imagens/" & rs.fields("nome").value & """ target=""fotos""><img src=""imagens/" & rs.fields("nome").value & """ width=""96"" height=""71""></a></td>"Rs.MoveNext WendRs.CloseSet Rs = NothingSet Pasta = NothingSet FSO = Nothing%> </form></body>

Compartilhar este post

Link para o post
Compartilhar em outros sites

Holyspear    0

Holyspear
Postado

Nada pessoal?Eita... tow perdido. Hehehehehehehehe!!!Alguém ajuda aiiiiiii!!!

Compartilhar este post

Link para o post
Compartilhar em outros sites

Holyspear    0

Holyspear
Postado

http://forum.imasters.com.br/public/style_emoticons/default/upset.gif http://forum.imasters.com.br/public/style_emoticons/default/upset.gif

 

http://forum.imasters.com.br/public/style_emoticons/default/cry.gif http://forum.imasters.com.br/public/style_emoticons/default/cry.gif

Compartilhar este post

Link para o post
Compartilhar em outros sites

Salgado    4

Salgado
Postado

Pode ser que exista um arquivo que não seja imagem na pasta, se você está testanto em um windows XP lembre-se do arquivo "Thumbs.db" que é gerado em pastas com imagens.

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