⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 upload1.asp

📁 一个不错的论坛原代码
💻 ASP
字号:
<!--#INCLUDE FILE="Connections.asp" -->
<!--#include file="conn.asp" -->
<!--#include file="bbs.css" -->
<%'取出变量
dim h_uploadtext,lockupload, uploadsize 
 sql="select h_uploadtext,lockupload, uploadsize from home"
 set rsconn1=conn.execute(sql)
 if not rsconn1.eof then
uploadsize =rsconn1("uploadsize")
lockupload =rsconn1("lockupload")
h_uploadtext=rsconn1("h_uploadtext")'上传文件类型
end if
set rsconn1=nothing%>
 <body bgcolor=<%=tcolor2%>  topmargin="0" leftmargin="0" ><% if lockupload="1" then%><div class=tdc>上传功能已经被管理员关闭</div><%else%> 
<form method="post" action="upload.asp?l_id=<%=chktopic(request.querystring("l_id"))%>" enctype="multipart/form-data" name="form2" class=tdc >
<input type=file name="file1" size="40"  class=bdtj>
<input type="submit" name="submit" value="上 传" class=bdtj>
<input type="hidden" name="uploadtypefy" value="upload/">
 只能上传如下类型:<select  name="D1"  class=bdtj3>
 <% h_uploadtext1 = split(h_uploadtext, ",")
    for i = 0 to ubound(h_uploadtext1)
     response.write("<option  class=bdtj2>"&h_uploadtext1(i)&"</optiong>")   
    next%>
 </select> 限制为:<%=uploadsize\1000%>K
</form>
<%end if%>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -