www.pudn.com > Zhwebcode.rar > AdminContact.asp, change:2008-10-07,size:2391b


<!--#include file="conn.asp"--> 
<!--#include file="admin.asp"--> 
<% 
ID=trim(Request("ID")) 
if Request.QueryString("mark")="southidc" then 
title=Trim(Request("title")) 
For i = 1 To Request.Form("Content").Count 
  About = Content & Request.Form("Content")(i) 
Next 
set rs=server.createobject("adodb.recordset") 
sql="select * from Contact where id="  & Clng(ID) 
rs.open sql,conn,3,3 
rs("Content")=About 
rs("Title")=title 
rs.update 
rs.close 
response.write"<script language='javascript'>alert('修改成功!');location.href=""adminContact.asp"";</script>" 
end if 
sql="select top 1 * from Contact" 
Set rs_home= Server.CreateObject("ADODB.Recordset") 
rs_home.open sql,conn,1,1 
%> 
<!-- #include file="Inc/Head.asp" --> 
 
<table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0"> 
  <tr>  
    <td align="center" valign="top"> <br> <table width="560" border="0" cellpadding="0" cellspacing="1" class="table_southidc"> 
        <tr>  
          <td class="back_southidc" height="25"> <div align="center"><strong>修改联系方式<br> 
              </strong></div></td> 
        </tr> 
        <tr>  
          <form method="post" name="myform" action="AdminContact.asp?mark=southidc"> 
            <input type=hidden name=id value="<%=rs_home("ID")%>"> 
            <td><div align="center">  
                <table width="100%" border="0" cellspacing="0" cellpadding="0"> 
                  <tr bgcolor="#fcfcfc">  
                    <td height="300" colspan="4" align="center"> <textarea name="Content"  style="display:none"><%=rs_home("content")%></textarea> 
                      <iframe ID="eWebEditor1" src="Southidceditor/ewebeditor.asp?id=content&style=southidc" frameborder="0" scrolling="no" width="550" HEIGHT="450"></iframe>  
                    </td> 
                  </tr> 
                  <tr bgcolor="#fcfcfc">  
                    <td height="25" colspan="4"> <div align="center">  
                        <input name="submit" type="submit" value="确定"> 
                           
                        <input name="reset" type="reset" value="重来"> 
                      </div></td> 
                  </tr> 
                </table> 
              </div></td> 
          </form> 
        </tr> 
      </table></td> 
  </tr> 
</table> 
<!-- #include file="Inc/Foot.asp" --> 
<% 
rs.Close 
set rs=Nothing 
call CloseConn()   
%>