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

Mudança De Componente


Aneurex

Pergunta

''''''''''''''''''''''''''''''''''''''''''''''''''''''
	' Recebe dados do formulario
	''''''''''''''''''''''''''''''''''''''''''''''''''''''
	function ReaderForm()
  if (Request("ty2") = "Form" or Request("ty2") = "Save") then

  	'strPath = Mid(Server.MapPath("Destaque.asp"),1,Len(Server.MapPath("Destaque.asp"))-19)
  	'strPath = "C:\home\dom711\homepage\html\"
  	strPath = "D:\Inetpub\wwwroot\meusite.com.br\"

  	
  	Set Upload = Server.CreateObject("Persits.Upload")
  	Upload.OverwriteFiles = False
  	Count = Upload.Save(strPath & "Temp\")

  	gTitulo    = Replace(Replace(Upload.Form("txtTitulo"), "'", "`"), """", """)
  	gTipoo     = Replace(Replace(Upload.Form("txtTipo"), "'", "`"), """", """)
  	''gTexto     = Replace(Replace(Upload.Form("DESCRIPTION"), "'", "`"), """", """)
  	gTexto     = Replace(Upload.Form("DESCRIPTION"), "'", "`")
  	gLogin     = Request.Cookies("AdmUsr")("Login")
  	gIdNoticia = Upload.Form("IdNoticias")
  	gImagem    = Upload.Form("txtImagem")
  	gCodigo    = Upload.Form("txtCodigo")
  	gAlinhamento = Upload.Form("txtAlinhamento")

  	if (CInt(Count) = 1) then
    if (gTipo = "Insert") then
    	gCodigo = CreateDateKey()
    else
    	if (Upload.Form("txtCodigo") = "0") then
      gCodigo = CreateDateKey()
    	end if
    end if
    Set File1 = Upload.Files("THEFILE")
    File1.Copy strPath & "Galeria\Noticias\Thu_" & gCodigo & ".gif"
    File1.Delete
  	end if
  end if

  if (gImagem = "1") then
  	gCodigo = "0"
  end if
	end function

Pessoal estou com grandes problemas, sai de 1 provedor q utilizava o ASPUPLoad como componente e fui pra Locaweb, q tem o DunDasUpload. Tentei eu mesmo migrar este codigo acima mas não tive sucesso, mesmo porque não sou programador e o pouco q sei foi sapiando nos foruns q frequento, mas este codigo é muito complexo e me perdi todo, ate mesmo com a documentacao do componente, alguém poderia me ajudar?

grato antecipadamente

Link para o comentário
Compartilhar em outros sites

3 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,1k
    • Posts
      651,8k
×
×
  • Criar Novo...