2 upload

[enpenzieri]

e se invece volessi cambiare il path secondo il InputName + un altro paramentro di identificazione?
esempio
1-->JPGSMALL: "/public/id1/jpgsmall/"
1-->JPGBIG: "/public/id1/jpgbig/"
2-->JPGSMALL "/public/id2/jpgsmall/"
2-->JPGSBIG "/public/id2/jpgbig/"
etc..

ho provato a fare un select case ma si inchioda e da diversi test effettuati sembra proprio che si inchiodi nel select case e non nel save, dunque si può dedurre che è proprio il SetPath che dà problemi

  Dim oUpload
  Set oUpload = new cUpload
  With oUpload
    .AutoRename = True
    .Overwrite = True
    .Load
    While Not .EOF
    'response.write lCase(.Files("InputName")) & "
"
    Select Case lCase(.Files("InputName"))
        Case "jpgsmall"
          .SetPath "/public/id" & .Form("id_progetto") & "/" & .Files("InputName")
        Case "jpgbig"
          .SetPath "/public/id" & .Form("id_progetto") & "/" & .Files("InputName")
    End Select
    .Save
    .MoveNext
    Wend
  end With
  Set oUpload = Nothing 

in cosa sbaglio?

grazie