Salve ho un problema con uno script di upload di immagini.

ho inserito il form che funge bene

<td class="standard">
<input type="file" name="file" size="20"></td>
</tr>

la chiamata va su inserisciprodottonuovo.asp

lo script richiama un file upload.asp ma va in errore

Microsoft VBScript runtime error '800a01a8'
Object required: 'Files'
/amministrazione/upload.asp, line 597


Dim s
GetFileName=""
if Not Files.EOF then
s = Files("Name")
if Files("Ext")<>"" then s = s & "." & Files("Ext")
GetFileName = s end if
end function


cosa non va? grazie