Mudar "Response.write" por Alert... como?

[Igor FV 0]

Amigos como poderia trocar o "Response.write" por "alert" nesse codigo abaixo?

 

If byteCount > 500000 Then	Response.write "Tamanho do arquivo: <font color='red'>" & byteCount & "</font><br>" 	Response.Write "<center>Não deu certo... tamanho da Imagem e/ou Áudio não pode ser maior que 500 Kb...<br></center>"	Response.EndEnd If

 

Vlw...

[Mário Monteiro 179]

If byteCount > 500000 Then%><script language="JavaScript"><!--alert("Tamanho do arquivo: <%=byteCount%> \n\n Não deu certo... tamanho da Imagem e/ou Áudio não pode ser maior que 500 Kb...")//--></script><% Response.EndEnd If

[Igor FV 0]

If byteCount > 500000 Then%><script language="JavaScript"><!--alert("Tamanho do arquivo: <%=byteCount%> \n\n Não deu certo... tamanho da Imagem e/ou Áudio não pode ser maior que 500 Kb...")//--></script><% Response.EndEnd If

Vlw amigo. Coloquei esse IF aq no meu codigo e funcionou, mas ao inves dele exxibir essa mensagem e nao fazer o upload da foto e depois voltar para a pagina anterior, e le exibe o alert e faz o upload da imagem, eu teria que por um ELSE com RESPONSE.REDIRECT nesse IF né amigo?Como ficaria o codigo entao?Vlw...

[jrcardozo 4]

If byteCount > 500000 Then%><script language="JavaScript"><!--alert("Tamanho do arquivo: <%=byteCount%> \n\n Não deu certo... tamanho da Imagem e/ou Áudio não pode ser maior que 500 Kb...")//--></script><%elseresponse.redirect("pagina.asp")End If

[dark0 0]

Eu faria assim:

If byteCount > 500000 Then response.write "<script>" response.write "alert('"Tamanho do arquivo: "& byteCount &" \nNão deu certo... tamanho da Imagem e/ou Áudio não pode ser maior que 500 Kb... "')" response.write "</script>" Response.EndEnd If

[JCMPJ 0]

If byteCount > 500000 Then%><script language="JavaScript"><!--alert("Tamanho do arquivo: <%=byteCount%> \n\n Não deu certo... tamanho da Imagem e/ou Áudio não pode ser maior que 500 Kb...");// pode ser assimwindown.location = "pagina.asp";// ou talvez // windown.history.go(-1);//--></script><%Response.EndEnd If

[Igor FV 0]

Valeu amigo JCMPJ funfou certinho, mas é window.location...

 

Alguém teria um codigo para validar o tipo de arquivo que esta sendo "uplodado"... com um script (alert)informando quando o usuario selecionar um arquivo com extensão diferente das permitidas pelo codigo... alguem tem um codigo desses em asp?

 

Segue minha pagina que faz o upload dos arquivos:

 

