<input type="submit" value=" 修改 " name="Submit" class="smallinput">

<%@codepage="936"%><%ifinstr(session("flag"),"51")=0thenresponse.redirect"../login.as... <%@ codepage ="936" %>
<%
if instr(session("flag"),"51")=0 then
response.redirect "../login.asp"
response.end
end if
%>


<HTML>
<HEAD>
<META http-equiv="Content-Type" content="text/html; charset=gb2312">
<LINK rel="stylesheet" type="text/css" href="../style.css">
</HEAD>
<BODY>
<%
if not isEmpty(request("newsid")) then
newsid=request("newsid")
else
newsid=1
end if
Dim sql
Dim rs
Sql="select * from news where newsid="+cstr(newsid)+""
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
%>
<form name="form1" method="POST" action="saveedit.asp" enctype="multipart/form-data" >
<input type="hidden" name="newsid" value="<%=newsid%>">
<input type="hidden" name="filepath" value="../../info/pic/">

<TABLE border="0" cellspacing="0" width="600" cellpadding="0">
<TR>
<TD width="100%" align="center"><font color="#ff6600" class="f12"><b>修改信息</b></font></TD><BR>
</TR>
<TR align="center">
<TD width="100%">
<TABLE border="0" cellspacing="0" width="100%" cellpadding="0">
<TR>
<TD width="18%" align="right" height="30">信息标题：</TD>
<TD width="82%" height="30"><input type="text" name="title" size="70"
class="smallinput" maxlength="100" value="<%=rs("title")%>"></TD>
</TR>
<TR>
<TD width="15%" align="right" height="5">推荐信息：</td>
<TD width="85%" valign="middle" height="5"><%if rs("tjnews")="0" then%><INPUT type="checkbox" name="checkbox1" value="1"><%else%><INPUT type="checkbox" checked name="checkbox1" value="1"><%end if%>
首页推荐 <%if rs("tjhome")="0" then%><input type="checkbox" name="checkbox2" value="1"><%else%><input type="checkbox" checked name="checkbox2" value="1"><%end if%>
网站公告
<%if rs("wzgg")="0" then%>
新闻修改无法完成，不知道什么原因。展开

 我来答

1个回答

#热议# 空调使用不当可能引发哪些疾病？

匿名用户
2009-02-28

展开全部

<input type="checkbox" name="checkbox4" value="1">
<%else%>
<input type="checkbox" checked name="checkbox4" value="1">
<%end if%>
</TD>
</TR>
<TR>
<TD width="18%" valign="top" align="right">信息内容：</TD>
<TD width="82%"><textarea rows="10" name="content" cols="70" class="smallarea"><%=replace(rs("content"),"<br>",chr(13))%></textarea> <br>
<%if rs("homehot")="0" then%><INPUT type="checkbox" name="checkbox110" value="1"><%else%><INPUT type="checkbox" checked name="checkbox110" value="1"><%end if%>
是否未网站首页头条图片新闻</TD>
</TR>
<TR>
<TD width="15%" align="right" height="30">来源：</TD>
<TD width="85%"><INPUT NAME="from" TYPE="TEXT" SIZE=30 maxlength=100 class="smallinput" value="<%=rs("Nfrom")%>"> </TD>
</TR>
<TR>
<TD width="15%" align="right">信息是否含有图片</TD>
<TD width="85%"><%if rs("selectpic")="0" then%><INPUT type="checkbox" name="checkbox3" value="1" class="smallinput"><%else%><INPUT type="checkbox" checked name="checkbox3" value="1" class="smallinput"><%end if%></TD>
</TR>
<TR>
<TD width="15%" align="right" height="30">上传图片：</TD>
<TD width="85%"><INPUT NAME="file" TYPE="file" SIZE=60 maxlength=100 class="smallinput"></TD>
</TR>
</TABLE>
</TD>
</TR>
</TABLE>
<p><input type="submit" value=" 修改 " name="Submit" class="smallinput"> <input type="button" value=" 返回 " onclick=history.go(-1); class="smallinput"></p>
</form>
</body>
</html>
<%
rs.close
set rs=nothing
conn.close
set conn=nothing
%>

已赞过 已踩过<

评论收起

推荐律师服务：若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询

<input type="submit" value=" 修 改 " name="Submit" class="smallinput">

其他类似问题

为你推荐：

<input type="submit" value=" 修改 " name="Submit" class="smallinput">