[Resolvido] Erro em Upload

[kania 0]

Bom dia a todos, gente tenho um código com AspUpload que esta esta dando um erro maluco, na verdade não é bem um erro ele só não ostra minhas mensagens de erros:

 

Vejam o código

 

Set Upload = Server.CreateObject("Persits.Upload")

Upload.OverwriteFiles = True

On Error Resume Next
Upload.SetMaxSize 20000, true

Upload.Save "c:\home\iaki\www\imagens\logos_clientes\"
Set Imagem = Upload.Files("logo")

If Err.Number = 8 Then
	response.write "<script>alert(""Seu arquivo é muito grande. Por favor, tente novamente.\nTamanho máximo permitido: 20Kb\nSeu arquivo tem: "&calculotamanho((Upload.TotalBytes),1)&"Kb"")</script>"
Else
   If Err <> 0 Then
      MsgL =  "Ocorreu um erro: " & Err.Description
   Else
   		
   		Logo2 = "logos_clientes/150_"&IdCli&"_"&Imagem.FileName
		Logo = "150_"&IdCli&"_"&Imagem.FileName
		Logo2_85 =  "85_"&IdCli&"_"&Imagem.FileName
		Logo_85 = "logos_clientes/85_"&IdCli&"_"&Imagem.FileName
		
		'ATUALIZA AS INFORMAÇÕES
		Set Rs = server.createobject("adodb.connection")
		Rs.open = conn
		RS.execute"UPDATE cadastro_usuarios set logo = '"& Logo2 &"', logo_85 = '"& Logo_85 &"' where id_cadastro = '"&IdCli&"'"
		
		Set Rs = Nothing	
   End If

Set Upload = Nothing

Alguém sabe o porque a linha [ response.write "<script>alert(""Seu arquivo é muito grande. Por favor, tente novamente.\nTamanho máximo permitido: 20Kb\nSeu arquivo tem: "&calculotamanho((Upload.TotalBytes),1)&"Kb"")</script>" ] não é executada quando o arquivo é maior do que o determinado?

[saloeric 1]

tire o on error resume next para ver outros detalhes do erro...

Ele faz o upload do arquivo?

 

 

se ao invés de fazer

 

If Err.Number = 8 Then

fazer 

if calculotamanho((Upload.TotalBytes),1) > xxx then

[kania 0]

Opa salorecic, esqueci de mencionar acima que já tinha feito isto, tirado o on error resume next , ela da msg dizendo que o arquivo é maior do que o pré-determinado em Upload.SetMaxSize 20000, true, o teste que você sugerir também não funcionou, é estranho porque deveria dar o alert dizendo que imagem é maior do que a permitida, mas não faz nada, simplesmente passa sem dar msg.

[kania 0]

Opa pessoal, corrigi o erro, utilizei outro objeto disponível a opção File.Size, que traz o tamanho do arquivo também, assim eu utilizo a idéia do saloric e faço a verificação comparativa.

 

Obrigado galera.