Preciso fazer Upload, mas tah braboooo

[kel cappra 0]

ae gente...seguinte, to precisando fazer um upload de um formulário de cadastro de clientes...tem uns campos pra preencher e um logotipo pra fazer o uploadtah, beleza, até aí tudo bem... só q eu sei fazer isso com o AspUpload... só q quando fui transferir o código pro SaFileUp, que atualmente é oq a Locaweb usa, já não consegui faezr funcionar... e só por causa de uma coisinhameu código tah assim ó:ele começa dando o caminho pra salvar a imagem:caminho = "E:/vhosts/gestaoinformatica.com.br/httpdocs/imagens"**********logo depois ele usa o componente pra fazer o uploadset upload = Server.CreateObject("SoftArtisans.FileUp") UPLOAD.Path = caminho upload.form("logo").Save*********************bom, depois ele salva os dados dos formulários comuns, mas essa parte tah funcionando.depois disso, eu declaro o logotipo, pra ele depois do upload ser salvo na tabelaaí que tah o problemaaaaaaaano AspUpload eu declaro a variável da seguinte maneira::logo = "http://www.gestaoinformatica.com.br/imagens/" & file.filenamejá este tal de SaFileUp não aceita o comando "file.filename" e ninguémmm sabe me dizer como faz pra chamar o arquivo q já foi up.enfimmmmmse alguém puder me ajudar agradeço muiiito.Abs

[Ivan.Teles 23]

Cara recomendo Upload sem componente:

da uma olhada http://blog.elcio.com.br/uploadasp/

[kel cappra 0]

cara o link manda instalar outro componente ainda e não posso usar esse componente, a LocaWeb não permite.Só o Dundas e o SaFileUp.e outra, com certeza existe uma maneira de fazer

[Ivan.Teles 23]

Cara ele não manda instalar nada, o arquivo zipado é apenas uma páginas asp que fará o Upload.

Da uma lida melhor..

[kel cappra 0]

é, de qualquer maneira o código não ajuda muito, porque além de eu querer usar um dos componentes, também para "aprender" afinal terei que alterar mais de 40 sites e vou procurar usar algo mais simples, senão vou ficar dias fazendo a mesma coisa, enquanto outros trabalhos atrazam...minha pergunta é super simples... "no AspUpload eu declaro a variável da seguinte maneira::logo = "http://www.gestaoinformatica.com.br/imagens/" & file.filenamejá este tal de SaFileUp não aceita o comando "file.filename" e ninguémmm sabe me dizer como faz pra chamar o arquivo q já foi up."alguém tem a resposta ae??mesmo assim valeu jivandf, só que não é bem oque eu preciso.[]'

[Ivan.Teles 23]

Bom, eu não utilizo componentes, eles deixam a gente dependentes de quem os fez, então não saco nada deles. mas de boa..

Qualquer coisa estamos ai. http://forum.imasters.com.br/public/style_emoticons/default/thumbsup.gif

[kel cappra 0]

mas alguém sabe me dizer como faço isso?

[nb-master 0]

Amigo quer uma dica troca de host....você é a 2 pessoa que POSt sobre a falta de componentes na hospedagem ASP da LOCAWEB

[kel cappra 0]

cara, tu denovo??? eu não vou trocar pro teu servidor meu, te liga !!!!e não to reclamando da hospedagem da locaweb, to dizendo q EU não sei usar esse componente, e simplesmente to perguntando se alguém sabe usar !!e por favor, se ninguém souber então que diga "ó, não sei" que pelo menos vou postar em outro fórum ao invés de ficar atualizando minha página pra ver se alguém respondeu.

[nb-master 0]

Amigo 1° nao pedi pra você trocar pro meu serven 2° nao tenho hospedagem ASP3° soqueria te dar uma dica POis ontem um mebro do imasters postou algo parecido com o seu............flw...............

[kel cappra 0]

sim, fui eu mesma, falando sobre aquele construtor de sites, que te adicionei no msn pra tirar a dúvida e você já queria q eu trocasse a locaweb pelo seu servidor americano.mas se não foi a tua intenção, desculpa entãosó acho q trocar o servidor não soluciona o problema, mas aprender diversas formas de fazer uma mesma coisa, isso sim é de grande valia.certo?flw

[nb-master 0]

OK...sim... me lembro de você....mas faz o que eu falei testa em um outro servidor para ver se o seu Script Funciona...pode ate ser um serven localhost

