Problema

[mariofdf]

Esta dando o seguinte erro...

Microsoft VBScript runtime error '800a0046'

Permission denied

/Fotos/categoria-acao.asp, line 50

o que pode ser, acredito que meu codigo esteje correto.

' variaveis
DiretorioFotos = server.mappath("..\fotos")
DiretorioCategoria = Request.Form("DiretorioCategoria")

'parte onde acontece o erro
  	' cria diretorio da categoria caso não exista
  	Set fso = CreateObject("scripting.FileSystemObject")
  	If not (fso.FolderExists(diretoriofotos &"\"& diretoriocategoria)) then
    fso.Createfolder(diretoriofotos &"\"& diretoriocategoria)
  	end if

agradeço desde já...

[Bicicleta]

você tem q ter permissão de escrita na pasta onde está tentando criar a subpasta!!!

[mariofdf]

eu já dei permissão de escrita...

vou analisar melhor meu codigo

[mariofdf]

já arrumei...

O problema estava no sistema de segurança do provedor, que bloqueia comandos que podem ser nocivos, então o que eu fiz foi mudar as configuração do sistema, mas no codigo não tem nada errado...

Pode feixar o tópico....