Jump to content


Photo

Mais Uma Ajuda Com Respeito A Upload


  • Faça o login para participar
1 reply to this topic

#1 kabulozo

kabulozo

    Normal

  • Usuários
  • 68 posts
  • Sexo:Não informado
  • Localidade:Piracicaba/SP

Posted 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.
<% kabulozo("Danilo Barbosa") %>
<% Email("danbarbosa@gmail.com") %>
<% Site("www.fotonabalada.com") %>
<% MSN("danilo_barbosa_9@hotmail.com") %>
<% Webdesigner e quase Webdeveloper :) %>

#2 kabulozo

kabulozo

    Normal

  • Usuários
  • 68 posts
  • Sexo:Não informado
  • Localidade:Piracicaba/SP

Posted 24/01/2006, 22:46

Bom galera.... consegui resolver o meu problema.... vejam o que fiz:

cont = 1
cont1 = 2
Do while cont < 11
str_FotosMini = Upload.Files(cont).ExtractFileName
str_Fotos = Upload.Files(cont1).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 + 2
cont1 = cont1 + 2
Loop


O que fiz foi adicionar mais um cont (cont1) e ao invéz de somar +1 no final, eu somei +2 para ficarem como numeros impares e pares... e funciono legal.

Vlwww
<% kabulozo("Danilo Barbosa") %>
<% Email("danbarbosa@gmail.com") %>
<% Site("www.fotonabalada.com") %>
<% MSN("danilo_barbosa_9@hotmail.com") %>
<% Webdesigner e quase Webdeveloper :) %>




1 user(s) are reading this topic

0 membro(s), 1 visitante(s) e 0 membros anônimo(s)

IPB Skin By Virteq