Ir para conteúdo
Fórum Script Brasil
  • 0

Como Faço Para Colocar Fotos Na Minha Página?


Guest - Domênica -

Pergunta

Guest - Domênica -

Fiz uma máscara (com 9 colunas, cada coluna entra uma foto).

Queria que a medida que eu fosse incluindo as fotos, ela replicasse pra linha de baixo e continuasse adicionando (por exemplo coloquei 9 fotos, vou colocar mais duas, ela vai pra linha de baixo..).

Só que não estou nem conseguindo acessar a pasta onde estão as fotos e adicioná-las lá.. help......

Link para o comentário
Compartilhar em outros sites

7 respostass a esta questão

Posts Recomendados

  • 0
Guest - Domenica -

Estou usado uma pasta normal, e dentro da pasta tem os meus arquivos jpg.

Meu código está ficando assim: Só não consigo terminar...

<%

dim fs,fo,x

response.ContentType = "text/xml"

response.buffer = true

response.Write "<?xml version='1.0' encoding='UTF-8'?>"

response.Write "<nomedb>" Fotos_DB ' nome do banco de dados

set fs=Server.CreateObject("Scripting.FileSystemObject")

set fo=fs.GetFolder("C:\wwwderatrjo\Exemplos\fotos")

for each x in fo.files 'imprimir o nome dos arquivos

response.write(x.Name & "<br />")

response.Write " <nomereg>" Fotos ' nome do conjunto de registros

response.Write " <nomefld1>" x.Name & "</nomefld1>"

response.Write " <nomefld1>" & [x(1)] & "</nomefld1>"

response.Write " <nomefldn>" & [valorfldn] & "</nomefldn>"

response.Write " </nomereg>"

next

response.Write "</nomedb>"

set fo=nothing 'limpa a memória

set fs=nothing 'limpa a memória

%>

Link para o comentário
Compartilhar em outros sites

  • 0
Guest - Domênica -

Olá gente.. consegui achar um solução e vou deixar o código aqui. Obrigada pela ajuda de todos!! Qualquer dúvida é só perguntar.. bjs

<%

dim fs,fo,x, cont,path

path = request.QueryString("Path")

cont=1

response.ContentType = "text/xml"

response.buffer = true

response.Write "<?xml version='1.0' encoding='ISO-8859-1'?>"

response.Write "<arquivos>" ' nome do banco de dados

set fs=Server.CreateObject("Scripting.FileSystemObject")

set fo=fs.GetFolder(Server.MapPath(path))

for each x in fo.files 'imprimir o nome dos arquivos

if cont=1 then

Response.write("<reg>")

end if

Response.write("<f" & cont & ">" & path & "/" & x.name & "</f" & cont & ">")

cont=cont+1

if cont=10 then

Response.write("</reg>")

cont=1

end if

next

if cont>=1 and cont<=9 then

Response.write("</reg>")

end if

Response.write("</arquivos>")

set fo=nothing

set fs=nothing

%>

Link para o comentário
Compartilhar em outros sites

  • 0

que bom que resolveu..

pessoal.. usem a tag ASP.. quando forem postar codigos..

a sintaxe é simples..

exemplo:

[ asp]<%

linha 1 de codigo

linha 2 de codigo

%>[/ asp]

claro.. que sem espaços na tag..

que ficaria assim:

Editado por dark0
Link para o comentário
Compartilhar em outros sites

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152,1k
    • Posts
      651,8k
×
×
  • Criar Novo...