Inglobare upload in un form

[Sanjet]

Purtroppo pare che l'inclusione di upload.asp generi un conflitto:

ADODB.Stream error '800a0bb9' 

Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another. 

/public/inkall/upload.asp, line 590

Vi mostro come ho disposto il codice:

<%
Dim oUpload
Set oUpload = new cUpload
oUpload.Load() 

'RECUPERO DAL FORM
id = oUpload.Form("id")
avatar = oUpload.Form("avatar")
firma = oUpload.Form("firma")
bg = oUpload.Form("bg")
menu = oUpload.Form("menu")
large = oUpload.Form("large")
avy = oUpload.Form("avy")


'REPLACE
bg = Replace(bg, "<", "&lt;")
bg = Replace(bg, ">", "&gt;")
firma = replace(firma,"'","''")
bg = replace(bg,"'","''")
firma = replace(firma,vbCrLf,"
")
bg = replace(bg,vbCrLf,"
")   

'CONDIZIONI
If large = 1 Then
lrg = 1
else
lrg = 0
end if
 
'SE HO SELEZIONATO PER UN AVATAR DA UPPARE...
If avy = 2 Then
nym = "av" & id
        oUpload.UploadOnly "Images"
		oUpload.AutoRename = False
		oUpload.Overwrite = true
		oUpload.SetPath "avatar\"
		oUpload.Upload
		oUpload.SaveAs nym & ".jpg"
avatar = "avatar/" & nym	
end if
'...O NIENTE

'E INSERISCE
strSQL = "UPDATE info SET avatar = '"&avatar&"', firma = '"&firma&"', bg = '"&bg&"', menu = "&menu&", large="&lrg&" WHERE id ="&id 
response.write strSQL & "

"
Conn.Execute strSQL

response.write "<font face='Verdana' size='1'>Modifica effettuata con successo.</font>"

Set oUpload=Nothing 
%>