Que erro estranho...

Microsoft VBScript runtime error '800a01b6'

Object doesn't support this property or method

/admin/cad_foto.asp, line 318

Alguem sabe pq será?

É nesse pedaço de codigo

ASP

[*] function imagens(campo)

[*]

[*] 'On error resume next

[*]

[*] set imagem = upload.files(campo)

[*]aqui o erro >>>> if imagem <> "" Then

[*]

[*] imagem.SaveAs caminho&"fotos/"&pasta&"/"& Replace(imagem.FileName, " ", "")

[*] foto = imagem.FileName

[*]

[*] cam = caminho&"fotos/"&pasta&"/"&foto

[*] Set Jpeg = Server.CreateObject("Persits.jpeg")

[*] jpeg.open cam

[*]

[*] jpeg.width = m_largura

[*] jpeg.height = m_altura