ปัญหา Server object error 'ASP 0177 : 800401f3' เพิ่มหัวข้อข่าวหรือกระทู้ใหม่ไม่ได้

Set Upload = Server.CreateObject("Persits.Upload.1") <========================== line 49
	' Optional: make sure file names are unique when calling File.SaveAs
	Upload.OverwriteFiles = false 
	Upload.SaveVirtual gsForumImgPath
	
	
	For Each File in Upload.Files
		sFileTemp = File.ExtractFileName
		sFileName = Lcase(AlmostUniqueID &"."& Right(File.ExtractFileName,3))
		
			If len(sFileName) > 0 then
				sFilenameLg = sFileName
				sFilenameSm = "sm_"&sFileName
			else
				sFilenameLg = ""
				sFilenameSm = ""				
			end if