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

Sem Path Como Resolver Isso


Guest Katia Medeiros

Pergunta

Guest Katia Medeiros

Olá pessoal tenho um programinha de noticias que envia images porem , meu quando jogo no provedor ele da o seguinte erro :

Disallowed Parent Path

agenda/htmlarea/insert_image.asp, line 7

dai entrei em contato com o provedor ele me disse que, não está com o path instalado e me deu este código dizendo isso:

O Parent Path abre uma brecha de segurança pois permite retornar diretórios, e avançar, desta forma possibilitando qualquer um descobrir todos arquivos existente na máquina, por isso o padrão é estar desabilitado e só habilitamos para clientes conhecidos, preferencialmente revendas.

Mas é possivel obter o Path fisico utilizando logica de string, como abaixo mostrado:

cDbPath=Server.MapPath( "." )

n=InStrRev( cDbPath, "\" )

cDbPath=Mid( cDbPath, 1, n-1 ) & "\Dados\"

-------------------------------------------------------------------------------

Aqui segue o meu código alguém pode incluir isso acima no meu código abaixo?

<%

Response.buffer=True

Set Connect = Server.CreateObject("ADODB.Connection")

Connect.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("../noticias.mdb")

Set objFSO = Server.CreateObject("Scripting.FileSystemObject")

strImageFolder="/imagens/"

folder1 = strImageFolder

folder2 = Server.MapPath(folder1)

Set files = Server.CreateObject("Scripting.FileSystemObject")

If Not files.FolderExists(folder2) Then

files.CreateFolder(folder2)

End If

Set objfolder = files.getFolder(folder2)

%>

Grata

Link para o comentário
Compartilhar em outros sites

11 respostass a esta questão

Posts Recomendados

  • 0

você tem q utilizar o caminho absoluto.

Troque isso:

Connect.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("../noticias.mdb")

por:

Connect.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\seusite\bancodedados.mdb"

Só trocar o caminho ali q é fictício pelo caminho completo!

[]s

Link para o comentário
Compartilhar em outros sites

  • 0

Código setting.asp

<%

Response.buffer=True

Set Connect = Server.CreateObject("ADODB.Connection")

Connect.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\domains\studioone.com.br\wwwroot\agenda\noticias.mdb"

Set objFSO = Server.CreateObject("Scripting.FileSystemObject")

strImageFolder="/imagens/"

folder1 = strImageFolder

folder2 = Server.MapPath(folder1)

Set files = Server.CreateObject("Scripting.FileSystemObject")

If Not files.FolderExists(folder2) Then

files.CreateFolder(folder2)

End If

Set objfolder = files.getFolder(folder2)

%>

Link para o comentário
Compartilhar em outros sites

  • 0
Guest - Marcio -

o que esta acontecendo amigo é que conta no nome de criação / tipo:

strImageFolder="/imagens/" assim você está pedindo para criar a pasta com este nome

/imagens/ e isto não é possivel no sistema faça o teste criando uma nova pasta no seu sistema que vai dar este erro ai tambem.

coloque assim:

strImageFolder="imagens"

se coloca assim por que você não esta indicando um direitorio e sim criando um.

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,3k
    • Posts
      652,4k
×
×
  • Criar Novo...