Erro em galeria de fotos

[Guilherme Strich 0]

Buenas amigos,

Estou com um erro muito estranho, não sei se é de script, de permissões ou de BD.

 

Fiz um site em ASP, com BD em Access, onde o cliente vai gerenciar uma galeria de fotos.

Fiz tudo certinho, coloquei num sub-dominio http://politec.agenciabla.com/monta.asp?link=fotos para ir testando e lá funcionou normalmente.

Pois bem, tudo aprovado pelo cliente e resolvi colocar no ar os arquivos.

 

Acontece, que quando hospedei, no mesmo servidor que eu estava testando, porem no dominio do cliente, da um erro:

 

Microsoft JET Database Engine error '80004005'

Could not use ''; file already in use.

/admin/fotos/configs.asp, line 3 

 

Link: http://www.politecrs.com.br/monta.asp?link=fotos

 

Pois bem, pedi conselhos a um amigo, ele sugeriu salvar o BD do ar, exclui o que esta no ar e fazer o upload novamente.

Perfeito, funcionou corretamente no meu browser, o FIREFOX. Porem no IE e no Chrome da erro, nao abre nem o site.

Entao entrei no servidor e liberei as permissoes de escrita do banco de dados, o site funciona dai no Firefox, IE e Chrome, porem com o erro que citei acima.

 

Como posso resolver isso?

 

Desde ja agradeço quem puder me ajudar.

 

O erro que ele cita ali, no config.asp linha 3 é

 

conn.open	application("conexao"),"",""	

[~Thiago Lara 0]

Velho possivelmente seu BD access está permitindo apenas uma conexão, tá abrindo e FECHANDO todas as conexões?!

[Guilherme Strich 0]

Velho possivelmente seu BD access está permitindo apenas uma conexão, tá abrindo e FECHANDO todas as conexões?!

 

Vixi, me pegou agora.

Não sei, como posso ver isso?

[~Thiago Lara 0]

Dica off-topic: Use mysql ou sql server :)

 

Então, sobre o post, dá uma olhada na sua página para ver se você não tem nenhum arquivo incluso que esteja acessando o banco e abrindo conexão com ele sem fechar, se não me engano o access só aceita uma conexão por vez (do IIS claro)... não estou bem lembrado.

 

Mas enfim, note na sua linha 3 que você dá um .open , certifique-se de sempre depois que usar os dados do recordset que precisar, de um .close!

 

E certifique-se de que não tenha 2 opens sem antes fechar a conexão.

 

Abs

[Guilherme Strich 0]

Tiago, dei uma pesquisada, e parece estar tudo fechado corretamente.

Vou te colar todo o codigo do config.asp para voce ser, se puder, se tem algum erro no fechando.

 

<%
set conn	= server.createobject("ADODB.Connection")
conn.open	application("conexao"),"",""	

vTabFotos		= "gCategsFotos"							' Nome da Tabela das Categorias
vTabCategs		= "gFotosFotos"								' Nome da Tabela das Fotos

vLinkPasta		= "fotos"									' Nome da pasta que está o sistema
vLinkNome		= "Administrar Fotos"						' Título do Gerenciador

vPathVirtual	= "/fotos"
vPathGrand		= server.MapPath(vPathVirtual) & "\" 		' Caminho para Upload da Foto Grande
vPathMini		= vPathGrand & "miniaturas\" 				' Caminho para Upload da Foto Pequena

vGrandAltProp	= false										' Ajustar a altura da Foto Grande proporcionalmente à largura
vImgGrandLarg	= 400										' Largura da Foto Grande
vImgGrandAlt	= 300										' Altura da Foto Grande (se vAltProp = true este valor é ignorado)

vMiniAltProp	= true										' Ajustar a altura da Foto Pequena proporcionalmente à largura
vImgMiniLarg	= 120										' Largura da Foto Pequena
vImgMiniAlt		= 80										' Altura da Foto Pequena (se vAltProp = true este valor é ignorado)

'	***************************************************************************************************************************

vPopupLarg		= vImgGrandLarg + 25						' Legura do Popup da Foto
vPopupAlt		= vImgGrandAlt + 50							' Altura do Popup da Foto
vPopupNav		= true										' Botões avançar e voltar no popup

vPastaBg		= "#F0F0F0"									' Cor de Fundo da Pasta
vPastaBord		= "2px #B8B8B8;"						' Borda da Pasta

vCortMini		= true										' Cortar Fotos Pequenas para padronizar
vCortMiniLarg	= 85										' Largura do Corte da Fotos Pequenas
vCortMiniAlt	= 63										' Altura do Corte da Fotos Pequenas

vCortPasta		= true										' Cortar Miniatura da Pasta para padronizar
vCortPastaLarg	= 120										' Largura do Corte da Miniatura da Pasta
vCortPastaAlt	= 80										' Altura do Corte da Miniatura da Pasta

vPedirSenha		= false										' Solicita usuário e senha para ver as Fotos
vGrupos			= false										' Usar Grupos nas Categorias
vNomesGrupos	= "Categoria 1;Categoria 2;Categoria 3;Categoria 4"	' Nome dos grupos separados por ";"
vLegendas		= false										' Usar Legendas nas Fotos

vPastaQuebra	= 3											' Quantidade de Pastas por Linha
vPastaNaPag		= 6	     									' Quantidade de Pastas por Página

vMiniQuebra		= 3 										' Quantidade de Miniaturas por Linha
vMiniNaPag		= 45										' Quantidade de Miniaturas por Página

vPagsSessao		= 10										' Quantidade de Páginas a Exibir

vModoExib		= "FotosComPopup"							' Nome do arquivo de exibição (sem o .asp)
%>

 

Desde ja, agradeço muito a sua atencao!

[xanburzum 169]

verifique também se as permissões estão setadas corretamente.

[Guilherme Strich 0]

verifique também se as permissões estão setadas corretamente.

 

Então amigo, estao setadas corretamente todas.

[xanburzum 169]

fala ai guilherme...

 

qual o número de erro atual exibido ???