<!--#include file="utf-8.asp" -->
<!--#include file="js/Function.asp" -->
<!--#include file="CheckAdmin.asp" -->
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<META NAME="copyright" CONTENT="Copyright 2010-2012 - yidacms.com" />
<META NAME="Author" CONTENT="世纪伟成  yidacms.com" />
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<link href="js/admin.css" rel="stylesheet" type="text/css">
<title>系统配置!</title>

</head>
<body style="background-color=transparent">
<%
'版权：世纪伟成(http://yidacms.com)
'本信息不会影响您网站的正常访问，无论免费用户或是收费用户请保留这里的信息.
'如果您删除了这里的版权信息,将追究法律责任.

        dim rs,sql
		set rs = server.createobject("adodb.recordset")
		sql="select * from shuaiweb_system"
		rs.open sql,dbok,1,1
			
		if rs.bof and rs.eof then
			response.write "读取数据库记录出错！"
			response.end
	        	else
			Webtitle=rs("Webtitle")
			weburl=rs("weburl")
			cotitle=rs("cotitle")
			coaddress=rs("coaddress")
			tel=rs("tel")
			wait_yi=rs("wait_yi")
			fax=rs("fax")
			qq=rs("qq")
			msn=rs("msn")
			beian=rs("beian")
			Statistics=rs("Statistics")
			Switch=rs("Switch")
			email=rs("email")
			zip=rs("zip")
			keywords=rs("keywords")
			descriptions=rs("descriptions")	
			wait_si=rs("wait_si")
			wait_er=rs("wait_er")
		rs.close
		set rs=nothing 
	    end if
	    if request("t")="add" Then 
	  	
			if len(trim(request.Form("webtitle")))<3 then
				response.write ("<script language=javascript> alert('网站标题必填且不能少于3个字符！');history.back(-1);</script>")
				response.end
			end if
			  
			if len(trim(request.Form("weburl")))<1 then
				response.write ("<script language=javascript> alert('网站网址不能为空，且不少于1个字符！');history.back(-1);</script>")
				response.end
			end if 
			  
			if len(trim(request.Form("cotitle")))<3 then
				response.write ("<script language=javascript> alert('公司名称不能为空,且不少于3个字符!');history.back(-1);</script>")
				response.end
			end if
			  
			if len(trim(request.Form("coaddress")))<5 then
				response.write ("<script language=javascript> alert('公司地址必填且不能少于5个字符！');history.back(-1);</script>")
				response.end
			end if 
			  
			if len(trim(request.Form("tel")))<7 then
				response.write ("<script language=javascript> alert('电话必填且不能少于7个字符！');history.back(-1);</script>")
				response.end
			end if
		   
		exec="select * from shuaiweb_system" 
		set rs=server.createobject("adodb.recordset")
		rs.open exec,dbok,1,3
			rs("webtitle")=request.form("webtitle")
			rs("weburl")=request.form("weburl")
			rs("cotitle")=request.form("cotitle")
			rs("coaddress")=request.form("coaddress")
			rs("tel")=request.form("tel")
			rs("wait_yi")=request.form("wait_yi")
			rs("fax")=request.form("fax")
			rs("qq")=request.form("qq")
			rs("msn")=request.form("msn")
			rs("beian")=request.form("beian")
			rs("Statistics")=request.form("Statistics")
			rs("Switch")=request.form("Switch")
			rs("email")=request.form("email")
			rs("zip")=request.form("zip")
			rs("keywords")=request.form("keywords")
			rs("descriptions")=request.form("descriptions")
			rs("wait_si")=request.form("wait_si")
			rs("wait_er")=request.form("wait_er")
		rs.update
		rs.close
		set rs=nothing
		response.write "<script language=javascript> alert('保存成功！');location.replace('admin_system.asp');</script>"
		End If

		Dim Url,Key,WwwName 
		Url=Request.ServerVariables("SERVER_NAME") 
		If InStr(Url,"")>0 Then 
		Key=Split(Url,"") 
		WwwName=Key(0) 
		WwwName=Replace(WwwName,"http://","www")
		End If 
