Criação De Pastas

[marcelolima]

Boa tarde gente...

É o seguinte... estou trabalhando numa inclusão de fotos e eventos...

A página de criação de eventos está funcionando direito.

Agora, preciso da inclusão de fotos nos eventos. Para isso, é preciso ter uma rotina para indicar a pasta onde será salvo... incluindo a opção de criação de pastas.

Daí a pessoa escolhe o evento onde ela quer incluir aquelas fotos, escolhe as fotos... e indica onde ela vai ficar gravada...

Espero que tenham entendido..

Abração e tudo de bom!

[marcelolima]

outra coisa..

criei essa pasta ACIA.. para poder testar

daí.. deu esse erro...

Tipo de erro:
Erro de compilação do Microsoft VBScript (0x800A040E)
'loop' sem 'do'
/upload.asp, line 64

quando coloco o do loop dá outro erro:

Tipo de erro:
Erro de compilação do Microsoft VBScript (0x800A0404)
'While', 'Until' ou fim de instrução esperado
/upload.asp, line 64, column 3

[cyberalexxx]

Agora não sei o que é pois ta certo tem um Do while true e um loop no final, ta certo!!

[marcelolima]

porque ele tá dizendo que tá faltando um 'do'?

[marcelolima]

descobri.. faltava um 'end if'

mas olha.. sobre aquele negócio de incluir a pasta... conhece alguma função para fazer isso?

Tipo no upload...

Antes ele testa para saber se existe essa pasta... e se não.. ele inclui!!!

O q diz???

[marcelolima]

olha o que eu toh tentando fazer...

tem uma página que envia no form a informação pasta...

folder = Request.Form("pasta")
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.CreateFolder(& folder)
Set fso = Nothing 
%>
           <%For each pastaUP in pastas%> 
           <img src="../imagens/folder.gif" width="12" height="12"> <a href="index.asp?lcl=fotosnoevento&nome=<%=pastaUP.name%>"><%=pastaUP.name%></a> 
           <br>
           <%next%>
         </div></td>
     </tr>
     <tr>
<% if len(Request.Form("pasta") <> "" then

%>

o que faço agora???

para incluir dinamicamente?

[cyberalexxx]

Da uma olhada aqui:

http://scriptbrasil.com.br/forum/index.php...pic=20523&st=30

Aqui voce aprende como vefiricar se a pasta exite e como cria-la

[marcelolima]

ô.. beleza.. foi canseira mas deu certo. Nada que uns 'ifs' não resolvessem...

muito obrigado brother!!!