Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

marciolvs

Upload de multiplos arquivos e envio ao bd

Por , em ASP Clássico

Recommended Posts

marciolvs    1

marciolvs
Postado

Bom dia, efetuei pesquisas na web mas nem encontrei oq preciso.

Bom to montando um allbum de fotos Ex: cadastro o nome do album, depois entro no album e cadastro 10 fotos de 1 vez e a mesma vai ao banco e depois o cliente pode colocar mais...

 

Não posso citar total de cmapos no bd então acredito que tenho que capturar os dados por uma forma de loop não sei...

 

Alguém pode me ajudar ?

Compartilhar este post

Link para o post
Compartilhar em outros sites

marciolvs    1

marciolvs
Postado

repete ai amigo, não entendi nada!

 

Bom.

* Cadastro 1 nome para o album ex: festa01

* cadastro 10 fotos para este album "festa01"

as 10 fotos irão ser cadastradas ao banco e depois preciso cadastrar mais algumas e não possui o numero exato de fotos totais.

 

ou seja, caso eu crio um banco com 20 fotos isso não dará certo, pq não posso ter limites de cadastro.

Compartilhar este post

Link para o post
Compartilhar em outros sites

Ted k'    126

Ted k'
Postado

Aqui amigo, agora é só colocar mais campos:

http://tedk.com.br/blog/index.php/2008/11/...ome-do-arquivo/

 

A parte do SQL é coisa simples, você faz suas comparações

Compartilhar este post

Link para o post
Compartilhar em outros sites

marciolvs    1

marciolvs
Postado

Aqui amigo, agora é só colocar mais campos:

http://tedk.com.br/blog/index.php/2008/11/...ome-do-arquivo/

 

A parte do SQL é coisa simples, você faz suas comparações

Neste caso eu teria que duplicar estas linhas 10 vezes para que subo 10 arquivos ?

 

* Arquivo: <input type="file" name="Campo" />

 

* PegaNomeCampo = Upload.Files("Campo").FileName ' Pegando o conteúdo do campo todo

 

* NomeCampo = Right(PegaNomeCampo, Len(PegaNomeCampo) - InstrRev(PegaNomeCampo,"\")) ' Pegar os últimos valores do campo

Compartilhar este post

Link para o post
Compartilhar em outros sites

Ted k'    126

Ted k'
Postado

não neste caso você poderia fazer um for e contar quantos campos de upload tem na sua aplicação e colocar os nomes deles baseados em contadores para facilitar, exemplo, campo1, campo2, campo3...

Compartilhar este post

Link para o post
Compartilhar em outros sites

marciolvs    1

marciolvs
Postado

não neste caso você poderia fazer um for e contar quantos campos de upload tem na sua aplicação e colocar os nomes deles baseados em contadores para facilitar, exemplo, campo1, campo2, campo3...

 

Bom fiz o upload normal como o exemplo, ele informa que a foto foi e o nome dela, mas a foto não foi na pasta indicada, não alterei nada, apenas criei a pagina e pasta..

"Upload.Save Server.MapPath("fotos") ' Salvando na pasta "

 

E como seria este for ?

Nunca montei um exemplo deste. :(

Compartilhar este post

Link para o post
Compartilhar em outros sites

Ted k'    126

Ted k'
Postado 

<HTML>
<BODY BGCOLOR="#FFFFFF">
   <FORM METHOD="POST" ENCTYPE="multipart/form-data" ACTION="UploadScript2.asp">
	  File 1:<INPUT TYPE=FILE NAME="FILE1">
	  Description 1:<INPUT TYPE=TEXT NAME="DESCR1"><BR>
	  File 2:<INPUT TYPE=FILE NAME="FILE2">
	  Description 2:<INPUT TYPE=TEXT NAME="DESCR2"><BR>
   <INPUT TYPE=SUBMIT VALUE="Upload!">
   </FORM>
</BODY>
</HTML>

 <%
Set Upload = Server.CreateObject("Persits.Upload.1")
Upload.Save "c:\upload"
%>

Files:<BR>
<%
For Each File in Upload.Files
Response.Write File.Name & "= " & File.Path & " (" & File.Size &" bytes)<BR>"
Next
%>

<P>

Other items:<BR>
<%
For Each Item in Upload.Form
Response.Write Item.Name & "= " & Item.Value & "<BR>"
Next
%>

exemplo retirado do site:

ASPUPLOAD

Compartilhar este post

Link para o post
Compartilhar em outros sites

marciolvs    1

marciolvs
Postado 

<HTML>
<BODY BGCOLOR="#FFFFFF">
   <FORM METHOD="POST" ENCTYPE="multipart/form-data" ACTION="UploadScript2.asp">
	  File 1:<INPUT TYPE=FILE NAME="FILE1">
	  Description 1:<INPUT TYPE=TEXT NAME="DESCR1"><BR>
	  File 2:<INPUT TYPE=FILE NAME="FILE2">
	  Description 2:<INPUT TYPE=TEXT NAME="DESCR2"><BR>
   <INPUT TYPE=SUBMIT VALUE="Upload!">
   </FORM>
</BODY>
</HTML>

 <%
Set Upload = Server.CreateObject("Persits.Upload.1")
Upload.Save "c:\upload"
%>

Files:<BR>
<%
For Each File in Upload.Files
Response.Write File.Name & "= " & File.Path & " (" & File.Size &" bytes)<BR>"
Next
%>

<P>

Other items:<BR>
<%
For Each Item in Upload.Form
Response.Write Item.Name & "= " & Item.Value & "<BR>"
Next
%>

exemplo retirado do site:

ASPUPLOAD

 

Me retornou o resultado.

Files:

FILE1= d:\web\LocalUser\consultta\www\teste\ASPUpload2\fotos\dolcemix.jpg (92770 bytes)

FILE2= d:\web\LocalUser\consultta\www\teste\ASPUpload2\fotos\dolcemix_site.jpg (192817 bytes)

 

Other items:

DESCR1= aaa

DESCR2= bbb

 

 

mas não foi no servidor não..

 

Vov oq faço.. agradeço a mão.. eu conseguindo algo posto aqui...

Compartilhar este post

Link para o post
Compartilhar em outros sites

Ted k'    126

Ted k'
Postado

Me retornou o resultado.

Files:

FILE1= d:\web\LocalUser\consultta\www\teste\ASPUpload2\fotos\dolcemix.jpg (92770 bytes)

FILE2= d:\web\LocalUser\consultta\www\teste\ASPUpload2\fotos\dolcemix_site.jpg (192817 bytes)

 

Other items:

DESCR1= aaa

DESCR2= bbb

Se salvou no banco e salvou os aquivos está tudo ok

 

mas não foi no servidor não..

pelo que entendi, está fazendo local ou na web, pela url anterior, parece ser local, mas... tudo bem!!

 

qualquer cosia avisa!

Compartilhar este post

Link para o post
Compartilhar em outros sites
Ir para a lista de tópicos ASP Clássico
×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.

  Aceito