<!--#include file="../inc/Conn.asp"-->
<!--#include file="Inc/Admin.Asp"-->
<%

if Request.QueryString("mark")="operate" then

id=request("id")
explain=server.htmlencode(Trim(Request("explain")))
Enexplain=server.htmlencode(Trim(Request("Enexplain")))
CompHonor=server.htmlencode(Trim(Request("CompHonor")))

If explain="" Then
response.write "SORRY <br>"
response.write "荣誉名称不能为空!<a href=""javascript:history.go(-1)"">返回重输</a>"
response.end
end if
If CompHonor="" Then
response.write "SORRY <br>"
response.write "荣誉图片不能为空!<a href=""javascript:history.go(-1)"">返回重输</a>"
response.end
end if

Set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from CompHonor where id="&id
rs.open sql,conn,1,3

rs("explain")=explain
rs("Enexplain")=Enexplain
rs("CompHonor")=CompHonor
rs("Adddate")=Now()
rs.update
rs.close
response.redirect "Admin_Honor.asp"
end if
%>
<%
id=request.querystring("id")
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open "Select * From CompHonor where id="&id, 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"><table width="560" border="0" cellpadding="0" cellspacing="1" class="border">
        <tr> 
          <td class="topbg" height="25"> <div align="center"><strong>修改荣誉 
              </strong></div></td>
        </tr>
        <tr> 
          <form method="post" name="myform" action="Admin_HonorEdit.asp?mark=operate">
            <input type=hidden name=id value=<%=id%>>
            <td><div align="center"> 
                <table width="100%" border="0" cellspacing="1" cellpadding="0">
                  <tr class=tdbg> 
                    <td width="25%" height="25"> <div align="center">荣誉名称</div></td>
                    <td width="75%" class=tdbg> <textarea name="explain" cols="40" rows="8"><%=rs("explain")%></textarea> 
                    </td>
                  </tr>
				  <%If FoundInarr(SiteLanguage,2,",") Then%>
                  <tr class=tdbg>
                    <td height="22"><div align="center">英文荣誉名称</div></td>
                    <td><textarea name="Enexplain" cols="40" rows="8"><%=rs("Enexplain")%></textarea></td>
                  </tr>
				  <%End If%>
                  <tr class=tdbg> 
                    <td height="22"> <div align="center">证书图片</div></td>
                    <td> <input name="CompHonor" type="text" value="<%=rs("CompHonor")%>" size="40" maxlength="50"> 
                      <font color="#FF0000"> * 图片地址</font></td>
                  </tr>
                  <tr class=tdbg> 
                    <td height="25" colspan="2"> <div align="center"> 
                        <input name="submit" type="submit" value="确定">
                        &nbsp; 
                        <input name="reset" type="reset" value="从来">
                      </div></td>
                  </tr>
                  <tr> 
                    <td colspan="2" class="tdbg">图片上传</td>
                  </tr>
                  <tr> 
                    <td colspan="2" class="tdbg"><div align="left"> 
                        <iframe style="top:2px" ID="UploadFiles" src="../upload_Photo.asp?PhotoUrlID=5" frameborder=0 scrolling=no width="300" height="25"></iframe>
                    </div></td>
                  </tr>
                </table>
              </div></td>
          </form>
        </tr>
      </table></td>
  </tr>
</table>
<%
rs.close
set rs=nothing
%><!-- #include file="Inc/Foot.asp" -->