Olá pessoal criei um sistema de upload , agora quero fazer algumas adaptações no sistema... O sistema funciona da seguinte forma , existe um espaço para a pessoa digitar o nome da pasta, e três campos para a pessoas escolherem as imagens. Tenho uma galeria de fotos dinâmica onde aparecem na página todas as imganes que estiverem dentro da pasta. Quero fazer o seguinte: (não sei se é possível) , juntar os dois sistemas de forma que o usuário faz upload da imagem na pasta que escolheu e depois que clicar em enviar seja criada uma página com a codificação da minha galeria. Ou seja vão ser criadas vária páginas conforme o nome que o usuário colocou na pasta , por exemplo, se criou a pasta carnaval, será criada uma pasta canaval (isto já está funcionando), e será cirada uma página que irá exibir estas imagens que estão na pasta. Depois cria uma pasta com o nome de páscoa, será criada uma página para exibir as imagne dessa pasta. Será que alguém tem alguma sugestão.
Um abraço
Atualizações Dinâmicas
Started By w@shin ! ! !, 23/01/2006, 23:20
13 replies to this topic
#1
w@shin ! ! !
-
- Usuários
-
- 109 posts
Normal
- Sexo:Não informado
- Interesses:Hardware , Dream weaver , flash e Corel Draw . . .
#2
Luis Otávio
-
- Usuários
-
- 3113 posts
Super Veterano
- Sexo:Masculino
- Localidade:Porto Alegre
-
Interesses:- Desenvolvimento de aplicações Web com linguagem server-side PHP.
- Desenvolvimento de aplicações Web com linguagem cliente-side JavaScript, conhecedor e utilizador da biblioteca jQUERY e todas suas características.
- Otimização de Desempenho aplicados a performance de banco de dados Mysql.
- Otimização de Desempenho para servidores Web utilizando-se como Webserver NGINX em conjunto com Varnish.
- Sólidos conhecimentos no CMS WordPress para novas implementações, manutenção, criação e otimização de Plugins.
- Práticas de atendimento, relacionamento e suporte ao cliente. Trabalhando voltado ao público desde o lançamento da empresa iPORTO.COM, criando laços e vínculos com os mais de Mil clientes da empresa e os braços do grupo.
Posted 24/01/2006, 00:13
A sugestão é FSO.
Da mesma forma que vc cria a pasta.. vc cria o arquivo...
e coloca o conteudo nele...
da mesma forma que eu criei um .txt para o contador...
vc cria o arquivo que quer...
http://forum.wmonlin...howtopic=103114
Da mesma forma que vc cria a pasta.. vc cria o arquivo...
e coloca o conteudo nele...
da mesma forma que eu criei um .txt para o contador...
vc cria o arquivo que quer...
http://forum.wmonlin...howtopic=103114
* Otávio Nogueira
* Administração e Configuração de Servidores;
* Combinação Perfeita: NGINX + PHP + VARNISH + HAPROXY
* otavio*iporto.com ~ Tel: +55 51 3366 0177 | +55 51 4063 7343 |
* @iporto
* Administração e Configuração de Servidores;
* Combinação Perfeita: NGINX + PHP + VARNISH + HAPROXY
* otavio*iporto.com ~ Tel: +55 51 3366 0177 | +55 51 4063 7343 |
* @iporto
#3
w@shin ! ! !
-
- Usuários
-
- 109 posts
Normal
- Sexo:Não informado
- Interesses:Hardware , Dream weaver , flash e Corel Draw . . .
Posted 24/01/2006, 11:30
Set GRAVAR = FSO.CreateTextFile(caminho,true), essa é a linha que cria um arquivo txt , certo? para criar um arquivo asp, como ficaria ?
FSO.CreateAspFile ?
E como faço para adicionar conteudo no arquivo criado?
Obrigado
FSO.CreateAspFile ?
E como faço para adicionar conteudo no arquivo criado?
Obrigado
http://www.cashfiest....php?ref=washin
Dinheiro extra
Dinheiro extra
#4
Luis Otávio
-
- Usuários
-
- 3113 posts
Super Veterano
- Sexo:Masculino
- Localidade:Porto Alegre
-
Interesses:- Desenvolvimento de aplicações Web com linguagem server-side PHP.
- Desenvolvimento de aplicações Web com linguagem cliente-side JavaScript, conhecedor e utilizador da biblioteca jQUERY e todas suas características.
- Otimização de Desempenho aplicados a performance de banco de dados Mysql.
- Otimização de Desempenho para servidores Web utilizando-se como Webserver NGINX em conjunto com Varnish.
- Sólidos conhecimentos no CMS WordPress para novas implementações, manutenção, criação e otimização de Plugins.
- Práticas de atendimento, relacionamento e suporte ao cliente. Trabalhando voltado ao público desde o lançamento da empresa iPORTO.COM, criando laços e vínculos com os mais de Mil clientes da empresa e os braços do grupo.
Posted 24/01/2006, 11:32
' Abrimos nosso arquivo que conta as visitas.
Set FSO = Server.CreateObject("Scripting.FileSystemObject")
caminho = Server.MapPath("contador.txt")
Set gravar = fso.OpenTextFile(caminho, 1, False)
muda de .txt para .asp
vc pode ate fazer .mp3 hehe.. vai funcionar igual..
esta linha escreve
gravar.write ""&total
Set FSO = Server.CreateObject("Scripting.FileSystemObject")
caminho = Server.MapPath("contador.txt")
Set gravar = fso.OpenTextFile(caminho, 1, False)
muda de .txt para .asp
vc pode ate fazer .mp3 hehe.. vai funcionar igual.. esta linha escreve
gravar.write ""&total
* Otávio Nogueira
* Administração e Configuração de Servidores;
* Combinação Perfeita: NGINX + PHP + VARNISH + HAPROXY
* otavio*iporto.com ~ Tel: +55 51 3366 0177 | +55 51 4063 7343 |
* @iporto
* Administração e Configuração de Servidores;
* Combinação Perfeita: NGINX + PHP + VARNISH + HAPROXY
* otavio*iporto.com ~ Tel: +55 51 3366 0177 | +55 51 4063 7343 |
* @iporto
#5
w@shin ! ! !
-
- Usuários
-
- 109 posts
Normal
- Sexo:Não informado
- Interesses:Hardware , Dream weaver , flash e Corel Draw . . .
Posted 24/01/2006, 13:02
Entendi, porem aí o arquivo já existe, pois está sendo aberto, quero que se crie um arquivo com conteúdo...
http://www.cashfiest....php?ref=washin
Dinheiro extra
Dinheiro extra
#6
Luis Otávio
-
- Usuários
-
- 3113 posts
Super Veterano
- Sexo:Masculino
- Localidade:Porto Alegre
-
Interesses:- Desenvolvimento de aplicações Web com linguagem server-side PHP.
- Desenvolvimento de aplicações Web com linguagem cliente-side JavaScript, conhecedor e utilizador da biblioteca jQUERY e todas suas características.
- Otimização de Desempenho aplicados a performance de banco de dados Mysql.
- Otimização de Desempenho para servidores Web utilizando-se como Webserver NGINX em conjunto com Varnish.
- Sólidos conhecimentos no CMS WordPress para novas implementações, manutenção, criação e otimização de Plugins.
- Práticas de atendimento, relacionamento e suporte ao cliente. Trabalhando voltado ao público desde o lançamento da empresa iPORTO.COM, criando laços e vínculos com os mais de Mil clientes da empresa e os braços do grupo.
Posted 24/01/2006, 13:09
* Otávio Nogueira
* Administração e Configuração de Servidores;
* Combinação Perfeita: NGINX + PHP + VARNISH + HAPROXY
* otavio*iporto.com ~ Tel: +55 51 3366 0177 | +55 51 4063 7343 |
* @iporto
* Administração e Configuração de Servidores;
* Combinação Perfeita: NGINX + PHP + VARNISH + HAPROXY
* otavio*iporto.com ~ Tel: +55 51 3366 0177 | +55 51 4063 7343 |
* @iporto
#7
w@shin ! ! !
-
- Usuários
-
- 109 posts
Normal
- Sexo:Não informado
- Interesses:Hardware , Dream weaver , flash e Corel Draw . . .
Posted 24/01/2006, 15:42
valeu Luis, estou pegando o jeito. Já consegui criar o arquivo .asp preciso saber agora como inserir código denteo dele.
Pelo que vi no tutorial foi usado o WriteLine Porém não consigo inserir com ele comandos ASP, consigo somente texto.
<%
' criamos o objecto para lidar com os ficheiros
set fso = CreateObject ("Scripting.FileSystemObject")
' criamos o objecto que vai ser usado para a criação dos ficheiros
set f = fso.CreateTextFile(Server.Mappath ("eventos" &"\" &"exemplo2.asp"), True)
' agora vamos meter algo lá dento
f.WriteLine ( "olá mundo")
' fechamos o ficheiro
f.close
%>
Gostaria de inserir na parte em negrito comandos ASP. Será que tem como?
Pelo que vi no tutorial foi usado o WriteLine Porém não consigo inserir com ele comandos ASP, consigo somente texto.
<%
' criamos o objecto para lidar com os ficheiros
set fso = CreateObject ("Scripting.FileSystemObject")
' criamos o objecto que vai ser usado para a criação dos ficheiros
set f = fso.CreateTextFile(Server.Mappath ("eventos" &"\" &"exemplo2.asp"), True)
' agora vamos meter algo lá dento
f.WriteLine ( "olá mundo")
' fechamos o ficheiro
f.close
%>
Gostaria de inserir na parte em negrito comandos ASP. Será que tem como?
http://www.cashfiest....php?ref=washin
Dinheiro extra
Dinheiro extra
#8
Luis Otávio
-
- Usuários
-
- 3113 posts
Super Veterano
- Sexo:Masculino
- Localidade:Porto Alegre
-
Interesses:- Desenvolvimento de aplicações Web com linguagem server-side PHP.
- Desenvolvimento de aplicações Web com linguagem cliente-side JavaScript, conhecedor e utilizador da biblioteca jQUERY e todas suas características.
- Otimização de Desempenho aplicados a performance de banco de dados Mysql.
- Otimização de Desempenho para servidores Web utilizando-se como Webserver NGINX em conjunto com Varnish.
- Sólidos conhecimentos no CMS WordPress para novas implementações, manutenção, criação e otimização de Plugins.
- Práticas de atendimento, relacionamento e suporte ao cliente. Trabalhando voltado ao público desde o lançamento da empresa iPORTO.COM, criando laços e vínculos com os mais de Mil clientes da empresa e os braços do grupo.
Posted 24/01/2006, 15:53
<%
Batatinhas = "<%Response.Write ""Otavio Lindão""%>"
' criamos o objecto para lidar com os ficheiros
set fso = CreateObject ("Scripting.FileSystemObject")
' criamos o objecto que vai ser usado para a criação dos ficheiros
set f = fso.CreateTextFile(Server.Mappath ("eventos" &"\" &"exemplo2.asp"), True)
' agora vamos meter algo lá dento
f.WriteLine (Batatinhas)
' fechamos o ficheiro
f.close
%>
a ideia é esta... mas cara.. eu ja fiz isso uma vez.. foi uma mão... hehe.. não é tão simples quanto parece..
mas a ideia é esta ai...
vc vai usar alguns replace e um pouco mais de logica...
Batatinhas = "<%Response.Write ""Otavio Lindão""%>"
' criamos o objecto para lidar com os ficheiros
set fso = CreateObject ("Scripting.FileSystemObject")
' criamos o objecto que vai ser usado para a criação dos ficheiros
set f = fso.CreateTextFile(Server.Mappath ("eventos" &"\" &"exemplo2.asp"), True)
' agora vamos meter algo lá dento
f.WriteLine (Batatinhas)
' fechamos o ficheiro
f.close
%>
a ideia é esta... mas cara.. eu ja fiz isso uma vez.. foi uma mão... hehe.. não é tão simples quanto parece..
mas a ideia é esta ai...
vc vai usar alguns replace e um pouco mais de logica...
* Otávio Nogueira
* Administração e Configuração de Servidores;
* Combinação Perfeita: NGINX + PHP + VARNISH + HAPROXY
* otavio*iporto.com ~ Tel: +55 51 3366 0177 | +55 51 4063 7343 |
* @iporto
* Administração e Configuração de Servidores;
* Combinação Perfeita: NGINX + PHP + VARNISH + HAPROXY
* otavio*iporto.com ~ Tel: +55 51 3366 0177 | +55 51 4063 7343 |
* @iporto
#9
w@shin ! ! !
-
- Usuários
-
- 109 posts
Normal
- Sexo:Não informado
- Interesses:Hardware , Dream weaver , flash e Corel Draw . . .
Posted 24/01/2006, 16:23
valeu, pelo jeito vou quebra a cabeça... Té +
http://www.cashfiest....php?ref=washin
Dinheiro extra
Dinheiro extra
#10
w@shin ! ! !
-
- Usuários
-
- 109 posts
Normal
- Sexo:Não informado
- Interesses:Hardware , Dream weaver , flash e Corel Draw . . .
Posted 24/01/2006, 17:55
valeu a ajuda. consegui aqui
<%
AbrindoASP = chr(60) & "%"
FechandoASP = "%" & chr(62)
Abreaspas = chr(34)
Fechaaspas = chr(148)
' criamos o objecto para lidar com os ficheiros
set fso = CreateObject ("Scripting.FileSystemObject")
' criamos o objecto que vai ser usado para a criação dos ficheiros
set f = fso.CreateTextFile(Server.Mappath ("eventos" &"\" &"exemplo2.asp"), True)
' agora vamos meter algo lá dento
f.WriteLine ( "<html> <head> </head> <body>")
f.WriteLine AbrindoASP & "DIM FSO, strCaminho, strPrincipal, strArquivos, xx"
f.WriteLine ("strCaminho = " & Abreaspas& "imagens/" & Abreaspas)
f.WriteLine "Set FSO = Server.CreateObject" & "(" & Abreaspas & "Scripting.FileSystemObject" &
abreaspas & ")"
f.WriteLine "Set strPrincipal = FSO.GetFolder(server.mappath(strCaminho))"
f.WriteLine "Set strArquivos = strprincipal.Files"
f.WriteLine "IF strArquivos.count=0 then" & FechandoASP
f.WriteLine "Não existem imagens disponiveis"
f.WriteLine AbrindoASP & "else" & FechandoASP
f.WriteLine "<%DIM strArq"
f.WriteLine "FOR EACH strArq IN strArquivos "
f.WriteLine "if strArq.name=" & Abreaspas & "Thumbs.db" & Abreaspas & "then" & FechandoASP
f.WriteLine AbrindoASP & "else" & FechandoASP
f.WriteLine "<img src=" & Abreaspas & AbrindoASP & "=strCaminho&strArq.name"& FechandoASP
& Abreaspas & ">" & "<br>"
f.WriteLine AbrindoASP & "end if" & FechandoASP
f.WriteLine AbrindoASP & "NEXT" & FechandoASP
f.WriteLine AbrindoASP & "end if" & FechandoASP
f.WriteLine "</body> </html>"
' fechamos o ficheiro
f.close
%>
http://www.cashfiest....php?ref=washin
Dinheiro extra
Dinheiro extra
#11
Luis Otávio
-
- Usuários
-
- 3113 posts
Super Veterano
- Sexo:Masculino
- Localidade:Porto Alegre
-
Interesses:- Desenvolvimento de aplicações Web com linguagem server-side PHP.
- Desenvolvimento de aplicações Web com linguagem cliente-side JavaScript, conhecedor e utilizador da biblioteca jQUERY e todas suas características.
- Otimização de Desempenho aplicados a performance de banco de dados Mysql.
- Otimização de Desempenho para servidores Web utilizando-se como Webserver NGINX em conjunto com Varnish.
- Sólidos conhecimentos no CMS WordPress para novas implementações, manutenção, criação e otimização de Plugins.
- Práticas de atendimento, relacionamento e suporte ao cliente. Trabalhando voltado ao público desde o lançamento da empresa iPORTO.COM, criando laços e vínculos com os mais de Mil clientes da empresa e os braços do grupo.
Posted 24/01/2006, 18:00
AbrindoASP = chr(60) & "%"
FechandoASP = "%" & chr(62)
Abreaspas = chr(34)
Fechaaspas = chr(148)
foi a mesma ideia que eu usei, para naum dar erro... hehe boa!
mas é isso,.. legal que conseguiu fazer...
* Otávio Nogueira
* Administração e Configuração de Servidores;
* Combinação Perfeita: NGINX + PHP + VARNISH + HAPROXY
* otavio*iporto.com ~ Tel: +55 51 3366 0177 | +55 51 4063 7343 |
* @iporto
* Administração e Configuração de Servidores;
* Combinação Perfeita: NGINX + PHP + VARNISH + HAPROXY
* otavio*iporto.com ~ Tel: +55 51 3366 0177 | +55 51 4063 7343 |
* @iporto
#12
w@shin ! ! !
-
- Usuários
-
- 109 posts
Normal
- Sexo:Não informado
- Interesses:Hardware , Dream weaver , flash e Corel Draw . . .
Posted 24/01/2006, 19:26
opá, estou aqui de novo com dúvidas...
Essa linha:
set f = fso.CreateTextFile(Server.Mappath ("pasta" &"\" &"exemplo2.asp"), True)
essa linha de código define o nome do arquivo e em que pasta ele será criado, certo? , como faço para que no nome da pasta seja capturado de uma variável. Terei um formulário anters desta página. Nesse formulário o usuário digitará o nome da pasta(ela já existe) em que ele deseja criar o arquivo. Quero capturar (Request.Form("pasta") oq o usuário digitar e colocar nessa linha:
set f = fso.CreateTextFile(Server.Mappath ("pasta" &"\" &"exemplo2.asp"), True)
Essa linha:
set f = fso.CreateTextFile(Server.Mappath ("pasta" &"\" &"exemplo2.asp"), True)
essa linha de código define o nome do arquivo e em que pasta ele será criado, certo? , como faço para que no nome da pasta seja capturado de uma variável. Terei um formulário anters desta página. Nesse formulário o usuário digitará o nome da pasta(ela já existe) em que ele deseja criar o arquivo. Quero capturar (Request.Form("pasta") oq o usuário digitar e colocar nessa linha:
set f = fso.CreateTextFile(Server.Mappath ("pasta" &"\" &"exemplo2.asp"), True)
http://www.cashfiest....php?ref=washin
Dinheiro extra
Dinheiro extra
#13
Luis Otávio
-
- Usuários
-
- 3113 posts
Super Veterano
- Sexo:Masculino
- Localidade:Porto Alegre
-
Interesses:- Desenvolvimento de aplicações Web com linguagem server-side PHP.
- Desenvolvimento de aplicações Web com linguagem cliente-side JavaScript, conhecedor e utilizador da biblioteca jQUERY e todas suas características.
- Otimização de Desempenho aplicados a performance de banco de dados Mysql.
- Otimização de Desempenho para servidores Web utilizando-se como Webserver NGINX em conjunto com Varnish.
- Sólidos conhecimentos no CMS WordPress para novas implementações, manutenção, criação e otimização de Plugins.
- Práticas de atendimento, relacionamento e suporte ao cliente. Trabalhando voltado ao público desde o lançamento da empresa iPORTO.COM, criando laços e vínculos com os mais de Mil clientes da empresa e os braços do grupo.
Posted 24/01/2006, 22:05
var_Pasta = "Batatinhas"
set f = fso.CreateTextFile(Server.Mappath (var_Pasta &"\" &"exemplo2.asp"), True)
set f = fso.CreateTextFile(Server.Mappath (var_Pasta &"\" &"exemplo2.asp"), True)
* Otávio Nogueira
* Administração e Configuração de Servidores;
* Combinação Perfeita: NGINX + PHP + VARNISH + HAPROXY
* otavio*iporto.com ~ Tel: +55 51 3366 0177 | +55 51 4063 7343 |
* @iporto
* Administração e Configuração de Servidores;
* Combinação Perfeita: NGINX + PHP + VARNISH + HAPROXY
* otavio*iporto.com ~ Tel: +55 51 3366 0177 | +55 51 4063 7343 |
* @iporto
#14
w@shin ! ! !
-
- Usuários
-
- 109 posts
Normal
- Sexo:Não informado
- Interesses:Hardware , Dream weaver , flash e Corel Draw . . .
Posted 25/01/2006, 02:08
valeu Luis Otávio, me ajudou muitíssimo
http://www.cashfiest....php?ref=washin
Dinheiro extra
Dinheiro extra
1 user(s) are reading this topic
0 membro(s), 1 visitante(s) e 0 membros anônimo(s)
