Jump to content


kabulozo

Member Since 24/05/2003
Offline Last Active 31/07/2006, 23:09
-----

Topics I've Started

Duvida Sobre Fso

17/02/2006, 13:47

E ae pessoal, blz?

Seguinte, tenho um site de baladas, e pra enviar as fotos eu criei um sisteminha que envia 5 fotos por vez.

Gostaria de saber se há algum jeito de eu enviar todas as fotos via FTP, e depois através de uma página, listar as fotos e gravar tudo no banco de dados?

Agilizaria bem o trabalho.

Vlw.

Mais Uma Ajuda Com Respeito A Upload

23/01/2006, 23:07

Olha eu aqui de novo

Blz galera?

É o seguinte, to com um form onde serão inseridos a miniatura, e a imagem maior para exibição. A miniatura vira como numero impar sendo puchada do form, e a imagem sera par. Mas naum sei como diferenciar para pegar o nome das miniaturas(numeros impar) e das imagens maiores(numeros par).
Tenho o seguinte codigo:

Set Upload = Server.CreateObject("Persits.Upload")
Count = Upload.Save(Server.MapPath("../eventos/" &str_Evento&str_DatDia&str_DatMes&int_DatAno& "/fotos/"))

cont = 1
Do while cont < 11
str_FotosMini = Upload.Files(cont).ExtractFileName
str_Fotos = Upload.Files(cont).ExtractFileName
sql = "INSERT INTO "
sql = sql & " adm_fotos "
sql = sql & " (adm_age_id,adm_cob_id,adm_fot_fmi,adm_fot_fot) "
sql = sql & " VALUES "
sql = sql & " ("&int_idEvento&","&int_idCobertura&",'"&str_FotosMini&"','"&str_Fotos&"') "
con.Execute(sql)
cont = cont + 1
Loop


Onde é str_FotosMini trara o numero impar do form ex: File1, File3, File5... File9 , e o str_Fotos trara numeros pares, ex: File2, File4... File10.

Como posso fazer para conseguir pegar o nome dos arquivos deste modo??

Vlw.

Problema Com Upload Multiplos

18/01/2006, 20:47

E ae galera, blz?

To fazendo um sisteminha de Upload de imagens, e na página é possível mandar até 5 imagens por vez.
Eele ta fazendo o upload tudo certinho, ae pra passar o nome dos arquivos pro bd eu fiz da seguinte maneira:

cont = 1
Do while cont < 6
str_Fotos = Upload.Files(cont).ExtractFileName
sql = "INSERT INTO "
sql = sql & " adm_fotos "
sql = sql & " (adm_age_id,adm_cob_id,adm_fot_fot) "
sql = sql & " VALUES "
sql = sql & " ("&int_idEvento&","&int_idCobertura&",'"&str_Fotos&"') "
con.Execute(sql)
Set sql = Nothing
cont = cont + 1
Loop


Uso o MySQL, e ele ta gravando corretamente no banco, mas aparece a seguinte mensagem de erro na página:

Tipo de erro:
Objeto Response, ASP 0185 (0x80020003)
Não foi encontrada uma propriedade padrão do objeto.
/fnb/adm/pc_fotos.asp


Tipo de navegador:
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; .NET CLR 2.0.50727)

Página:
POST 732976 bytes to /fnb/adm/pc_index.asp

POST Data:
erro '80020009'
Exceção.

/iisHelp/common/500-100.asp, line 223


O que está errado, se ele está gravando corretamente no bd e fazendo o upload dos arquivos corretamente??

Desde já agradeço pela atenção.
Vlw

IPB Skin By Virteq