Sem Path Como Resolver Isso

[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

[Bicicleta]

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

[Guest Guest]

Não funcionou não! alguém tem ouitra dica?

[.Andreia.]

Não funcionou não! alguém tem ouitra dica?

Apareceu algum erro?

Tente assim:

Connect.Open "DBQ=C:\CAMINHO_DO_BANCO_DE_DADOS\SEU_BANCO.mdb;Driver={Microsoft Access Driver (*.mdb)}"

[Guest Katia Medeiros]

Fiz de novo o que voê mandou mas continua dando este erro!!

[Guest Guest]

Fiz o que você pediu mas continua dando o mesmo erro el abaixo

<a href="http://server6.theimagehosting.com/image.php?img=erro.45f.JPG" target="_blank"><img src="http://images6.theimagehosting.com/erro.45f.th.JPG" border="0" title="The Image Hosting" /></a>

[Bicicleta]

Poste o código aqui do modo que você usou no seu código... porque o erro mostra que você ainda está usando o mesmo método!

[Guest Guest]

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)

%>

[Bicicleta]

tente alterar isso:

strImageFolder="/imagens/"

por isso:

strImageFolder="imagens/"

se não resolver, você vai ter trocar isso:

folder2 = Server.MapPath(folder1)

por

folder2 = "c:\caminhoDaPasta\"

falou!!!

[Guest Guest]

Ainda continua sem funcionar!!

O que faço alguém tem uma lUZ?

[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.

[Guest Guest]

Pessoal o erro ainda persiste, Lembrando a vocês que o Parente path não está instalado no provedor.