Ir para conteúdo

POWERED BY:

Arquivado

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

ricardo coelho designer

UpLOad - Verifica o tamanho do arquivo no usuário

Recommended Posts

Estou fazendo um sistema de upload, preciso limitar o tamanho do arquivo. Preciso verificar o tamanho do arquivo no cliente , ou seja, antes de enviar para o servidor.

 

Estou quebrando a cabeça com o código abaixo: Alguém poderia me ajudar?

 

<%if NOT session("logged") = 1 thenresponse.redirect "index.asp"response.endend if%><%url_conexao = "e:\home\vitrinepublicitaria\dados\vitrine.mdb"set rs = Server.CreateObject("ADODB.Connection")set Conn = Server.CreateObject("ADODB.Connection")Conn.open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&url_conexaoid = Request.QueryString("quantidade")Set rs = Conn.Execute("SELECT *FROM midiaImpressaB WHERE quantidade="&id)' Verifica se a imagem existe no servidorSet arq = Server.CreateObject("Scripting.FileSystemObject")arquivo = "e:\home\vitrinepublicitaria\web\" & session("cadlogin")&"\"&rs("imagem")if arq.FileExists(arquivo) = true then'SE A IMAGEM EXISTIR NO SERVIDOR EXCLUI A IMAGEMSet objFSO = Server.CreateObject("Scripting.FileSystemObject")arqDel = "e:\home\vitrinepublicitaria\web\" & session("cadlogin")&"\"&rs("imagem")objFSO.DeleteFile arqDel, True' VERIFICA EXTENÇÃO DO ARQUIVO QUE ESTÁ SENDO ENVIADO (JPG, GIF)Set fs=Server.CreateObject("Scripting.FileSystemObject")Response.Write(fs.GetExtensionName("" & request.form("imagem")&"))FS.GetExtensionName("e:\home\vitrinepublicitaria\web\" & session("cadlogin")&"\"&rs("imagem"))set fs=nothing' VERIFICA TAMANHO DO ARQUIVO QUE ESTÁ SENDO ENVIADO (KB, MB)' OBS.: SE NOS 2 ITENS ANTERIORES A VERIFICAÇÃO FOR DE NÃO TER AS EXTENSÃO JPG... OU O TAMANHO EM KB... RETORNA MENSAGEM QUE O ARQUIVO EM ANEXO NÃO ESTÁ DE ACORDO COM AS ESPECIFÍCAÇÕES DO SITE.' PARA DIMINUIR O TAMANHO FISICO DO ARQUIVO É FEITA UMA CÓPIA NO SERVIDOR COM NOME ALTERADO DO ARQUIVO ENVIADO PELO USUARIO EX.: O ARQUIVO ESTÁ COM O NOME DE IMAGEM.JPG ALTERA PARA ARQUIVODOUSUARIO.JPG' ATUALIZA O NOME DO ARQUIVO NO BDelseresponse.write "O arquivo "& arquivo &" NÃO existe."end if%>

Compartilhar este post


Link para o post
Compartilhar em outros sites

antes de enviar para o servidor somente usando linguagem que rode no client. Tente algo no forum de javascriptPs: se não me engano no laboratório de scripts asp, no tópico de upload sem comopentes, tem uma funçaõ em javascript pra verificar o tamanho do arquivo

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.