admin_upload.asp

此程序是一个个人主页创造程序,该程序无插件,无任何恶意程序.

<%
'#############################################################
'#      中国在线--极酷论坛 ver.2001 3.0
'#
'#  版权所有: 中国在线 (ChinaXP.Net)
'#
'#  制作人  : 周周 (SeeYa!)
'#
'#
'#  主页地址: http://www.ChinaXP.net/    中国在线
'#	      http://www.ChinaXP.Net/bbs/    中国在线--极酷论坛
'#
'#############################################################
%>
<!--#include file="config.asp"-->
<!--#include file="inc_functions.asp"-->
<!--#include file="inc_top_short.asp"-->
<% mLev = cint(ChkUser2(strDBNTUserName, Request.Cookies(strUniqueID & "User")("Pword"))) %>
<br><br><br>
<div align="center"> <FORM enctype="multipart/form-data" action="admin_UploadEngine.asp" method=POST name="fileup">
  </form>
<font face="<% =strDefaultFontFace %>" size="<% =strDefaultFontSize %>">
   <TABLE width="80%" border=0 cellspacing=1 cellpadding=4 align="center">
    <TR align="center" bgColor="<% =strPopUpTableColor %>">

     <TD align="center">
	 请选择要上传的文件
      <INPUT name="Folder" type="hidden" value="<%= strDBNTUsername %>" >
      <input name="REPLY_ID" type="hidden" value="<% =Request("REPLY_ID") %>">
	  <input name="TOPIC_ID" type="hidden" value="<% =Request("TOPIC_ID") %>">
	  <input name="MEMBER_ID" type="hidden" value="<% =Request("MEMBER_ID") %>">
    </TD>
    </TR>
    <TR>

     <TD align="center">
      <INPUT name="file1" type="FILE" size=20 value="">
     </TD>
	 <td></td>
    </TR>
	<TR>
     <TD align="center"><br>
      <INPUT name="Upload" type=SUBMIT value="开始上传" >
     </TD>
	 <td></td>
    </TR>
	<% If mlev = 4 then %>
		<TR>
     <TD align="center"><br>
      存放目录 <INPUT name="uploaddir" type="text" value="tools" size="20" >
     </TD>
	 <td></td>
    </TR>
<% End If %>
  </FORM>
   </TABLE>
   </font>
</div>
<!--#include file="inc_footer_short.asp"-->