[e-mail]

安全性好,适用于展示和进行资源下载的个人和大型网站使用!

<!--#include file="inc/conn.asp"-->
<%
call checkadmin("upload")
Const PageCount=20
if request("page")<>"" then
currentPage=cint(request("page"))
else
currentPage=1
end if
MaxPerPage=PageCount
UploadDir="../upload"    
strFileName=""
TruePath=Server.MapPath(UploadDir)
If not IsObjInstalled("Scripting.FileSystemObject") Then
Response.Write "<b>鎮ㄧ殑鏈嶅姟鍣ㄤ笉鏀