admin_mod_proc.asp

1. 在界面的开头显示新闻添加的位置

<!--#include file="conn.asp"-->
<% response.buffer=true %>
<% 
dim rs,articleid,sql,strsql
articleid=request.QueryString("articleid")
set rs=Server.CreateObject("ADODB.recordset")
rs.open "select * from article where articleid="&articleid,conn
if session("admin")<>"" then 
%>

<!--#include file="head.asp"-->
</div>
<br>
<table width="779" border="1" align="center" cellpadding="0" cellspacing="0" bordercolor="##0066CC">
  <tr>
    <td width="180"align="left" valign="top" scope="row">　
      <table width="100%" height="100%" border="0">
        <tr><td align="center" valign="top" scope="row"></tr>
		<tr><td align="center" valign="top" scope="row"><!--#include file="hot.asp"--></tr>
		<tr><td align="center" valign="top" scope="row"><!--#include file="tuijian.asp"--></td></tr>
	  </table>
		
    </td>
	
    <td width="490" align="center" valign="top">
	<table width="100%" align="center" cellpadding="0" cellspacing="0">
     <tr bgcolor="#003399" valign="top">
        <td valign="top" align="center">
		<img src="img/newarticle.gif">
		  </td>
		</tr>
		<tr><td>
		<table>
		<tr><td>
		<form action="article.asp?articleid=<%=rs("articleid")%>" method="post">
		<p>文章标题：<input name="title" size="20" type="text" value="<%=rs("title")%>">&nbsp;&nbsp;&nbsp;作者：<input name="author" size="10" type="text" value="<%=rs("author")%>">
		<p>文章类别：<select name="class">
		<option value="isnull">==请选择分类==</option>
		<option value="1">李铁新闻</option>
		<option value="2">李铁图集</option>
		<option value="3">辽宁30号</option>
		<option value="4">埃弗顿12号</option>
		<option value="5">China8号</option>
		</select>&nbsp;&nbsp;&nbsp;
		<%
		if rs("tuijian")=0 then
		%>
		<input type=radio name="tuijian" value="1">推荐&nbsp;<input type=radio name="tuijian" value="0" checked>不推荐
		<%
		else
		%>
		<input type=radio name="tuijian" value="1" checked>推荐&nbsp;<input type=radio name="tuijian" value="0">不推荐
		<%end if%>
		<p align="left">文章内容:
		<p>
		<textarea name="content" id="content" style="display:none"><%=rs("content")%></textarea> 
        <IFRAME ID="Content" SRC="editor.asp?id=Content" FRAMEBORDER="0" SCROLLING="no" WIDTH="590" HEIGHT="425"></IFRAME> 
		<input type=hidden name="update" value="update">
                <p align="center"><input type="submit" name="submit" value="修改"></p>
				</form>
		</td>
		</tr>
		</table>
		</td></tr>
    </table></td>
	<td width="120"align="left" valign="top" scope="row">　
      <table width="100%" height="100%" border="0">
        <tr><td align="center" valign="top" scope="row"><table><tr>
          <td align="center" valign="top" scope="row"><b>密码修改</b><br></td></td>
        </tr>
		<tr>
		<td>
		<form action="password.asp?user=<%=name1%>" method="post">
		<p>原密码：<p><input name="password1" size="10" type="password">
		<p>新密码：<p><input name="password2" size="10" type="password">
		<p>新密码：<p><input name="password3" size="10" type="password">
		<p><input type="submit" value="确定">
				</form>
		</td>
		</tr>
		<tr>
		<td><a href="admin_mod.asp">修改</a>
		<p><a href="admin_del.asp">删除</a>
		</td>
		</tr>
		
       </table>
	   </td>
	   </tr>
	  </table>
		
    </td>
  </tr>
</table>
  <p align="center">Copyright (C) 2004 Tie8.Studio All Rights Reserved </p>
    <p align="center">版权所有 铁吧</p>
	<%
	elseif name1=pass("admin") and password=pass("password") then
	  session("admin")=pass("admin")
	  response.redirect "admin.asp"
	else
	%>
	请输入正确的用户名和密码。点击<a href="index.asp">返回</a>
	<%end if
	%>
</body>
</html>