Programming/Web (1) 썸네일형 리스트형 [asp] SiteGalaxy Upload Function Set up = Server.CreateObject("SiteGalaxyUpload.Form") Set fs = CreateObject("Scripting.FileSystemObject") Function UploadFile(obj, folder, prevFile) fieldValue = up(Cstr(obj)) if fieldValue "" then Dim fn, strFileName, strPath, rootpath, returnValue fn = "" strFileName = "" returnValue = "" rootpath = Server.MapPath("/") ' uploadpath = rootpath & "\upload_file\" & folder & "\" & up.Item(Cstr(obj.. 이전 1 다음