📄 saveannounce_upload.asp

📁 asp构建网站bbs.采用B/S架构

💻 ASP

字号:

<!--#include file="conn.asp"-->
<!-- #include file="inc/const.asp" -->
<script>
if (top.location==self.location){
	top.location="index.asp"
}
</script>
<html>
<head>
<title></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<!--#include file="inc/Forum_css.asp"-->
</head>

<body <%=Forum_body(11)%>>
<form name="form" method="post" action="saveannouce_upfile.asp?boardid=<%=request("boardid")%>" enctype="multipart/form-data">
<table width="100%" border=0 cellspacing=0 cellpadding=0>
<tr><td class=tablebody1 valign=top height=40>
<%if Cint(GroupSetting(7))=0 then%>
您没有在本论坛上传文件的权限
<%else%>
<input type="hidden" name="filepath" value="UploadFile">
<input type="hidden" name="act" value="upload">
<input type="hidden" name="fname">
图片
<input type="file" name="file1">
<input type="submit" name="Submit" value="上传" onclick="fname.value=file1.value,parent.document.forms[0].Submit.disabled=true,
parent.document.forms[0].Submit2.disabled=true;">
可以上传：
<select name="filetype" size=1>
<option value="">文件类型</option>
<%
dim iupload
iupload=split(Board_Setting(19),"|")
for i=0 to ubound(iupload)
response.write "<option value="&iupload(i)&">"&iupload(i)&"</option>"
next
%>
</select>
  限制：<%=GroupSetting(40)%>个，每个<%=GroupSetting(44)%>K
<%end if%>
</td></tr>
</table>
</form>
</body>
</html>
<%
conn.close
set conn=nothing
%>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -