이번에는 파일업로드와 더블어서리 파일에 대한 정보를 DB를 이용하여 저장하는 방법을 알아보도록 하겠습니다.
편의상 Access 파일을 DB로 이용하겠습니다. 보통 이 업로드는 자료실을 만들때 주로 사용하게 되는데 요즘은
자료실이라고 따로 만드는게 아니라 게시판에 그냥 파일 업로드 기능을 추가적으로 붙여 사용하고 있죠.
그래서 보통 게시판만들기에서 자료업로드 방법을 많이 설명하는데 보통 게시판만들기 설명에 파일업로드 기능 부분을
같이 설명하면 복잡해 질 수가 있어서 따로 파일 업로드 하는 부분만 이렇게 자리를 마련하였습니다.
이곳에서는 파일을 업로드하고 이때 파일에 대한 정보를 DB안에 저장하는 간단한 방법을 알아보겠습니다. 그래서
DB안에 저장할 내용은 다음과 같이 3가지만 하겠습니다.
① 파일이름 : 업로드한 파일의 이름과 확장명 저장
② 파일경로 : 업로드한 파일의 상대적 경로명 저장
③ 파일크기 : 업로드한 파일의 크기저장
자, 이제 만들어 봅시다. 처음에 말했듯이 DB는 Access를 이용하겠습니다. 그럼 다음그림과 같이각각의
필드명을 가진 DB를 만들어봅시다.
편의상 DB는 C:\DataStore 폴더에 db.mdb 이라 하고 테이블 이름은 tb_upload 라 하겠습니다.
여기서 설명할 부분은 사용자에게 파일을 올릴 수 있도록 하는 문서(dbupload.html)와 실제로 파일을
올리는 문서(dbupload.asp)를 작성하도록 하겠습니다. 그리고 업로드한 파일을 저장할 폴더는 dbupload.html,dbupload.asp
문서가 있는 폴더의 하위 폴더로 dirupload 폴더에 저장하겠습니다. 그리고 저장된 파일과 DB안에 있는
파일정보를 출력시키는 문서를 만들어 봅시다.
1.
dbupload.html 문서 만들기
<html>
<body>
<form
method="post" action="dbupload.asp"
enctype="multipart/form-data">
<input type="file" name="file"><br>
<input type="submit" name="submit" value="submit">
</form>
<body>
</html> |
2. dbupload.asp 문서 만들기
<!--METADATA TYPE= "typelib" NAME=
"ADODB Type Library"
FILE="C:\Program
Files\Common Files\SYSTEM\ADO\msado15.dll" -->
<%
Set theForm = Server.CreateObject("ABCUpload4.XForm")
Set theField = theForm("file")(1)
If theField.FileExists Then
filename
= theField.SafeFileName
filepath
= "./dirupload/" & theField.SafeFileName
filesize
= theField.Length
theField.Save
filepath
Set cn = Server.CreateObject("ADODB.Connection")
strConnect="Provider=Microsoft.Jet.OLEDB.4.0;"
& _
"Data Source=C:\DataStore\updb.mdb"
cn.Open
strConnect
Set rs =
Server.CreateObject("ADODB.Recordset")
rs.Open
"tb_upload",strConnect, adOpenStatic, adLockPessimistic,
adCmdTable
rs.AddNew
rs.Fields("b_filename") = filename
rs.Fields("b_filepath") =
filepath
rs.Fields("b_filesize")
= filesize
rs.Update
rs.Close
End If
%>
<html>
<body>
File uploaded...
</body>
</html> |
3. dbupload.asp 문서 설명
<!--METADATA TYPE= "typelib" NAME=
"ADODB Type Library"
FILE="C:\Program
Files\Common Files\SYSTEM\ADO\msado15.dll" -->
|
ADO 상수를 이용하기 위해 msado15.dll 파일을 위와같이 연결시켜줍니다. ADO 상수는 아래부분에서
레코드셋 개체를 오픈할때 adOpenStatic, adLockPessimistic, adCmdTable 상수를
이용하게 됩니다. 이 상수가 정의 되어 있는 파일이 msado15.dll 파일입니다.
Set theForm = Server.CreateObject("ABCUpload4.XForm")
Set theField = theForm("file")(1) |
ABCUpload 컴포넌트의 개체 XForm의 인스턴스값을 생성하는 과정과 이것을 이용하여 업로드시킨 파일에
대한 XField 개체의 인스턴스값을 생성하는 부분입니다. 이후 변수 theForm과 theField는 이
두개의 개체를 대신하게 됩니다.
| If theField.FileExists Then |
XField개체의 FileExists 속성을 검사해서 업로드할 파일이 있으면 업로드과정으로 넘어가게 하는 조건문의
사용입니다.
filename = theField.SafeFileName
filepath = "./dirupload/" & theField.SafeFileName
filesize = theField.Length |
역시 XField 개체의 속성값을 이용하는데 속성 SafeFileName은 파일의 이름의 값을 가지고 있고
이것을 변수 filename에 대입하였습니다. 그리고 filepath는 업로드할 파일의 경로명을 filepath라는
변수에 넣었습니다. 처음에 말했듯이 dbupload.asp 문서가 있는 폴더의 하위 폴더 dirupload로
파일이름 그대로 저장하기 위하여 filepath라는 변수에 저장합니다. 속성 Length는 파일의 크기값을
가지게 됩니다. 이것을 filesize라는 변수에 넣었습니다.
XField 개체에서 지원하는 Save 메쏘드 입니다. 형식은 theField.Save 저장경로명 인데 여기서는
이전에 filepath라는 변수에 파일의 상대적 경로명(폴더의위치와 파일이름)를 지정했으므로 이 변수를 path로
사용하였습니다. 이것으로 파일 업로드는 끝입니다.
Set cn = Server.CreateObject("ADODB.Connection")
strConnect="Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=C:\DataStore\updb.mdb"
cn.Open strConnect |
ADO 개체 Connection의 인스턴스 값을 생성하고 이것을 이용하여 DB에 연결하기 위한 쿼리컨넥션의
값을 지정하고 연결하는 방법입니다. 이렇게 함으로써 원하는 DB로의 연결이 가능하게 합니다.
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open "tb_upload",strConnect, adOpenStatic, adLockPessimistic,
adCmdTable |
ADO 개체 레코드셋 개체의 인스턴스값을 생성하고 이것을 이용하여 테이블 tb_board에 있는 레코드셋을
ADO 개체의 레코드셋 개체로 가져오는 과정을 수행하게 됩니다. 맨 상단에 포함한 파일에서 지정한 상수를 이용하여
레코드셋을 불러올때의 커서타입과 락타입을 지정하는 과정입니다. 여기서 사용한 방법은 스크롤 가능한 커서타입과
락퍼스미스틱 방법을 이용하였습니다.
rs.AddNew
rs.Fields("b_filename") = filename
rs.Fields("b_filepath") = filepath
rs.Fields("b_filesize") = filesize
rs.Update
rs.Close |
생성된 레코드셋의 인스턴스값을 가진 변수 rs를 이용하여 새로운 레코드를 생성하고 각각의 필드에 위에서 지정했던
변수의 값을 차례로 대입하고 업데이트 시키는 과정입니다. 그리고 업데이트가 끝나면 레코드셋을 닫아버리고 있습니다.
이 과정이 끝나면 우리가 사용하는 DB안에 파일에 대한 정보가 저장되게 됩니다.
4. 확인
먼저 브라우저로 dbupload.html 문서를 로딩한후 적당한 파일을 선택하여 파일 하나를
올려보도록 하자 그리고 파일 업로딩이 무사하게 끝났으면 파일 업로드 정보를 담고 있는 DB를 열어서 어떤 정보가
저장되었는지 확인해보기 바란다. 다음 그림은 임의의 파일을 업로딩한후 DB안에 저장된 파일 정보이다.
5. DB안의 정보를 출력시키기 - dbuploadview.asp
문서
<!--METADATA TYPE= "typelib" NAME=
"ADODB Type Library"
FILE="C:\Program
Files\Common Files\SYSTEM\ADO\msado15.dll" -->
<%
strConnect="Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=C:\DataStore\updb.mdb"
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.Open strConnect
SQL = "SELECT * FROM tb_upload"
Set objRS = objConn.Execute(SQL)
Do while Not objRS.EOF
filename
= objRS("b_filename")
filepath
= objRS("b_filepath")
filesize
= objRS("b_filesize")
Response.Write
"파일이름 : " & filename & _
" (" & filesize & ")" & _
" <a href=" & filepath & ">" & filename & "</a><br>"
objRS.MoveNext
Loop
Set objRS = nothing
Set objConn = nothing
%> |
소스입력후 확인 화면은 다음과 같습니다.
|
|
