Upload Urgente

[Vivendo&Aprendendo]

Meu amigo

boa tarde

cara vi que você postou ai para tras que conseguiiu fazer o upload..

Estou tentanto fazer isso já faz um tempao e não consigo, será que você podia me ajudar?????????

ficarei muito grato..

me fornece o codigo se possivel?????????

urgente

Obrigado

[DackAle]

Vamos por partes... rs

você sabe qual componente tem no teu servidor ?

se não souber descobre, porque cada componente tem sua sintaxe =)

fala ae que a gente vai tentando te ajudar

abração

[bareta]

no tópico de funções tem um codigo que mostra os componentes do servidor... rodeo e ponha aqui quais os componentes...

[dark0]

Amigo..

Sei lá..

Pode me chamar de chato, ou como preferir.

mas, criar tópico direcionando para um usuario só.. fica meio chato..

pois, muita gente pode saber sua resposta, e você posta pedindo pra um membro responder..

Só um toke, ok?

Pra fazer upload, o modo mais facil é usando componentes.

veja se seu servidor tem algum componente de upload instalado.

Senao, ainda existe como fazer sem componente..

[Vivendo&Aprendendo]

Bom pessoal

o servidor aceita o seguinte componente:

ASP UPLOAD, o meu servidor é o IFXNETWORKS

Bom mas para fazer sem comonente é mais dificil???????

Bom me perdoe por ter colocado para o DackAle, fiz isso porque vi q ele conseguiu fazer entende, e já tem um tempão que venho insistindo nesse tal de UPLOAD, já tem mais de mes, e não consigo sair do lugar...

Bom já passei o nome do componente se alguém poder me ajudar ficarei grato, ou ate mesmo sem o componente se possivel.

Só lembrando que quero o seguinte:

Quando fazer o upload, precisa jogar em uma pasta específica no servidor e gravar o caminho no bd entende???????????

porque na hora q o usuario for fazer uma busca, o sistema possa trazer os dados do produto buscado juntamente com a foto... Conforme feito no cadastro..

muito obrigado

Se alguém poder me ajudar, vai resolver o problema de muita gente, porque tipow assim, já vi que isso é uma enorme dúvida da galera..

e gosto desse site, porque aki são resolvidos os problemas

abraços

[DackAle]

beleza... pode agurdar até mais tarde ?

porque eu uso o ASP Upload, e já fiz centenas de sistemas com upload com ele e posso te ajudar aqui =)

é facil... só que to corrido que tenho q entregar um sisteminha...rs

mas ainda hj explico como funcioona =)

abraços

[dark0]

Ou..

Faz uma busca no fórum, por ASP UPLOAD.

Acho que você vai encontrar a resposta.

T+

[Vivendo&Aprendendo]

Ola bom dia

DArk fiz a busca e econtrei alguns codigos obrigado... mas cara eu já tinha baixado varios outros e ainda não tinha conseguido..

dackAle tambem estou esperando você postar..

obrigadoo

pessoal baixei um componente ASPUPLOAD Free por trinta dias, mas o foda q o manual e todo em ingles

aguardo

flws

[DackAle]

bom vamos la... to atolado de projeto ahuahua mas vou te dar uma mão =)

Pagina1

é a pagina aonde você escolhe o arquivo basicamente você precisar ter 3 coisas nela...

1º - campo form

<form action="ENDERECO" method="post" enctype="multipart/form-data" name="form1">

ele é este acima aonde você poe a action (que é a pagina para aonde vai) o method que é o post ou seja você não ve os dados sendo passados e o enctype, que serve para quando você vai mandar arquivos, já que é um upload, então você esta passando arquivos... 2º - a caixa de arquivo

<input name="file" type="file" size="100">

o name é o nome, deixe como file mesmo, o type, é o tipo de form, no caso é o tipe file ou seja tipo de arquivo e size é o tamnho do form, você escolhe 2º - Botão submit

<input name="Submit" type="submit" value="Cadastrar Foto">

esse é o form do botão... basico pronto com esses dados você já pode fazer o campo de upload... só montar sua estrturua a gosto do fregues...rsss Pagina 2 Vamos a parte de upload agora... 1º Parte

SET Conexao = Server.CreateObject("AdoDB.Connection")
Conexao.Open "PROVIDER=MICROSOFT.JET.OLEDB.4.0;DATA SOURCE=D:/http/andradegranitos/web/portuguese/database/bancodedados.mdb"

Um exemplo de conexão com o banco de dados de banco tipo access... Pronto feita a conexão vamos la

