Upload sem preencher o campo da imagem

[Valnei WS]

Adaptei um sistema de upload num formulário meu, no IE e no Firefox funciona perfeito, mas no chrome falha.

é o seguinte se não for enviado uma imagem ele pega e coloca uma imagem do sistema.

cfoto = "imagens" + nome_foto

IF cfoto = "imagens/" then

cfoto = "img/sem_imagem.jpg"

End IF

' Fazendo o Upload do arquivo selecionado

if foto <> "" then

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

Erro nessa line 45: Set MyFile = ScriptObject.CreateTextFile(pasta & nome_foto)

esta funcionando certinho no IE e no Firefox, mas no chrome falha

Erro de tempo de execução do Microsoft VBScript erro '800a0046'

Permissão negada

/produtos/incluir.asp, line 45

[bareta]

seu erro é auto descritivo, configure as permissões corretamente e tente novamente.

[Rickardo]

tem q dar permissão de escrita no diretório

Adaptei um sistema de upload num formulário meu, no IE e no Firefox funciona perfeito, mas no chrome falha.

é o seguinte se não for enviado uma imagem ele pega e coloca uma imagem do sistema.

cfoto = "imagens" + nome_foto

IF cfoto = "imagens/" then

cfoto = "img/sem_imagem.jpg"

End IF

' Fazendo o Upload do arquivo selecionado

if foto <> "" then

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

Erro nessa line 45: Set MyFile = ScriptObject.CreateTextFile(pasta & nome_foto)

esta funcionando certinho no IE e no Firefox, mas no chrome falha

Erro de tempo de execução do Microsoft VBScript erro '800a0046'

Permissão negada

/produtos/incluir.asp, line 45