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

📄 setinfo.asp

📁 网页源码,是最好的网店代码。可以支持批量上传产品等功能。
💻 ASP
字号:
<!--#include file="conn.asp"-->
<%if session("admin")="" then
response.Write "<script language='javascript'>alert('网络超时或您还没有登陆!');window.location.href='login.asp';</script>"
response.End
else
if session("flag")>1 then
response.Write "<p align=center><font color=red>您没有此项目管理权限!</font></p>"
response.End
end if
end if
%>
<%dim action
action=request.QueryString("action")
if action="save" then
set rs=server.CreateObject("adodb.recordset")
rs.Open "select webname,musicd,musicurl,webemail,dizhi,youbian,dianhua,copyright,weblogo,weburl,webbanner,icp,qq,mailaddress,mailsend,mailusername,mailname,mailuserpass,view from webinfo ",conn,1,3
rs("webname")=trim(request("webname"))
rs("webemail")=trim(request("webemail"))
rs("dizhi")=trim(request("dizhi"))
rs("youbian")=trim(request("youbian"))
rs("dianhua")=trim(request("dianhua"))
rs("copyright")=trim(request("copyright"))
rs("webbanner")=trim(request("webbanner"))
rs("weblogo")=trim(request("weblogo"))
rs("webbanner")=trim(request("webbanner"))
rs("weburl")=trim(request("weburl"))
rs("icp")=trim(request("icp"))
rs("qq")=trim(request("qq"))
rs("view")=trim(request("view"))
rs("mailaddress")=trim(request("mailaddress"))
rs("mailsend")=trim(request("mailsend"))
rs("mailusername")=trim(request("mailusername"))
rs("mailuserpass")=trim(request("mailuserpass"))
rs("mailname")=trim(request("mailname"))
rs.update
rs.close
set rs=nothing
response.Write "<script language=javascript>alert('网站资料修改成功!');history.go(-1);</script>"
end if%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="../images/css.css" rel="stylesheet" type="text/css">
</head>
<body>

<table class="tableBorder" width="90%" border="0" align="center" cellpadding="3" cellspacing="1" bgcolor="#FFFFFF">
  <form name="form1" method="post" action="setinfo.asp?action=save">
    <%set rs=server.CreateObject("adodb.recordset")
rs.Open"select webname,musicurl,musicd,webemail,dizhi,youbian,dianhua,copyright,weblogo,weburl,webbanner,icp,qq,mailaddress,mailsend,mailusername,mailname,mailuserpass,view from webinfo",conn,1,1

%>
    <tr> 
      <td colspan="2" align="center" background="../images/admin_bg_1.gif"><b><font color="#ffffff">网站信息设置</font></b></td>
    </tr>
    <tr > 
      <td width="30%" align="right">网站网址:</td>
      <td width="70%" style="PADDING-LEFT: 10px">HTTP:// 
        <input name="weburl" type="text" id="weburl" size="21" value="<%=trim(rs("weburl"))%>"> 
        <font color=#ff0000>**</font></td>
    </tr>
    <tr > 
      <td align="right">网站名称:</td>
      <td style="PADDING-LEFT: 10px"> <input name="webname" type="text" id="webname" size="28" value="<%=trim(rs("webname"))%>"> 
        <font color=#ff0000>**</font></td>
    </tr>
    <tr > 
      <td align="right">公司 e-mail:</td>
      <td style="PADDING-LEFT: 10px"> <input name="webemail" type="text" id="webemail" size="28" value="<%=trim(rs("webemail"))%>"> 
        <font color=#ff0000>**</font></td>
    </tr>
    <tr > 
      <td align="right">公司地址:</td>
      <td style="PADDING-LEFT: 10px"> <input name="dizhi" type="text" id="dizhi" size="28" value="<%=trim(rs("dizhi"))%>"> 
        <font color=#ff0000>**</font></td>
    </tr>
    <tr > 
      <td align="right">公司邮编:</td>
      <td style="PADDING-LEFT: 10px"> <input name="youbian" type="text" id="youbian" size="28" value="<%=trim(rs("youbian"))%>"	onKeyPress	= "return regInput(this,	/^[0-9]*$/,		String.fromCharCode(event.keyCode))"
