최초등록

This commit is contained in:
sp1000je
2026-02-23 10:01:00 +09:00
commit 7bc9767bf4
3120 changed files with 198447 additions and 0 deletions
+63
View File
@@ -0,0 +1,63 @@
<%@ codepage = 65001%>
<% session.codepage = 65001 %>
<%Response.CharSet = "UTF-8"%>
<%
Response.Buffer = False
a_tablename = Request.QueryString("a_tablename")
filename = Request.QueryString("filename")
a_tablename = Replace(a_tablename, "..", "" )
a_tablename = Replace(a_tablename, "/", "" )
filename = Replace(filename, "..", "" )
filename = Replace(filename, "/", "" )
If filename = "" Then
%>
<SCRIPT LANGUAGE="JavaScript">
<!--
alert("잘못된 페이지 요청")
history.go(-1);
//-->
</SCRIPT>
<%
response.end
End if
strDirectory = server.mappath( "/data/banner/" )&"\"
filepath = strDirectory & filename
'filepath = Request.QueryString("file")
'filename = Mid(filepath, InStrRev("\")+1)
set objFS = Server.CreateObject("Scripting.FileSystemObject")
If objFS.FileExists(filepath) = False Then
%>
<SCRIPT LANGUAGE="JavaScript">
<!--
alert("잘못된 페이지 요청")
history.go(-1);
//-->
</SCRIPT>
<%
response.end
End if
set objF = objFS.GetFile(filepath)
Response.AddHeader "Content-Disposition","attachment;filename=" & filename
Response.AddHeader "Content-Length", objF.Size
set objF = nothing
set objFS = nothing
Response.ContentType = "application/unknown"
Response.CacheControl = "public"
Set objDownload = Server.CreateObject("DEXT.FileDownload")
objDownload.Download filepath
Set uploadform = Nothing
%>