%>
		<table width="98%" border="0" cellpadding="10" cellspacing="0" bordercolor="#666666" style="border-collapse:collapse" align="center" >
		<form id="form1" name="form1" method="POST" action="admin_system.asp?t=add">
		  <tr>
			<td class="center" onMouseOver="this.id='aa'" onMouseOut="this.id='bb'" class="cc">网站标题<br /><input name="webtitle" type="text" id="webtitle" value="<%=webtitle%>" class="win"/><font color=red> (必填)</font></td>
		  </tr>
		  <tr>
			
			<td class="center" onMouseOver="this.id='aa'" onMouseOut="this.id='bb'" class="cc">网站地址<br /><input name="weburl" type="text" id="weburl" value="<%=weburl%>" class="win"/><font color="#ff0000"> (必填且很重要)<br /><div class="admintitlebg">1.更换地址时请以 http:// 开头 — 用 / 结尾 <br /><font color="000000">2.当前的域名是：http://<%=WwwName%>/</font><br />3.注：( 如果程序放在二级目录使用，请输入目录名以 / 结尾。例如:http://<%=WwwName%>/demo/ )</div></font></td>
		  </tr>
		  <tr>
			
			<td class="center" onMouseOver="this.id='aa'" onMouseOut="this.id='bb'" class="cc"><div class="uppic">网站Logo<br /><input name="wait_si" type="text" id="shuaiweb_productsminpic" value="<%=wait_si%>" class="win"/></div><div class="uppic2"><iframe width="305" height="34" marginwidth=0 marginheight=0 hspace=0 vspace=0 frameborder=0 scrolling=no src="../uploadclass/min/upfile.htm" allowtransparency="true" ></iframe></div></td>
		  </tr>
		  <tr>
			
			<td class="center" onMouseOver="this.id='aa'" onMouseOut="this.id='bb'" class="cc">公司名称<br /><input name="cotitle" type="text" id="cotitle" value="<%=cotitle%>" class="win"/><font color=red> (必填)</font></td>
		  </tr>
		  <tr>
			
			<td class="center" onMouseOver="this.id='aa'" onMouseOut="this.id='bb'" class="cc">公司地址<br /><input name="coaddress" type="text" id="coaddress" value="<%=coaddress%>" class="win"/><font color=red> (必填)</font></td>
		  </tr>
		  <tr>
			
			<td class="center" onMouseOver="this.id='aa'" onMouseOut="this.id='bb'" class="cc">固定电话<br /><input name="tel" type="text" id="tel" value="<%=tel%>" class="win"/><font color=red> (必填)</font></td>
		  </tr>
		  <tr>
			
			<td class="center" onMouseOver="this.id='aa'" onMouseOut="this.id='bb'" class="cc">移动电话<br /><input name="wait_yi" type="text" id="wait_yi" value="<%=wait_yi%>" class="win"/></td>
		  </tr>
		  <tr>
			
			<td class="center" onMouseOver="this.id='aa'" onMouseOut="this.id='bb'" class="cc">传真<br /><input name="fax" type="text" id="fax" value="<%=fax%>" class="win"/></td>
		  </tr>
		  <tr>
			
			<td class="center" onMouseOver="this.id='aa'" onMouseOut="this.id='bb'" class="cc">E - mail<br /><input name="email" type="text" id="email" value="<%=email%>" class="win"/></td>
		  </tr>
		  <tr>
			
			<td class="center" onMouseOver="this.id='aa'" onMouseOut="this.id='bb'" class="cc">邮编<br /><input name="zip" type="text" id="zip" value="<%=zip%>" class="win"/></td>
		  </tr>
		  <tr>
			
			<td class="center" onMouseOver="this.id='aa'" onMouseOut="this.id='bb'" class="cc">Q Q<br /><input name="qq" type="text" id="qq" value="<%=qq%>" class="win"/></td>
		  </tr>
		  <tr>
			
			<td class="center" onMouseOver="this.id='aa'" onMouseOut="this.id='bb'" class="cc">联系人<br /><input name="msn" type="text" id="msn" value="<%=msn%>" class="win"/></td>
		  </tr>
		  <tr>
			
			<td class="center" onMouseOver="this.id='aa'" onMouseOut="this.id='bb'" class="cc">备案号<br /><input name="beian" type="text" id="beian" value="<%=beian%>" class="win" /></td>
		  </tr>
		  <tr>
			
			<td class="center" onMouseOver="this.id='aa'" onMouseOut="this.id='bb'" class="cc">关键词<br /><input name="keywords" type="text" id="keywords" value="<%=keywords%>" class="win"/></td>
		  </tr>
		  <tr>
			
			<td class="center" onMouseOver="this.id='aa'" onMouseOut="this.id='bb'" class="cc">描述<br /><input name="descriptions" type="text" id="descriptions" value="<%=descriptions%>" class="win"/></td>
		  </tr>
		  <tr>
			
			<td class="center" onMouseOver="this.id='aa'" onMouseOut="this.id='bb'" class="cc">第三方统计代码 <a href="http://new.cnzz.com/user/reg.php" target="_blank">申请</a><br /><textarea name="Statistics" cols="50" rows="5" id="Statistics"  class="wtextarea"><%=Statistics%></textarea></td>
		  </tr>
		  <tr>
			<td class="center" onMouseOver="this.id='aa'" onMouseOut="this.id='bb'" class="cc">易达商桥 <a href="http://800.yidacms.com" target="_blank">申请</a><br /><input name="wait_er" type="text" id="wait_er" value="<%=wait_er%>" class="win"/></td>
		  </tr>
		  <tr>
		  <tr>
			<td><input type="submit" name="submit" value="提交" class="inanniu"/></td>
		  </tr>
		  </form>
		</table>
</body>
</html>