onpaste		= "return regInput(this,	/^[0-9]*$/,		window.clipboardData.getData('Text'))"
ondrop		= "return regInput(this,	/^[0-9]*$/,		event.dataTransfer.getData('Text'))"> 
        <font color=#ff0000>**</font></td>
    </tr>
    <tr > 
      <td align="right">公司电话:</td>
      <td style="PADDING-LEFT: 10px"> <input name="dianhua" type="text" id="dianhua" size="28" value="<%=trim(rs("dianhua"))%>"> 
        <font color=#ff0000>**</font></td>
    </tr>
    <tr > 
      <td align="right">网站版权:</td>
      <td style="PADDING-LEFT: 10px"> <input name="copyright" type="text" size="28" value="<%=trim(rs("copyright"))%>"> 
        <font color=#ff0000>**</font></td>
    </tr>
    <tr> 
      <td align="right">在线咨询QQ(腾讯):</td>
      <td style="PADDING-LEFT: 10px"> <input name="webbanner" type="text" id="webbanner" size="28" value="<%=trim(rs("webbanner"))%>"> 
        <font color=#ff0000>**</font>如果多个QQ请用英文逗号隔开</td>
    </tr>
    <tr> 
      <td align="right">客服QQ状:</td>
      <td style="PADDING-LEFT: 10px"> <input name="qq" type="radio" value="1"   <% if rs("qq")=1 then %> checked <%end if %>>
        打开 
        <input type="radio" name="qq"  <% if rs("qq")=2 then %> checked <%end if %> value="2">
        关闭</td>
    </tr>
    <tr>
      <td align="right">留言审核功能:</td>
      <td style="PADDING-LEFT: 10px"> <input name="view" type="radio" value="0"   <% if rs("view")=0 then %> checked <%end if %>>
        打开 
        <input type="radio" name="view"  <% if rs("view")=1 then %> checked <%end if %> value="1">
        关闭</td>
    </tr>
    <tr > 
      <td align="right">Icp备案号:</td>
      <td style="PADDING-LEFT: 10px"> <input name="icp" type="text" size="28" value="<%=trim(rs("icp"))%>"> 
        <font color=#ff0000>**</font></td>
    </tr>
    <tr > 
      <td height="-1" align="right">网站Logo:</td>
      <td style="PADDING-LEFT: 10px"> <input name="weblogo" type="text" id="weblogo" size="28" value="<%=trim(rs("weblogo"))%>"> 
        <font color=#ff0000>**</font> <input type="button" name="Submit2215" value="上传图片" onClick="window.open('../upload.asp?formname=form1&editname=weblogo&uppath=upfile&filelx=jpg','','status=no,scrollbars=no,top=20,left=110,width=420,height=165')"></td>
    </tr>
    <tr  > 
      <td colspan="2" align="center">发送邮件的配置 </td>
    </tr>
    <tr> </tr>
    <tr  > 
      <td align="right">邮件服务器地址:</td>
      <td style="PADDING-LEFT: 10px"> <input name="mailaddress" type="text" id="mailaddress" size="36" value="<%=trim(rs("mailaddress"))%>"> 
      </td>
    </tr>
    <tr  > 
      <td align="right">发送邮箱:</td>
      <td style="PADDING-LEFT: 10px"> <input name="mailsend" type="text" id="mailsend" size="36" value="<%=trim(rs("mailsend"))%>"> 
      </td>
    </tr>
    <tr  > 
      <td align="right">登 录 名:</td>
      <td style="PADDING-LEFT: 10px"> <input name="mailusername" type="text" id="mailusername" size="36" value="<%=trim(rs("mailusername"))%>"> 
      </td>
    </tr>
    <tr  > 
      <td align="right">登录密码:</td>
      <td style="PADDING-LEFT: 10px"> <input name="mailuserpass" type="password" id="mailuserpass" size="36" value="<%=trim(rs("mailuserpass"))%>"> 
      </td>
    </tr>
    <tr  > 
      <td align="right">显示的姓名:</td>
      <td style="PADDING-LEFT: 10px"> <input name="mailname" type="text" id="mailname" size="36" value="<%=trim(rs("mailname"))%>"> 
      </td>
    </tr>
    <tr > 
      <td></td>
      <td style="PADDING-LEFT: 10px"> <input type="submit" name="Submit" value=" 修改保存 "> 
        &nbsp; <input type="reset" name="Submit2" value=" 重新添写 "></td>
    </tr>
  </form>
</table>
<%rs.Close
  set rs=nothing
  %>
<!--#include file="foot.asp"-->
</body>
</html>
<script>
	function regInput(obj, reg, inputStr)
	{
		var docSel	= document.selection.createRange()
		if (docSel.parentElement().tagName != "INPUT")	return false
		oSel = docSel.duplicate()
		oSel.text = ""
		var srcRange	= obj.createTextRange()
		oSel.setEndPoint("StartToStart", srcRange)
		var str = oSel.text + inputStr + srcRange.text.substr(oSel.text.length)
		return reg.test(str)
	}
</script>

⌨️ 快捷键说明

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