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

📄 sys_share.asp

📁 一个超级漂亮的班级主页asp代码
💻 ASP
字号:
<!--插入html头部分以及数据库接口-->
<!--#include file="in_conn.asp"-->



<body>
<!--插入网站置顶-->
<% if u_name="" then
	Response.Redirect "log_err.asp"
else
%>
<!--#include file="in_topmb.asp"-->
<% end if %>

<%
if u_power<2 OR u_name<>DEF_sysadm then
	Response.Redirect "resp.asp?cmd=adm_bigpower"
end if
%>


<script language="javascript">
function okpress(){
	document.fm1.cmdok.disabled=true;
	document.fm1.submit();
}
</script>

<!--#include file="in_sys_share.asp"-->

<table align="center" width="700" height="25" border="0" cellspacing="0" cellpadding="0" class="rdbar"><tr>
	<td width="100%" height="100%">
		&nbsp;<a href="index.asp">[首页]</a>-<a href="sys.asp">后台维护</a>-<font class="ft1">共享附件设置</font>
	</td>
</tr></table>

<table align="center" width="700" height="101" border="0" cellspacing="0" cellpadding="6" class="rdd">
	<tr>
		<td width="150" valign="top" class="rdk2">
			<!--插入左部分-->
			<!--#include file="in_sys_left.asp"-->
		</td>
		<td valign="top">
			<form name="fm1" action="sys_share_deal.asp" method="post">
				&nbsp;<b>设置共享附件及上传的各种限制:</b>
				<br>&nbsp;选择上传方式:<font color="red">(包括照片上传、附件上传、后台班级logo上传、成员头像上传等等。)</font>
				<br>
				<table width="100%" cellpadding="0" cellspacing="0" border="0" class="rde">

				<% if DEF_fjsa=0 then %>
				<tr>
				<td>
				<input type="radio" name="radsa" value="0" checked>使用风声无组件上传类
				</td>
				<td class="rdbar">
				<input type="radio" name="radsa" value="1">使用SA-FileUp上传组件
				</td>
				<td>
				<input type="radio" name="radsa" value="2">使用AspUpLoad上传组件
				</td>
				</tr>
				
				<% elseif DEF_fjsa=1 then %>
				<tr>
				<td>
				<input type="radio" name="radsa" value="0">使用风声无组件上传类
				</td>
				<td class="rdbar">
				<input type="radio" name="radsa" value="1" checked>使用SA-FileUp上传组件
				</td>
				<td>
				<input type="radio" name="radsa" value="2">使用AspUpLoad上传组件
				</td>
				</tr>
				
				<% elseif DEF_fjsa=2 then %>
				<tr>
				<td>
				<input type="radio" name="radsa" value="0">使用风声无组件上传类
				</td>
				<td class="rdbar">
				<input type="radio" name="radsa" value="1">使用SA-FileUp上传组件
				</td>
				<td>
				<input type="radio" name="radsa" value="2" checked>使用AspUpLoad上传组件
				</td>
				</tr>
				<% end if %>
				
				<tr>
					<td valign="top" height="25" width="33%">
					&nbsp;影响全部上传。
					</td>
					
					<td valign="top" width="33%" class="rdbar">
					选择此项只影响附件的上传,其余上传则使用风声无组件上传!
					</td>
					
					<td valign="top">
					&nbsp;影响全部上传。
					</td>
				</tr>
				</table>
				
				<br>&nbsp;<font color="red">**共享附件要求你的网站有一定的多余空间,以kb为单位,请谨慎设置!</font>
				<br><br>&nbsp;班级总的共享空间:<input type="text" name="txtall" class="kong" maxlength="6" size="10" value="<% =DEF_fjall %>" onKeypress="if (event.keyCode < 48 || event.keyCode > 57) event.returnValue=false;">KB&nbsp;&nbsp;<font color="red">(设置为0则表示禁止附件上传!)</font>
				<br>&nbsp;当前已使用空间:<% =DEF_fjnow %>KB &nbsp;&nbsp;
				<%
				if DEF_fjall<1 then
					Response.Write "使用率:<font color=red>共享空间已禁用</font>"
				else %>
					 使用率:<font color=red><%
					if (DEF_fjnow/DEF_fjall)*100<1 then
					 	vooo="0"
					else
						vooo=""
					end if
					Response.Write vooo&FormatNumber(((DEF_fjnow/DEF_fjall)*100),2) 
					 %>%</font>
				<%
				end if
				%>
				&nbsp;&nbsp;<a href="sys_share_deal.asp?cmd=retj" class="ccqkl">[重新统计占用空间]</a>
				<br><br>&nbsp;普通成员最大共享空间:<input type="text" name="txteach" class="kong" maxlength="5" size="10" value="<% =DEF_fjeach %>" onKeypress="if (event.keyCode < 48 || event.keyCode > 57) event.returnValue=false;">KB   &nbsp;&nbsp;(最大为总共享空间的<font color="red">十分之一</font>)
				<br>&nbsp;管理员最大共享空间:&nbsp;&nbsp;<input type="text" name="txtx" class="kong" maxlength="5" size="10" value="<% =DEF_fjx %>" onKeypress="if (event.keyCode < 48 || event.keyCode > 57) event.returnValue=false;">KB   &nbsp;&nbsp;(最大为总共享空间的<font color="red">二分之一</font>)
				<br>&nbsp;(设置为0则表示禁止该类成员的附件上传!)
				
				<br><br>&nbsp;单个附件的大小限制:<input type="text" name="txtfen" class="kong" maxlength="5" size="10" value="<% =DEF_fjfen %>" onKeypress="if (event.keyCode < 48 || event.keyCode > 57) event.returnValue=false;">KB &nbsp;&nbsp;<font color="red">(设置0表示大小不受限制,请勿设置太大,以免超时)</font>
				
				<br><br>&nbsp;多种附件格式的请使用'<font color="red">/</font>'符号进行分隔,文件类型以文件扩展名表示
				<br>&nbsp;普通成员支持的附件格式:<input type="text" name="txtsupport1" class="kong" maxlength="150" size="50" value="<% =DEF_fjsupport1 %>">
				<br>&nbsp;管理员支持的附件格式:&nbsp;&nbsp;<input type="text" name="txtsupport2" class="kong" maxlength="150" size="50" value="<% =DEF_fjsupport2 %>">

				<br><br>&nbsp;<b>安全起见,请输入当前班级总管的密码,即你的密码:</b>
				<br>&nbsp;<input type="password" name="txtadmpwd" class="fill" maxlength="14" size="20">
				<br><br>&nbsp;<input type="button" name="cmdok" value=" 确定修改 " onClick="javascript:okpress();" class="an">
				&nbsp;&nbsp;<input type="reset" name="cmdcz" value=" 重置 " class="an">
			</form>
		</td>
	</tr>
</table>


<!--插入在线统计-->
<!--#include file="in_online.asp"-->
<!--插入网站置底-->
<!--#include file="in_bottom.asp"-->
</body>

</html>

⌨️ 快捷键说明

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