<!-- #include file = "upload_funcoes.asp" --><!--#include file="Connections/conecta.asp" --><%' Chamando Funções, que fazem o Upload funcionarbyteCount = Request.TotalBytesRequestBin = Request.BinaryRead(byteCount)Set UploadRequest = CreateObject("Scripting.Dictionary")BuildUploadRequest RequestBin'Verifica tamanho do arquivoIf byteCount > 500000 Then%><script language="JavaScript"><!--alert("Tamanho do arquivo: <%=byteCount%> \n\n Não deu certo... tamanho da Imagem e/ou Áudio não pode ser maior que 500 Kb...");// pode ser assimwindow.location = "upload_form.asp";// ou talvez // windown.history.go(-1);//--></script><%Response.EndEnd If' Recuperando os Dados Digitados nome = UploadRequest.Item("nome").Item("Value")email = UploadRequest.Item("email").Item("Value")' Tipo de arquivo que esta sendo enviadotipo_foto = UploadRequest.Item("foto").Item("ContentType")tipo_foto2 = UploadRequest.Item("foto2").Item("ContentType")' Caminho completo dos arquivos enviadoscaminho_foto = UploadRequest.Item("foto").Item("FileName")caminho_foto2 = UploadRequest.Item("foto2").Item("FileName")' Nome dos arquivos enviadosnome_foto = Right(caminho_foto,Len(caminho_foto)-InstrRev(caminho_foto,"\"))nome_foto2 = Right(caminho_foto2,Len(caminho_foto2)-InstrRev(caminho_foto2,"\"))'novo nome do arquivosnovo_nome = Replace(date, "/","")&Hour(time)&Minute(time)&second(time)&"_1" novo_nome2 = Replace(date, "/","")&Hour(time)&Minute(time)&second(time)&"_1" nome_foto = novo_nome & nome_fotonome_foto2 = novo_nome2 & nome_foto2' Conteudo binario dos arquivos enviadosfoto = UploadRequest.Item("foto").Item("Value")foto2 = UploadRequest.Item("foto2").Item("Value")' pasta onde as imagens serao guardadaspasta = Server.MapPath("upload/imagens_proc")nome_foto = "/"& nome_fotonome_foto2 = "/"& nome_foto2'pasta + nome dos arquivoscfoto = "upload/imagens_proc" + nome_fotocfoto2 = "upload/imagens_proc" + nome_foto2' Fazendo o Upload do arquivo selecionadoif foto <> "" then	Set ScriptObject = Server.CreateObject("Scripting.FileSystemObject")	Set MyFile = ScriptObject.CreateTextFile(pasta & nome_foto)	For i = 1 to LenB(foto)  MyFile.Write chr(AscB(MidB(foto,i,1)))	Next	MyFile.Closeend ifif foto2 <> "" then	Set ScriptObject = Server.CreateObject("Scripting.FileSystemObject")	Set MyFile = ScriptObject.CreateTextFile(pasta & nome_foto2)	For i = 1 to LenB(foto2)  MyFile.Write chr(AscB(MidB(foto2,i,1)))	Next	MyFile.Closeend if' Conecta-se ao Banco de Dados ACCESS.'url_conexao = Server.MapPath("banco.mdb")'set conexao = Server.CreateObject("ADODB.Connection")'conexao.open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&url_conexao	' Conecta-se ao Banco de Dados MYSQL.'url_conexao = Server.MapPath("banco.mdb")set conexao = Server.CreateObject("ADODB.Connection")conexao.open "driver=MySQL ODBC 3.51 Driver;DATABASE=bd_spd;SERVER=localhost;UID=admin"'&url_conexao	' cadastra os dados no banco de dadossql = "Insert into tbl_proc (nome,email,foto,foto2) values ('"& nome &"', '"& email &"', '"& cfoto &"', '"& cfoto2 &"')"conexao.Execute(sql)' Mostra Mensagem de Confirmação na TelaResponse.write "Dados Cadastrados com Sucesso!"' Redireciona após 5 segundosresponse.write "<br><br>você será redirecionado em 5 segundos..<br>"response.write "<meta http-equiv='refresh' content='5; url=upload_form.asp'/>"%>

Vlw amigos... e aguardo respostas...

[dark0 0]

Igor..da uma olhada no forum de scripts..Eu postei um codigo com Upload Sem Componentes..E .. em uma das minhas postagens, eu dei um exemplo de javascript, que verifica a extensão do arquivo q o cara selecionou..De repente é aquilo q você quer

[Igor FV 0]

Amigo dark0, esse codigo que postei foi justamente oq que você postou no forum, vou verificar novamente seu post, se puder passar o link que fala disso em agradeço.... outra para nesse codigo de upload tambem tem a parte de validação de tamanho e tipo de arquivo de mais de um campo de upload do form?

 

 

Tentei validar dois campos de file da forma abaixo, podrem nao funfa:

 

