ABCUpload 서버 객체를 이용한 파일업로드
dim uploadform : Set uploadform = Server.CreateObject("ABCUpload4.XForm")
uploadform.Overwrite = true
uploadform.AbsolutePath = true
uploadform.MaxUploadSize = 30000000
uploadform.Overwrite = true
uploadform.AbsolutePath = true
uploadform.MaxUploadSize = 30000000
dim objFile, filepath, filename : filepath = Server.MapPath ("/") & "\file_data\EvalAchivements\"
set objFile = uploadform("item_filename")(1)
if objFile.safefilename <> "" then
filename = objFile.safefilename
objFile.Save filepath & filename
else
filename = ""
end if
set objFile = nothing
상기 서버 객체로 받으려면 폼 엘리먼트에 아래와 같은 속성값을 주어야 한다.
<form name="form_insert" action="..." method="post" enctype="multipart/form-data">
