<!--#include file=../include/config.asp-->
<!--#include file=../include/conn_view.asp-->
<%
if request("yy")=111 then
    dim rs1,sql1
	sql1="select * from [index_top1] where id=" & request("id")
	set rs1=server.createobject("adodb.recordset")
        rs1.open sql1,conn,3,3
        rs1("title")=request("title")
        rs1("url")=request("url")
        rs1("color")=request("color")
		
        rs1.update
response.write "发送成功"
response.end
end if
%>
<html>
<head>
<title>添加主页连接</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="../style.css" type="text/css">
</head>

<script language="JavaScript">
<!--
	function checkdata()
	{
		if(!CheckIsNull(form1.title,"请输入标题！")) return false;
		if(!CheckIsNull(form1.url,"请输入url！")) return false;
		
		
	}
	
//-->
</script>

<%
    dim rs,sql
	sql="select * from [index_top1] where id=" & request("id")
	set rs=server.createobject("adodb.recordset")
        rs.open sql,conn,3,3
%>
<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0">
<div align="center"><br>
  <font size="3"><b>添加主页连接</b></font><br>
  <br>
</div>
<table width="687" border="0" cellpadding="0" cellspacing="2" class="kuan" align="center" bgcolor="#FFFFFF">
  <tr> 
    <td background="../images/system1.gif" height="25" align="center" width="683"><font color="#FF6633" class="font"><b><font color="#FF9B59">请输入以下表格来&quot;<font color="#FFFFFF">添加公司资料</font>&quot;</font></b></font></td>
  </tr>
  <tr> 
    <td bgcolor="#E9F0F8" class="linkfont" align="center" valign="middle" height="215" width="683"> 
      <form name="form1" method="post" action=change_index_company.asp?yy=111 onsubmit="return checkdata()">
        <table width="644" border="0" cellspacing="5" cellpadding="0">
          <tr align="left" valign="middle"> 
            <td width="71" height="30" align="right" class="font">加　　色: </td>
            <td width="214" class="font" height="30"> 
              <select name="color">
                <%if rs("color")="#FF6600" then%>
                <option value="#FF6600" selected>加色</option>
                <option value="">不加色</option>
                <%else%>
                <option value="#FF6600">加色</option>
                <option value="" selected>不加色</option>
                <%end if%>
              </select>
            </td>
            <td width="60" align="right" class="font">&nbsp;</td>
            <td width="274" class="font">&nbsp; </td>
          </tr>
          <tr align="left" valign="middle"> 
            <td width="71" height="30" align="right" class="font">标　　题: </td>
            <td colspan="3" class="font" height="30"> 
              <input name="title" type="text" class="textinput" size="80" maxlength="12" value="<%=rs("title")%>">
              (12个字) </td>
          </tr>
          <tr align="left" valign="middle"> 
            <td height="30" align="right" class="font" width="71">url连接: </td>
            <td height="30" class="font" colspan="3"> 
              <input name="url" type="text" class="textinput" size="80" maxlength="50" value="<%=rs("url")%>">
            </td>
          </tr>
        </table>
        <input type="text" name="id" size="1" value="<%=rs("id")%>" readonly>
        <br>
        <table width="578" border="0" cellpadding="0" cellspacing="0">
          <tr>
            <td align="center" valign="middle">
              <input type="submit" name="Submit" value="提交" class="textbotton">
              　 
              <input type="reset" name="Submit2" value="重填" class="textbotton">
            </td>
          </tr>
        </table>
        </form>
    </td>
  </tr>
</table>
</body>
</html>
<!--#include file=../include/foot.asp-->