<%' Chamando Funções, que fazem o Upload funcionar imagem 1.byteCount1 = Request.TotalBytesRequestBin = Request.BinaryRead(byteCount1)Set UploadRequest = CreateObject("Scripting.Dictionary")BuildUploadRequest RequestBin' Chamando Funções, que fazem o Upload funcionar imagem 1.byteCount2 = Request.TotalBytesRequestBin = Request.BinaryRead(byteCount2)Set UploadRequest = CreateObject("Scripting.Dictionary")BuildUploadRequest RequestBin'Verifica tamanho do arquivo 1.If byteCount1 > 300000 Then%><script language="JavaScript">alert("Tamanho do 1º arquivo: <%=byteCount1%>. \n\n O tamanho do 1º arquivo de IMAGEM não pode ser maior que 300 Kb!");window.location = "upload_form.asp";</script><%Response.EndEnd If'Verifica tamanho do arquivo 2.If byteCount2 > 300000 Then%><script language="JavaScript">alert("Tamanho do 2º arquivo: <%=byteCount2%>. \n\n O tamanho do 2º arquivo de IMAGEM não pode ser maior que 300 Kb!");window.location = "upload_form.asp";</script><%Response.EndEnd If

Vlw

[dark0 0]

velho..esse codigo usa somente FSO para tudo!Entao.. para validar qualquer coisa.. procure na Referencia do FSO .. qual parametro dele você utiliza para capturar o tamanho do arquivo.A partir daí.. é só meter um IF e ta feitoVou ver se acho o codigo JAVASCRIPT .. q valida antes de submeter o formulario.Abraço..

[Igor FV 0]

Vlw amigo dark0, se puder mandar o codigo pra verificar o tamanho e o tipo de arquivo de varios campos de upload em agradecerei muito ...To no aguardo.... vlw amigo.....

[dark0 0]

Achei

 

Aqui nesse link

 

http://forum.imasters.com.br/index.php?s=&...st&p=425468

 

Tem 2 funções javascript, que verificam extensão e tamanho .. antes do envio dos arquivos.

 

Adapte o codigo para seu formulario .. adicione em quantos campos quiser.. que vai funcionar na boa..

 

Já usei pra 5 campos .. validando só fotos.. e foi que eh uma beleza

 

Abraçao

[Igor FV 0]

Amigo dark0, nesse post você indica o endereco pra validar o tipo de arquivo e tamanho para varios campos, mas o link nao esta mais funcionando...

 

você teria ele postado em outro post ?

 

http://www.dark0.truehost.com.br/sistemas/desafio%5Ffire/

 

 

Vlw..

[Venom_hoppus 0]

Ola pessoalBoa tardeGostaria de saber como eu centralizo um texto em um alert?<script language="javascript"> <!-- alert("ATENÇÃO \n\n O evento foi alterado com sucesso no banco de dados!") window.location = "eventos_lista.asp"; --> </script>preciso centralizar o ATENÇÂOobrigado

[Venom_hoppus 0]

To usando espaço mesmo!mais tem alguma maneira de fazer isso sem ser na unha??

[dark0 0]

Amigo dark0, nesse post você indica o endereco pra validar o tipo de arquivo e tamanho para varios campos, mas o link nao esta mais funcionando... você teria ele postado em outro post ?http://www.dark0.truehost.com.br/sistemas/desafio%5Ffire/Vlw..

cara.. nesse mesmo post.. mais abaixo .. eu coloquei o codigo das 2 funções..olha mais pra baixo no mesmo post..Venom.. acho mais facil você postar no forum de javascript..lá o pessoal é mais especializado nisso ae ..

[Mário Monteiro 179]

é melhor mover mesmoque fica mais facil desolucionar

[dark0 0]

ok mario.. só vamos ver com o criador do topico, se ele ainda tem alguma duvida em ASP.. senao movemos pra lá.. afinal.. a ultima duvida dele já se tornou JS mesmo..Abraço

[Mário Monteiro 179]

beleza Dark0 deixa ele aparecer...

[Igor FV 0]

Amigos dark0 e marioufpa, obrigado pelas ajudas vlw mesmo.....Pode mover o topico se quiserem............To com uma duvida em ASP, mas vou abrir um post novo..........se puderem me ajudar..... agradecerei......Amigo dark0, vi o seu post la sobre como verificar o tamanho e tipo do arquivo.......vlw...Vlw mesmo..............Um abraço.........