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

📄 config.asp

📁 一个较好的网上购物系统 是基于ASP的多用户网上商城
💻 ASP
字号:
<%
if session("admin")<>"smallstick" then
response.redirect "login.asp"
response.end
end if
%>
<!--#include file="conn.asp"-->
<%
sql="select * from admin_info"
set rs= Server.CreateObject("ADODB.Recordset") 
rs.open sql,conn,1,3

action=request("action")
if action="save" then
adminname=request.form("adminname")
adminpassword=request.form("adminpassword")
homepage=request.form("homepage")
url=request.form("url")
email=request.form("email")
qq=request.form("qq")
gg=request.form("gg")

if rs.eof or rs.bof then
rs.addnew
end if
rs("admin_name")=adminname
rs("admin_password")=adminpassword
rs("homepage")=homepage
rs("url")=url
rs("email")=email
rs("qq")=qq
rs("gg")=gg

rs.update
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>基本资料修改</title>
<SCRIPT language=JavaScript>

function is_number(str)
{
	exp=/[^0-9()-]/g;
	if(str.search(exp) != -1)
	{
		return false;
	}
	return true;
}
function is_email(str)
{ if((str.indexOf("@")==-1)||(str.indexOf(".")==-1)){
	
	return false;
	}
	return true;
}

function CheckInput(){

	if(form.adminname.value==''){
		alert("用户名不能为空!");
		form.adminname.focus();
		return false;
	}
	if(form.adminname.value.length>20){
		alert("用户名超过20个字符!");
		form.adminname.focus();
		return false;
	}

	if(form.adminpassword.value==''){
		alert("密码不能为空!");
		form.adminpassword.focus();
		return false;
	}

	if(form.homepage.value==''){
		alert("网站名称不能为空!");
		form.homepage.focus();
		return false;
	}

	if(form.url.value==''){
		alert("网址不能为空!");
		form.url.focus();
		return false;
	}

	if( form.email.value =="") {
                alert("E-mail不能为空!")
		form.email.focus();
        return false;
    }

	if(!is_email(form.email.value))
	{ alert("非法的EMail地址!");
		form.email.focus();
	return false;
	}

	if( form.qq.value =="") 
     { alert("QQ不能为空!")
		form.qq.focus();
        return false;
    }
	
	if(!is_number(document.form.qq.value)){
		alert("QQ号必须是数字!");
		form.qq.focus();
		return false;
	}

	return true;
}
</SCRIPT>
<LINK href="../style.css" type=text/css rel=stylesheet>
</head>
<body>
<table width="600" border="0">
  <tr> 
 
    <td align="center"> <form action="config.asp?action=save" method="post" name="form" id="form" onsubmit=return(CheckInput())>
        <table border="0" cellpadding="2" width="98%">
          <tr> 
            <td align="right">用户名:</td>
            <td> <input name="adminname" type="text" id="adminname" value="<%=rs("admin_name")%>" size="20" maxlength="20">
              小于20个字符</td>
          </tr>
          <tr> 
            <td align="right">密码:</td>
            <td> <input name="adminpassword" type="password" id="adminpassword" value="<%=rs("admin_password")%>" size="20" maxlength="20">
              小于20个字符</td>
          </tr>
          <tr> 
            <td align="right">网站名称:</td>
            <td> <input name="homepage" type="text" id="homepage" value="<%=rs("homepage")%>" size="30" maxlength="30"></td>
          </tr>
          <tr> 
            <td align="right">网址:</td>
            <td> <input name="url" type="text" id="url" value="<%=rs("url")%>" size="30" maxlength="50">
              网址需包含http://</td>
          </tr>
          <tr> 
            <td align="right">Email:</td>
            <td> <input name="email" type="text" id="email" value="<%=rs("email")%>" size="30" maxlength="30"></td>
          </tr>
          <tr> 
            <td align="right">QQ:</td>
            <td> <input name="qq" type="text" id="qq" value="<%=rs("qq")%>" size="20" maxlength="20"> 
            </td>
          </tr>
          <tr>
            <td align="right">公告:</td>
            <td><textarea name="gg" cols="40" rows="4" id="gg"><%=rs("gg")%></textarea></td>
          </tr>
          <tr align="center"> 
            <td colspan="2"> <input type="submit" name="Submit2" value="确认修改"> 
            </td>
          </tr>
        </table>
      </form>  
    </td>
  </tr>
</table>
</body>
</html>

⌨️ 快捷键说明

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