aspupload

Olá Amigos, Helpimasters!!!

Estou aprendendo como fazer um Upload e consegui o seguinte código, ja consegui interpretar algumas coisas ...

Mas mesmo assim ainda esta dificil....

Gostaria de saber se aguem pode comentar esse código:

response.buffer = true   set oUpload = server.createobject("ASPUpLoad.clsUpload") oUpload.Path = Server.MapPath("enviado\") if oUpload.Form("SaveAs") <> "" then   sSplit = split(oUpload.Form("SaveAs"), "\") sFileName = sSplit(ubound(sSplit))  if oUpload.Form("FileType") <> "Other" then      If instr(sFileName, ".") > 0 then    sSplit = split(sFileName, ".")    sFileName = sSplit(0) & "." & oUpload.Form("FileType")    Else    sfileName =  sFileName & "." & oUpload.Form("FileType")    End if    End if oUpload.FileName = sFileName End if   bAns = oUpload.Save

Obrigado!!

Ythalo Rossy! :wacko:/>