frm_action.asp
if Request.ServerVariables("REQUEST_METHOD") = "POST" then
Dim Upload, fileName, fileSize, ks, i, fileKey
Set Upload = New FreeASPUpload
Upload.Save(uploadsDirVar)
ks = Upload.UploadedFiles.keys
if (UBound(ks) <> -1) then
for each fileKey in Upload.UploadedFiles.keys
cSize = Upload.UploadedFiles(fileKey).Length
cType = Upload.UploadedFiles(fileKey).ContentType
cName = Upload.UploadedFiles(fileKey).FileName
end if
Load balance : Server 02
