<!--#include file="../conn/conn1.asp"-->
<!--#include file="inc.asp"-->
<!--#include file="../config.asp"-->
<%
id = Request.QueryString("id")
if id="" then
Response.Write("错误参数")
Response.End
end if
set rs=server.createobject("adodb.recordset")
sql="select * from gg where id="&id
rs.open sql,conn,1,1
if rs.EOF then
response.write "没找到"
else
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>修改影片</title>
<link rel="stylesheet" type="text/css" href="../css/style.css">
</head>

<body topmargin="20" leftmargin="15" >

  <center>
 
  <form method="POST" action="saveeditgg.asp?id=<%=id%>" name="form1">

      
    <table border="0" cellspacing="0" width="600" bordercolorlight="#000000" bordercolordark="#FFFFFF" cellpadding="0" height="20" class="sx">
      <tr bgcolor="#99CC00"> 
        <td width="100%" height="20"> 
          <p align="center">修改影片页
        </td>
        </tr>
      </table>
      
    <table width="600" border="0" cellpadding="0" cellspacing="0" >
      <tr bordercolordark="#FFFFFF"> 
          <td width="100%" height="20"> 
            
          <table width="100%" cellpadding="0" cellspacing="0" border="0">
            <tr> 
              <td colspan="2" height="10">&nbsp;</td>
            </tr>
            <tr> 
              <td width="85"> <div align="center">公告标题：</div></td>
              <td> <input type="text" name="title" size="35"
          class="smallinput" maxlength="255" value="<%=rs("title")%>"> <font color="#FF0000" size="3">*</font>              </td>
            </tr>
            <tr>
              <td><div align="center">添加时间： </div></td>
              <td><input name="dateandtime" type="text"
          class="smallinput" id="dateandtime" value="<%=rs("dateandtime")%>" size="25" maxlength="255">              </td>
            </tr>
			 			 <tr>
              <td><div align="center">公告类别： </div></td>
              <td><select name="typeid" id="typeid">
<%
      set rstype=server.createobject("adodb.recordset")
      sqltype="select * from typep"
      rstype.open sqltype,conn,1,1
      do while not rstype.eof
      if rs("typeid")=rstype("typeid") then
         sel="selected"
      else
         sel=""
      end if
      response.write "<option " & sel & " value='"+CStr(rstype("typeid"))+"' name=typeid>"+rstype("type")+"</option>"+chr(13)+chr(10)
      rstype.movenext
      loop
      rstype.close
	  set rstype=nothing
    %>
              </select></td>
			 			 </tr>          
            <tr> 
              <td width="85"> <div align="center"> 
                  <p>内容简介： </p>
                </div></td>
              <td><textarea rows="8" name="content" cols="65" class="smallarea"><%=replace(rs("content"),"<br>",chr(13))%></textarea>
              <font color="#FF0000" size="3">*</font>  </td>
            </tr>
          </table>
            
          </td>
        </tr>
      </table>
      <p> 
        <input type="submit" value=" 修 改 "
  name="edit" class="buttonface">
        &nbsp; 
        <input type="reset" value=" 清 除 "
  name="cmdcancel" class="buttonface">
      </p>
      
  </form>
<div align="center">
  <p>以上带 <font color="#FF0000" size="3">*</font> 为必填写</p>
  <p> <a href="gg.asp"><font face="Webdings" size="4">7</font>返回管理页面</a> </p>
</div></center>
</body>
</html><%   
conn.close
   set conn=nothing 
end if%>