📄 fbigdfghdfg.asp

📁 本oa系统内部短信.手机短信.文件传输.公文收发.邮件服务.共享下载.内部论坛等功能
💻 ASP
字号:
<%  
Response.ExpiresAbsolute=now()-1
Response.CacheControl="no-cache"
%>
<%
' *** Restrict Access To Page: Grant or deny access to this page
MM_authorizedUsers=""
MM_authFailedURL="../adminlogin666.asp"
MM_grantAccess=false
If Session("MM_Usernamesyslogin") <> "" Then
  If (true Or CStr(Session("MM_UserAuthorization"))="") Or _
         (InStr(1,MM_authorizedUsers,Session("MM_UserAuthorization"))>=1) Then
    MM_grantAccess = true
  End If
End If
If Not MM_grantAccess Then
  MM_qsChar = "?"
  If (InStr(1,MM_authFailedURL,"?") >= 1) Then MM_qsChar = "&"
  MM_referrer = Request.ServerVariables("URL")
  if (Len(Request.QueryString()) > 0) Then MM_referrer = MM_referrer & "?" & Request.QueryString()
  MM_authFailedURL = MM_authFailedURL & MM_qsChar & "accessdenied=" & Server.URLEncode(MM_referrer)
  Response.Redirect(MM_authFailedURL)
End If
%>
<!--#include file="../../Connections/oavbsconn.asp" -->

<%
Dim Recordset1
Dim Recordset1_numRows

Set Recordset1 = Server.CreateObject("ADODB.Recordset")
Recordset1.ActiveConnection = MM_oavbsconn_STRING
Recordset1.Source = "SELECT * FROM 文件限制大小"
Recordset1.CursorType = 0
Recordset1.CursorLocation = 2
Recordset1.LockType = 1
Recordset1.Open()

Recordset1_numRows = 0
%>

<html>
<head>
<script language="javascript">
<!--
function check() {


if (document.form1.fbig.value=="") {
window.alert ("请输入文件大小限制!")
document.form1.fbig.focus()
return false
}





if (document.form1.fbig.value<0) {
window.alert ("文件大小限制需为1KB以上!")
document.form1.fbig.focus()

return false

}
{
nr1=document.form1.fbig.value;
flg=0;
str="";
spc=""
arw="";
for (var i=0;i<nr1.length;i++){
cmp="0123456789"
tst=nr1.substring(i,i+1)
if (cmp.indexOf(tst)<0){
flg++;
str+=" "+tst;
spc+=tst;
arw+="^";
}
else{arw+="_";}
}
if (flg!=0){
if (spc.indexOf(" ")>-1) {
str+="和空格";
}
alert("你输入的文件大小限制需为数字!");
document.form1.fbig.focus()
return false;
}
}







return true


return true
}
-->
</script>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>文件后台</title>
<style type="text/css">
<!--
body {
	margin-left: 0px;
	margin-top: 0px;
	margin-right: 0px;
	margin-bottom: 0px;
}
.style3 {font-size: 12px}
.style4 {
	color: #FFFFFF;
	font-weight: bold;
	font-size: 12px;
}
-->
</style></head>

<body onload=document.form1.fbig.focus()>
<div align="center">
  <form name="form1" method="post" action="post.asp" onSubmit="return check()">
    <p><img src="../../flash/img/banner.jpg" width="1024" height="95"></p>
    <p>&nbsp;</p>
    <table width="600" height="21" border="0" cellpadding="0" cellspacing="0" background="../../f/asp/filesupadmin/img/1.jpg">
      <tr>
        <td><div align="center" class="style4">上传文件大小限制</div></td>
      </tr>
    </table>
    <table width="600" border="0" cellpadding="0" cellspacing="1" bgcolor="#5EAE19">
      <tr>
        <td bgcolor="#FFFFFF"><table width="99%" border="0" cellpadding="3" cellspacing="0">
          <tr>
            <td width="19%">&nbsp;</td>
            <td width="81%" colspan="2"><div align="center"></div></td>
          </tr>
          <tr>
            <td><span class="style3">请输入文件限制：</span></td>
            <td colspan="2"><input name="fbig" type="text" id="fbig" value="<%=(Recordset1.Fields.Item("文件限制大小").Value)%>" maxlength="9">
      KB</td>
          </tr>
          <tr>
            <td>&nbsp;</td>
            <td colspan="2"><div align="left">
                <input type="submit" name="Submit" value="保　存">
                <span class="style3">
                　
                <input type="button" name="Submit" value="取  消" onclick="javascript:window.location.href='../adcencetyerdfghf.asp'" >
              </span> </div></td>
          </tr>
        </table></td>
      </tr>
    </table>
    <p>&nbsp;</p>
  </form>
</div>
</body>
</html>
<%
Recordset1.Close()
Set Recordset1 = Nothing
%>
⌨️ 快捷键说明

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