Ir para conteúdo

POWERED BY:

Arquivado

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

Adilson_Web_2007

[Resolvido] Link não abre o arquivo em asp

Por , em ASP Clássico

Recommended Posts

Adilson_Web_2007    0

Adilson_Web_2007
Postado

Olá pessoal fiz um upload e esta funciomando perfeitamente. O meu problema é na hora de abrir, quando eu clico no link ele da esse erro:

 

 

HTTP/1.1 404 Object Not Found o que pode ser já dei um response.write() no caminho e ta vindo certo, copie e colei o caminho no meu computador e abriu normalmente, mas clicando mno link não abre alguém pode me ajudar por favor.

 

Segue o código:

 

 

ASP
if rsArquivo.eof then

%>

<script>

alert("Não exite nenhum arquivo!");

window.close();

</script>

<%

else

nome = rsArquivo("nome_arquivo")

caminho = rsArquivo("caminho_arquivo")

 

%>

<tr bgcolor="#DEDFDE" class="style1">

<td width="91%" class="style2"><div align="center">Visualizar Arquivo(s)</div></td>

</tr>

<%

 

do while not rsArquivo.eof

vit = caminho &""& nome

 

%>

<tr bgcolor="#DEDFDE">

 

<td><a href="vit"><%=rsArquivo("nome_arquivo")%></a></td> aqui eu coloco a variavel com o nome do caminho e o endereço.

</tr>

<%

rsArquivo.movenext

loop

end if

Compartilhar este post

Link para o post
Compartilhar em outros sites

Adilson_Web_2007    0

Adilson_Web_2007
Postado

Vem do banco de dados, eu estou precisando muito disso tenho que entregar isso hoje, o que você puder fazer pór mim eu agradeço, acho que o problema está no link vit e aparece diretinho o caminhjo , agora não entendo porque não abre.

 

Segue o codigo completo:

 

 

<%@LANGUAGE="VBSCRIPT"%><%Option explicit%><!--#Include file="conexao/conexao.asp"--><%response.expires=0dim conexaoDataBase,ConnString,sqlArquivo,rsArquivo,codigo_contrato,objStream,nome_aquivo,nome,caminho,vitcodigo_contrato = trim(Request.QueryString("codigo_contrato"))call abreConexaosqlArquivo ="select * from nomearquivo where codigo_contrato='"&codigo_contrato&"' "set  rsArquivo = conexaoDataBase.execute(sqlArquivo)%> <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN""http://www.w3.org/TR/html4/loose.dtd"><html><head><title></title><meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"><META NAME="TITLE" CONTENT="Honda Dias Estevão Ferreira Advogados"><META NAME="DESCRIPTION" CONTENT="Consultoria jurídica em direito tributário, cível e trabalhista.Sócios: Helcio Honda , Oziel Estevão, Agostinho Pinto Dias Júnior."><META NAME="KEYWORDS" CONTENT="Hondadef, Direito, Consultoria jurídica, Advocacia, Advogados, HDEF Advogados, Honda Advogados, HDEF"><style type="text/css"><!--.style1 {font-size: x-small;	font-family: Verdana, Arial, Helvetica, sans-serif;}a:link {	color: #990000;	text-decoration: none;}a:visited {	text-decoration: none;	color: #990000;}a:hover {	text-decoration: underline;	color: #990000;}a:active {	text-decoration: none;	color: #990000;}.style2 {font-size: 12px}--></style><link rel="stylesheet" type="text/css" href="css/hondadef.css"><style type="text/css"><!--.style4 {font-size: x-small}--></style></head><link rel="stylesheet" type="text/css" href="contratos/css/hondadef.css"><body><div align="center">  <table width="650" height="400" align="center">	<tr>	<td align="left" valign="top" bgcolor="#FFFFFF" >	<img src="imagem/honda.jpg">	<table width="100%" border="0" align="center"><% if rsArquivo.eof then%><script>alert("Não exite nenhum arquivo!");window.close();</script><%elsenome = rsArquivo("nome_arquivo")caminho = rsArquivo("caminho_arquivo")%><tr bgcolor="#DEDFDE" class="style1"><td width="91%" class="style2"><div align="center">Visualizar Arquivo(s)</div></td></tr><%do while not rsArquivo.eof vit = caminho &"\"& nome%><tr bgcolor="#DEDFDE"><td><a href="vit"><%=rsArquivo("nome_arquivo")%></a></td></tr><%rsArquivo.movenextloopend if%></table>	  			</tr>	  </table></div></body></html><%call fechaConexao%>

Compartilhar este post

Link para o post
Compartilhar em outros sites

Ted k'    126

Ted k'
Postado

tentou colocar a barra invertida??

 

ASP
vit = caminho &"/"& nome

 

pois se vai aparecer no href tem que ser assim:

 

Ex:

[url="http-~~-//december.com/html/4/element/a.html"]<a[/url] href="teste/imagem.gif">

Compartilhar este post

Link para o post
Compartilhar em outros sites

Adilson_Web_2007    0

Adilson_Web_2007
Postado

Eu fiz como você disse não deu certo, da o memso erro. Não sei mais o que fazer.-----------------------------------------------------------------------------------Post Mesclado-----------------------------------------------------------------------------------Eu dei um replace para inverter todas as barras , mas mesmo assim comtinua dando o mesmo erro:C:/Inetpub/wwwroot/contratos/Arquivos/compra e venda.doc

Compartilhar este post

Link para o post
Compartilhar em outros sites