SET UPLOAD = Server.CreateObject("Persits.Upload")

Upload.OverwriteFiles = False
Upload.Save "D:/http/andradegranitos/web/portuguese/upload"

o SET UPLOAD serve para você declarar o objeto de upload no caso persits.upload, que é o componente aspupload... você já criou o objeto upload...

Upload.OverwriteFiles = False

essa propriedade serve para se já existir algum arquivo com o nome nome ele não deletar, o que ele faz ? renomeia exemplo foto1.jpg se você subir uma foto com esse nome ele muda a foto que vai subir para foto1(1).jpg e não mexe na anterior...

Upload.Save "D:/http/andradegranitos/web/portuguese/upload"

essa propriedade serve para você mostrar aonde vai ser salvo o arquivo, no caso você indica o caminho dele, como eu fiz

For Each File in Upload.Files
foto = File.FileName
Next 

Aqui ela faz um looping, para pegar os arquivos encontrados no campos file. e ele pega o nome do arquivo com a propriedade file.filename e salva na variavel foto...

SET RS = Server.CreateObject("AdoDB.RecordSet")
Conexao.Execute("INSERT INTO noticias (foto) VALUES ('" & foto & "')")
SET RS = Nothing

aqui ele cria o objeto recordset, executa a conexão e faz um insert no banco de dados, ele insere na tabela noticias, na coluna foto, o nome dela (lembra que savamos o nome da foto numa variavel foto ?) e por fim matamos o recordset, pronto você dez o upload e salvou no banco de dados, mas e se tiver varios arquivos ?

For Each File in Upload.Files
foto = File.FileName
SET RS = Server.CreateObject("AdoDB.RecordSet")
Conexao.Execute("INSERT INTO noticias (foto) VALUES ('" & foto & "')")
SET RS = Nothing
NEXT

você joga o lopping dentro do insert, ou seja a cada arquivo que ele encontrar ele pega o nome salva, fecha, pega o nome salva e fecha e por ae vai... e não se esqueça de matar o upload

SET UPLOAD = NOTHING

se você quiser veririfcar se é um arquivo de imagem

For Each File in Upload.Files
If File.ImageType = "UNKNOWN" Then
response.write "não é uma imagem valida"
End If
Next

é bem facil manipular o upload como você viu, a maioria são comandos do programa =)

Qualquer duvida só postar ae =)

Abraços

[Vivendo&Aprendendo]

Ola pessoal

Bom com base nas dicas do DackAle montei meu upload

bom esta dando erro na hora que vou armazernar em uma determinada pasta,

no local onde indico a pasta

Upload.Save "c:/upload"

aparece a seguinte mensagem:

Tipo de erro:

Persits.Upload.1 (0x800A003F)

Invalid registration key.

/ENDERECO.asp, line 13

já inverti essa barra e tals, mas o erro não some...

o codigo todo segue abaixo:

<%

Set Conexao = Server.CreateObject("ADODB.Connection")

Conexao.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&Server.MapPath("s/bancodedados.MDB")

SET UPLOAD = Server.CreateObject("Persits.Upload")

Upload.OverwriteFiles = False

Upload.Save "c:/upload"

For Each File in Upload.Files

foto = File.FileName

Next

SET RS = Server.CreateObject("AdoDB.RecordSet")

Conexao.Execute("INSERT INTO noticias (foto) VALUES ('" & foto & "')")

SET RS = Nothing

For Each File in Upload.Files

If File.ImageType = "UNKNOWN" Then

response.write "não é uma imagem valida"

End If

Next

%>

Se puderem me ajudar ficaraei muito feliz

t+++

abraços

[dark0]

bom, pela descrição do erro, parece que expirou a licença..

Ou alguma coisa assim.

Já tentou rodar esse codigo no servidor, que tem o componente registrado?

[DackAle]

bom, pela descrição do erro, parece que expirou a licença..

Ou alguma coisa assim.

Já tentou rodar esse codigo no servidor, que tem o componente registrado?

sim, seu serial não é valido tente outros

só uma dica faça a verificação de se é imagem ou não antes de salvar o arquivo e o nome

[Vivendo&Aprendendo]

O valeu pela dica

bom o componente que baixei você sabem qual é né?????

Bom, eu não consegui serial, portanto digitei tudo 1111111111 e passou

ele é free por 30 dias...

heim alguém tem o serial para me fornecer????

valeussssss

Abraços

[dark0]

serial, acho dificil conseguir..

E mesmo se alguém quisesse fornecer, seria pirataria, e aqui no forum não é permitido.

