Ir para conteúdo
Fórum Script Brasil
  • 0

Mudar O Nome Do Arkivo No Upload Sem Componente


crucifier

Pergunta

eu estou usando aquele upload sem componentes do forum...so que como o sistema é para cliente...eu preciso que quando upe a imagem ele va com outro nome...ou então que mesmo que repita o nome da imagem upada, ele va como por exemplo: modelo_1.jpg

supondo que o nome da imagem upada anteriormente fosse modelo.jpg

daih se upasse de novo iria para modelo_2.jpg, modelo_3.jpg e assim por diante...

eu adaptei o codigo...no codigo esta para selecionar a imagem, e colocar se ele quer alinhar direita esquerda centro etc...e para o cara escolher a borda...

a janela de upar abre em um popup...então quando envia ele fecha o popup e envia as informacoes necessarias para a pagina(estou explicando para entenderem do porq do tamanho do codigo)

vou postar o codigo inteiro pra voces, caso alguém for usar tambem...(mas vai precisar do arquivo freeASPupload.asp como include, que no meu caso esta como upload.asp)

bom...aih vai o codigo(vou dividir em 2 partes...a primera é a que eu preciso de ajuda para trocar o nome...a segunda é o restante para caso alguém precisar do codigo):

<!-- #include file="includes/upload.asp" -->
<%

caminho = Server.MapPath("img_noticias")
If (UCase(Request.ServerVariables("REQUEST_METHOD")) = "POST") Then
Set Upload = New FreeASPUpload
Upload.Save(caminho)

	agora = Now
	For i = 1 To Len(agora)
  If IsNumeric(Mid(agora, i, 1)) Then
  	valor = valor & Mid(agora, i, 1)
  End If  
	Next

	For Each upFile In upload.Files
  imagem = "http://www.centropaulista.com.br/sistema/img_noticias/" & valor
	Next

	alt            = Upload.Form("alt")
	alinhamento  = Upload.Form("alinhamento")
	borda        	= Upload.Form("borda")

	Set Upload = Nothing

	strImagem   = "<img src="& imagem &" alt="& alt &" align="& alinhamento &" border="& borda &">"

	Response.Write "<script language='JavaScript'>" & VbCrLf
	Response.Write "{" & VbCrLf
	Response.Write "window.opener.frames.mensagem.focus();" & VbCrLf
	Response.Write "var htmlLink = window.opener.frames.mensagem.document.selection.createRange()" & VbCrLf
	Response.Write "htmlLink.pasteHTML('"& strImagem &"');" & VbCrLf
	Response.Write "window.opener.frames.mensagem.document.execCommand('paste', false, '');" & VbCrLf
	Response.Write "window.close();" & VbCrLf
	Response.Write "}" & VbCrLf
	Response.Write "</script>" & VbCrLf
	Response.End()
End If
%>
continuacao:
<html>
<head>
<title><%=tituloSistema%></title>
<script language="JavaScript">
function Valida()
{
	if ((document.formulario.imagem.value == '') || (document.formulario.imagem.value == 'http://'))
	{
  window.alert('Por favor, selecione a imagem para enviar e adicionar no documento.');
  document.formulario.imagem.focus();
  return false;
	}
}
</script>
<link href="includes/estilo_site.css" rel="stylesheet" type="text/css">
</head>
<body bgcolor="<%= strBgColour %>" leftmargin="6" topmargin="6" marginwidth="6" marginheight="6">
<table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0">
  <tr> 
    <td align="center" valign="middle"><table width="90%" border="0" cellpadding="2" cellspacing="0" class="texto10">
        <form action="addimage_up.asp" method="post" name="formulario" enctype="multipart/form-data" onSubmit="javascript:return Valida();">
          <tr> 
            <td width="78">Imagem:</td>
            <td><input name="imagem" type="file" class="form" style="width:275px;" value="http://"></td>
          </tr>
          <tr> 
            <td>Texto Alt:</td>
            <td><input name="alt" type="text" class="form" style="width:275px;"></td>
          </tr>
          <tr> 
            <td>Alinhamento:</td>
            <td> <select name="alinhamento" class="form">
                <option value="">Default</option>
                <option value="left">Left</option>
                <option value="right">Right</option>
                <option value="texttop">Texttop</option>
                <option value="absmiddle">Absmiddle</option>
                <option value="baseline">Baseline</option>
                <option value="absbottom">Absbottom</option>
                <option value="bottom">Bottom</option>
                <option value="middle">Middle</option>
                <option value="top">Top</option>
              </select> &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 
              Borda: 
              <select name="borda" class="form">
                <option value="0">0</option>
                <option value="1">1</option>
                <option value="2">2</option>
                <option value="3">3</option>
                <option value="4">4</option>
                <option value="5">5</option>
                <option value="6">6</option>
                <option value="7">7</option>
                <option value="8">8</option>
                <option value="9">9</option>
                <option value="10">10</option>
              </select> </td>
          </tr>
          <tr> 
            <td colspan="2"><hr size="1"></td>
          </tr>
          <tr> 
            <td colspan="2" align="center"> <input name="submit" type="submit" class="button" style="width:80px;" value="OK"> 
              <input name="button" type="button" class="button" style="width:100px;" onClick="javascript:window.close()" value="Cancelar"></td>
          </tr>
        </form>
      </table></td>
  </tr>
</table>
</body>
</html>

Link para o comentário
Compartilhar em outros sites

4 respostass a esta questão

Posts Recomendados

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152,3k
    • Posts
      652,5k
×
×
  • Criar Novo...