Stimson(원작)
에는 현재 구성 요소가 없는 업로드 클래스가 많이 있습니다. 살펴보니 대부분이 매우 복잡하다는 것을 알았습니다. 가장 중요한 것은 10줄 미만의 클래스가 없다는 것입니다. code:) 밤새도록 ADODB.Stream을 연구하고 6줄의 코드를 사용하여 구성 요소 없는 업로드를 구현했습니다.
strFileName = Request.QueryString("file1")
objStream = Server.CreateObject("ADODB.Stream") 설정
objStream.Type = 1 ' adTypeBinary
objStream.Open
objStream.LoadFromFile strFileName
objStream.SaveToFile 서버."123_onweb.gif",2
사용 방법:
위의 코드를 upload.asp로 작성하세요.
브라우저에 다음을 입력하세요.
GetFileName = mid(strFile,InStrRev(strFile, "")+1)
또 다른
GetFileName = ""
종료 조건
함수 종료
strFileName = Request.Form("file1")
objStream = Server.CreateObject("ADODB.Stream") 설정
objStream.Type = 1 ' adTypeBinary
objStream.Open
objStream.LoadFromFile strFileName
objStream.SaveToFile Server.MapPath(GetFileName(strFileName)),2
objStream.Close
%>
upload.htm 파일
<form name="FORM" action="upload.asp" method="post">
<input type="제출" 이름="제출" 값="확인">
<input type="file" name="file1" style="width:400" value="">
</form>