SETmybobj=Server.CreateObject("basp21")myform_size=Request.TotalBytesmybuffer=Request.BinaryRead(myform_size)myauthor=mybobj.Form(mybuffer,"author")myfile_name=mybobj.FormFileName(mybuffer,"upfile")myfile_size=mybobj.FormFileSize(mybuffer,"upfile")myfile_name=Mid(myfile_name,InStrRev(myfile_name,"\")+1)mypath=Server.MapPat...