Request de arquivo e campo text (AspJpeg)

[Sirlan 0]

Olá amigos...

 

O problema é o seguinte:

 

Tenho um sistema asp pra fazer upload de imagens de imoveis. Ao fazer o upload, o sistema jah grava no banco o nome do arquivo no imovel a qual ele pertence, desta forma, eu preciso enviar para a pagina upload.asp (que é a q faz a gravação do arquivo) a imagem e mais dois campos hidden (ou text, tanto faz) e estou utilizando o componente ASPJPEG.

 

O formulário de envio dos dados tem o enctype="multipart/form-data", desta forma, o request.form normal do asp não funciona na hora de recuepra o value dos campos hidden.

 

Vi em outros foruns que deveria usar o Upload.form("nomeCampo") para recuperar o value destes campos, mas também não funcionou!

 

Suplico ajuda a alguma alma caridosa que saiba resolver este problema! hehehe

 

Segue abaixo o código das páginas.

 

ENVIA_UPLOAD.ASP

 

ASP

<form method="post" action="upload.asp" enctype="multipart/form-data" name="form">     

        arquivo:

        <input type="text" name="cod_imovel" value="<%=cod_imovel%>">

        <input type="text" name="imagem" value="<%=imagem%>">

        <input type="file" name="arquivo"><br />

        <input type="submit" value="salvar" name="cmdenviar">

</form>

 

UPLOAD.ASP

 

 

ASP

cod_imovel = request("cod_imovel")

imagem = request("imagem")

 

'Cria instância do objeto AspUpload

Set Upload = Server.CreateObject("Persits.Upload")

 

'Seta o caminho para salvar os arquivos carregados

Path = Server.MapPath("/imoveis/"&cod_imovel)

 

'Salva arquivo enviado e Retorna o número de arquivos enviados

Count = Upload.Save(Path)

 

set RS = Server.CreateObject("adodb.recordset")

SQL = ("update imovel set "& imagem &" = ('"& File.ExtractFileName &"') where cod_imovel = "& cod_imovel)

RS.Open SQL,conexao,3

 

 

Desde já agradeço.

[Mário Monteiro 179]

esta dando algum erro especifico?

 

o correto é como voce falou usando o nome do objeto de upload mesmo

[Sirlan 0]

esta dando algum erro especifico?

 

o correto é como voce falou usando o nome do objeto de upload mesmo

Mário...

 

Não dá nenhum erro, simpesmente não recupera os dados!

 

Onde eu encaixaria o Upload.form("nomeCampo") nesse código?

Pode ser q eu tenha colocado no lugar errado!

 

Abraço

[Ted k' 126]

substituindo o "request"

 

ASP

cod_imovel = Upload.form("cod_imovel")

imagem = Upload.form("imagem")

[Sirlan 0]

substituindo o "request"

 

ASP

cod_imovel = Upload.form("cod_imovel")

imagem = Upload.form("imagem")

Ted...

 

Já tentei da forma q você disse e nada tb!

 

Já tentei desta forma tb:

 

Cod = Upload.Form(1)

 

Mas deu esse erro:

Persits.Upload.1 error '800a0009'

Index out of range.

/admin/upload.asp, line 19

 

Mais alguma sugestão?

[Mário Monteiro 179]

que erro da do jeito que o Ted postou?

[Sirlan 0]

Pessoal...

 

Muito obrigado pela ajuda... mas com o tempo curto, acabei utilizando variaveis de sessão para não ficar travado nesse problema.

 

Obrigado!