Ted k'    126

Ted k'
Postado

Rapaz pra mim está estranho isso, e tbm eu faço para substituir o nome do arquivo, para não conter espaços ou caracteres inválidos!!!

Compartilhar este post

Link para o post
Compartilhar em outros sites

Adilson_Web_2007    0

Adilson_Web_2007
Postado

Amigo eu sei que você está me ajudando muit e agradeço, teria alguma forma diferente sei lá vou fazer o seguinte vou postar o código do upload e o de mostrar veja as vezes pode conter algo de erra no outro;

 

Esse código e o que salva no diretorio e no banco o caminho com o nome da arquivo.

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%><!--#include file="conexao/conexao.asp"--><!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd"><%call abreconexaodim conexaoDataBase,ConnString,objUpload,objNextFile,caminho,codigo_contrato,nome_aruivo,sql_insere,tab_insere,CaminhoFinalcodigo_contrato = request.QueryString("codigo_cliente")Set objUpload = server.CreateObject("Dundas.Upload.2")objUpload.MaxFileSize = 1048576objUpload.UseUniqueNames = falseSet objNextFile = objUpload.GetNextFile()'Utilizamos o caminho virtual que determina onde serão salvos os arquivos carregados.caminho ="C:\Inetpub\wwwroot\contratos\Arquivos"caminho = replace(caminho,"\","\\") If objUpload.FileExists(caminho & "\" & objNextFile.FileName) Then%><script language="javascript">window.alert('O arquivo já se encontra em nossa base de dados!');window.close();//window.location.href="../default.asp"; </script><% Else'CaminhoFinal = Replace(caminho, "C:InetpubwwwrootcontratosArquivos", "C:Inetpub\wwwroot\contratos\Arquivos")'objNextFile.Save CaminhoFinal objNextFile.Save caminho'response.write("INSERT INTO nomearquivo (nome_arquivo, caminho_arquivo, codigo_contrato) VALUES ('"& objNextFile.FileName &"', '"& caminho &"' , '"&codigo_contrato&"')")'response.endsql_insere = "INSERT INTO nomearquivo (nome_arquivo, caminho_arquivo, codigo_contrato) VALUES ('"& objNextFile.FileName &"', '"& caminho &"' , '"&codigo_contrato&"')"'sql_insere = "INSERT INTO nomearquivo (nome_arquivo, caminho_arquivo, codigo_contrato) VALUES ('"& objNextFile.FileName &"', '"& caminho &"' , '"&codigo_contrato&"')"conexaoDataBase.execute(sql_insere)%><script language="javascript">window.alert('Arquivo salvo com sucesso');window.close();</script><%End IfSet objUpload = Nothing%>

Esse é o arquivo que mostra.

<%@LANGUAGE="VBSCRIPT"%><%Option explicit%><!--#Include file="conexao/conexao.asp"--><%response.expires=0dim conexaoDataBase,ConnString,sqlArquivo,rsArquivo,codigo_contrato,objStream,nome_aquivo,nome,caminho,vitcodigo_contrato = trim(Request.QueryString("codigo_contrato"))call abreConexaosqlArquivo ="select * from nomearquivo where codigo_contrato='"&codigo_contrato&"' "set  rsArquivo = conexaoDataBase.execute(sqlArquivo)%> <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN""http://www.w3.org/TR/html4/loose.dtd"><html><head><title></title><style type="text/css"><!--.style1 {font-size: x-small;	font-family: Verdana, Arial, Helvetica, sans-serif;}a:link {	color: #990000;	text-decoration: none;}a:visited {	text-decoration: none;	color: #990000;}a:hover {	text-decoration: underline;	color: #990000;}a:active {	text-decoration: none;	color: #990000;}.style2 {font-size: 12px}--></style><link rel="stylesheet" type="text/css" href="css/hondadef.css"><style type="text/css"><!--.style4 {font-size: x-small}--></style></head><link rel="stylesheet" type="text/css" href="contratos/css/hondadef.css"><body><div align="center">  <table width="650" height="400" align="center">	<tr>	<td align="left" valign="top" bgcolor="#FFFFFF" >	<img src="imagem/honda.jpg">	<table width="100%" border="0" align="center"><% if rsArquivo.eof then%><script>alert("Não exite nenhum arquivo!");window.close();</script><%elsenome = rsArquivo("nome_arquivo")caminho = rsArquivo("caminho_arquivo")caminho = replace(caminho,"C:\Inetpub\wwwroot\contratos\Arquivos","C:/Inetpub/wwwroot/contratos/Arquivos")%><tr bgcolor="#DEDFDE" class="style1"><td width="91%" class="style2"><div align="center">Visualizar Arquivo(s)</div></td></tr><%do while not rsArquivo.eof vit = caminho &"/"& nome%><tr bgcolor="#DEDFDE"><td><a href="<%=vit%>"><%=rsArquivo("nome_arquivo")%></a></td></tr><%rsArquivo.movenextloopend if%></table>	  			</tr>	  </table></div></body></html><%call fechaConexao%>

O que você puder fazer por mim eu agradeço muito.

 

-----------------------------------------------------------------------------------

Post Mesclado

-----------------------------------------------------------------------------------

 

Consegui eu fiz assim e deu certo segue, quem sabe ajuda alguém, agradeço à todos pela força.

 

<td><a href="Arquivos/<%=rsArquivo("nome_arquivo")%>"><%=rsArquivo("nome_arquivo")%></a></td>

Mais uma vez muito obrigado!

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