안녕하세요 이노님
다음의 잘료실 소스는 언제가 학원다니는 친구가 준 자료실 소스인데요
업 할 자료가 5메가 이상이면 경고창
그리고 자료를 올리지 않으면 경고창이 뜨는 데요
5메가 이상이면 경고창 뜨는거는 상관 없는데 자료를 올리지 않으면
경고창이 뜨는걸 자료를 올리지 않아도 상관없게 하고 싶은데 제 실력으
론.. 해당 태그가 11번열 인건 같은데 어떻게 고치면 될까영....
부탁합니당^^
소스 시작
1.<!--#include file="../include/dbcon.txt" -->
2.<% set up=server.createobject("sitegalaxyupload.form")
3. if up("up_file").size > 5000 * 1024 then
4.%>
5.<script language=javascript>
6.alert("파일의 용량이 초과되었습니다\n파일은 5MB이하만 가능합니다")
7.history.back()
8.</script>
9.<% response.end
10. end if
11. if up("up_file").size=0 then %>
12.<script language=javascript>
13.alert("올바른 형식의 파일이 아닙니다.\n다시 확인하여 주십시오")
14.history.back()
15.</script>
16.<% else
name=up("name")
up_file=up("up_file")
subject=up("subject")
content=up("content")
pwd=up("pwd")
ip=request.servervariables("remote_host")
name=replace(name,"'","''")
subject=replace(subject,"'","''")
content=replace(content,"'","''")
set fs=server.createobject("scripting.filesystemobject")
filename=fs.getfilename(up_file)
savefile="c:\project\data\upfile\"&filename
if fs.fileexists(savefile) then %>
<script language=javascript>
alert("기존의 파일이 존재합니다.\n다시 확인하여 주십시오")
history.back()
</script>
<% end if
sql="insert into upload_table
(up_name,up_file,up_subject,up_content,up_pwd,up_writeday,up_ip,up_rea
dnum,up_downnum)"
sql=sql&"values ('"&name&"','"&filename
sql=sql&"','"&subject&"','"&content
sql=sql&"','"&pwd&"','"&now()
sql=sql&"','"&ip&"',0,0)"
dbcon.execute sql
up("up_file").saveas (savefile) %>
<script language=javascript>
alert("성공적으로 파일이 업로드 되었습니다.\n확인키를 누르시면 자료실
로 이동합니다.")
location.href="list.asp"
</script>
<% response.end
end if
dbcon.close()
set dbcon=nothing
%> |