Sobre esse tipo de coisa, acho mais apropriado vocês conversarem via PM, MSN ou E-mail.

Mudando de assunto, e voltando ao assunto do tópico..

Porque você não pensa em utilizar algum componente Free?

Não seria uma alternativa?

[Vivendo&Aprendendo]

ok valeu pela dica

Heim

alguém pode me dizer

que erro e esse que aparece no browser

ele apareceu quando quando eu chamei o upload

mas sempre aparece ne???

HTTP 500 - erro interno do servidor

Internet Explorer

esse e o erro

Flows

[dark0]

Erro 500?

Siga os passos aqui:

http://scriptbrasil.com.br/forum/index.php...ndpost&p=161506

Para ver o erro real

T+

[Vivendo&Aprendendo]

oi

[dark0]

oi

o que ser isso?

óia o flood

[Ale_xacunois]

Persits.Upload.1 error '800a0005'

The system cannot find the path specified.

/teste/Endereco.asp, line 13

esse é o erro 500 q descrevi acima

ele diz que não encontra o caminho...e agora

indiquei certinho

podem me ajudar, já enveleci 5 anos com esse upload rsrs

valeu

abraços

[DackAle]

bom... se pondo \ ou / no final do endereço ?

tipo

D:\home\upload\

tem certeza que o caminho é exato ?

abraços

mas posta ae o codigo pra gente

[Vivendo&Aprendendo]

Bom dia meus amigos

isso já esta dando um livro

mas eu agradeço pela compreenção de vocês...

é o seguinte

já tentei colocar / ou \ no final não deu certo...

é o seguinte o erro esta dando na linha 13, onde eu salvo na pasta

Upload.Save "a"

por exemplo, os codigo de upload estao em uma pasta chamada de teste, ai chamo eles, e dentro tem essa pasta ( a ) para salvar os arquivos....

Vou postar o codigo abaixo:

<%

Set Conexao = Server.CreateObject("ADODB.Connection")

Conexao.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&Server.MapPath("bancodedados.MDB")

SET UPLOAD = Server.CreateObject("Persits.Upload")

Upload.OverwriteFiles = False

Upload.Save "a" -------------->aki indica o erro.

For Each File in Upload.Files

foto = File.FileName

Next

SET RS = Server.CreateObject("AdoDB.RecordSet")

Conexao.Execute("INSERT INTO noticias (foto) VALUES ('" & foto & "')")

SET RS = Nothing

For Each File in Upload.Files

If File.ImageType = "UNKNOWN" Then

response.write "não é uma imagem valida"

End If

Next

%>

Bom se quiserem ver online entre no:

www.ofertaeprocura.inf.br/teste/TesteUpload.asp

Obrigado

abraços eum ótimo dia

[dark0]

na linha do erro:

Upload.Save "a"

a é o caminho?

Cade o caminho da pasta onde os arquivos devem ser colocados após o upload?

"a" pra ele não diz nada. Elenao encontra um diretorio "a" e dá erro.

[Ale_xacunois]

heim

mas " a " é a pasta

entende

exemplo

tenho uma pasta chamada teste, onde eu chamo os codigo do asp para upload e dentro tem a pasta

a..

como eu deveria fazer isso se não e assim?

Abraços

[dark0]

tenta colocar no caminho: ".a"

o . indica que é do diretorio atual, para dentro..

mas não sei se esse é o caso..

não lembro se este componente utiliza o caminho físico ou o caminho lógico do diretorio...

Tenta aí.. se não for, pode ser porque ele precise do caminho físico do diretorio..

[Vivendo&Aprendendo]

Ola pessoal

mechi mechi até conseguir

está fazendo o upload, oba até que enfim rsrs

bom mas agora a dúvida é o seguinte...

tenho um cadastro de artesanatos por exemplo, onde eu faço todo cadastro

e junto terá a opcao de buscar uma foto..

O codigo do upload pode ficar no mesmo arquivo .ASP que o outro cadastro...

tipo primeiro o codigo para cadastro

e depois o codigo do upload?

estou fazendo assim e não grava nada rsrs

espero uma resposta

Agradeço

Boa noite

[DackAle]

para recuperar valores você tem que usar o upload.form

ao invés do request

quando é UMA foto eu ponho para a pessoa fazer upload junto do doados, ou seja na mesma pakgina e na mesma tabela, quando são varias eu crio uma tabela só para fotos e na pagina seguinte de cdastrar os dados, ele sobe as imagens, fica mais facil =)

Abraços