[Ivan.Teles 23]

dei uma olhada na documentação do componente e vi que pra você pegar o nome do arquivo e colocar no BD é mais ou mesmos assim:

 

pra não setar o endereço completo http... tal.. tal.. coloca só assim.

 

logo = "imagens/"& upload.UserFilename

 

se desejar mais informações achei isso no google.. http://www.developerfusion.co.uk/show/2474/3/ deve lhe ajuduar bastante

[rakelc 0]

ahhhhhhhhhhh jivandf o melhor !!!!valeu mesmo cara hehehehehehehepra quem precisar, tah certinho aquela linha de comando que ele postou, funcionou na hora...Absss

[Ivan.Teles 23]

não é pra tanto. http://forum.imasters.com.br/public/style_emoticons/default/blush.gif sou apenas uma aprendiz, ainda apanho muito do ASP http://forum.imasters.com.br/public/style_emoticons/default/cry.gif , por isso estou indo pro Javanez... http://forum.imasters.com.br/public/style_emoticons/default/joia.gif

[Gutoo 1]

Falaeee Velhoo...Cara to postando o código de Upload sem componente.Eu sempre uso ele, é um pouco complicado de entender quando retornar o nome do arquivo, mas nada impossível.Se ajudar em algo... ta beleza.

' ##################################################################################################'    Dim Contador, Tamanho'    Dim ConteudoBinario, ConteudoTexto'    Dim Delimitador, Posicao1, Posicao2'    Dim ArquivoNome, ArquivoConteudo, PastaDestino'    Dim objFSO, objArquivo                 PastaDestino = "C:\pasta\"                '***** Determina o Tamanho do Conteúdo *****    Tamanho = Request.TotalBytes    '***** Obtém o Conteúdo no Formato Binário *****    ConteudoBinario = Request.BinaryRead(Tamanho)    '***** Transforma o Conteúdo Binário em String *****    For Contador = 1 To Tamanho		ConteudoTexto = ConteudoTexto & Chr(AscB(MidB(ConteudoBinario, Contador, 1)))    Next    '***** Determina o Delimitador de Campos *****    Delimitador = Left(ConteudoTexto,InStr(ConteudoTexto, vbCrLf)-1)    '***** Percore a String Procurando os Campos   *****    '***** Identifica os Arquivos e Grava no Disco *****    Set objFSO = Server.CreateObject("Scripting.FileSystemObject")         Posicao1 = InStr(ConteudoTexto, Delimitador) + Len(Delimitador)    Do While True		ArquivoNome = ""		Posicao1 = InStr(Posicao1, ConteudoTexto, "filename=")		If Posicao1 = 0 Then			Exit Do		Else			'***** Determina o Nome do Arquivo *****			Posicao1 = Posicao1 + 10			Posicao2 = InStr(Posicao1, ConteudoTexto, """")			For Contador = Posicao2-1 To Posicao1 Step -1				If Mid(ConteudoTexto, Contador, 1) <> "\" Then					ArquivoNome = Mid(ConteudoTexto, Contador, 1) & ArquivoNome				Else					Exit For				End If			Next						'***** Determina o Conteúdo do Arquivo *****			Posicao1 = InStr(Posicao1, ConteudoTexto, vbCrLf & vbCrLf) + 4			Posicao2 = InStr(Posicao1, ConteudoTexto, Delimitador) - 2			ArquivoConteudo = Mid(ConteudoTexto, Posicao1, Posicao2-Posicao1+1)					'***** Grava o Arquivo *****			If ArquivoNome <> "" Then				Set objArquivo = objFSO.CreateTextFile(PastaDestino & ArquivoNome, True) 				objArquivo.WriteLine ArquivoConteudo     				objArquivo.Close '                               Apenas exibe o nome do arquivo enviado'				Response.Write "Arquvo " & PastaDestino & ArquivoNome & " gravado com sucesso!!!<BR>"                               '                               Redireciona para alguma página que irá receber os dados'				Response.Redirect("index.asp?img="& ArquivoNome &"")'                               Grava o arquivo em uma sessão para você poder recuperar em um campo de formulário				session("ArquivoNome") = ""& ArquivoNome &""'				Set objArquivo = Nothing			End If		End If    Loop'    Set objFSO = Nothing

Abraço, Gutoo