
<!-- #include file="../conn.asp" -->
<!-- #include file="admin.asp" -->
<%call ling()
Call Head()
Call saycardd("文章修改")

id=request("id")
   classid=request("classid") 
        set rs = server.createobject("adodb.recordset")
	sql="select * from sms where id="&id
	rs.open sql,conn,1,1
	if rs.eof and rs.bof then
	response.write "文章不存在<br/>"
	else
  response.write " 文章详情:  <br/>"
end if%>标题: <%=ubb1(rs("title"))%><br/>
<%if rs("pic")<>"" then
response.write "图片文件:"&ubb1(rs("pic"))&"<br/>"
else
response.write "图片文件:暂无图片<br/>"
end if
%>
添加日期: <%=ubb1(rs("yd_date"))%><br/>
人气: <%=ubb1(rs("hit"))%><br/>
<%if saytk>1 then
Response.write "<form name=""form"" method=""post"" action=""post.asp?sid="&sid&"&amp;id="&id&"&amp;classid="&classid&"&amp;saytk="&saytk&""">"%>
标题:<input name="title" value="<%=ubb(rs("title"))%>"/><br/>

文章内容:<br/>
<%Response.write "<textarea name=""test"" emptyok=""true"" rows=""30"" cols=""40"">"&ubb(rs("test"))&"</textarea><br/>"%>
<input type="submit" name="Submit" value="修改文章"></form><br/>
<%else%>
            标题:<input name="title<%=minute(now)%><%=second(now)%>" value="<%=ubb(rs("title"))%>"/><br/>
  文章内容:<input name="test<%=minute(now)%><%=second(now)%>" value="<%=ubb(rs("test"))%>"/><br/>
<anchor>修改文章
    <go href="post.asp?sid=<%=sid%>&amp;id=<%=id%>&amp;classid=<%=classid%>&amp;saytk=<%=saytk%>" method="post" accept-charset="utf-8">
        <postfield name="test" value="$(test<%=minute(now)%><%=second(now)%>)"/>
        <postfield name="title" value="$(title<%=minute(now)%><%=second(now)%>)"/>
    </go>
</anchor>
<%end if
rs.close
set rs=nothing
%>
<br/>----------<br/>
<a href="adminsmscl.asp?sid=<%=sid%>&amp;id=<%=classid%>&amp;saytk=<%=saytk%>">[文章列表]</a>
<br/><a href="wzclass.asp?sid=<%=sid%>&amp;saytk=<%=saytk%>">[返回分类]</a><br/>

<a href="../index.asp?sid=<%=sid%>&amp;saytk=<%=saytk%>">[后台管理]</a>
<%call head3()%>