<!--#include file="inc/Conn_User.asp"-->
<!--#include file="inc/Conn.asp"-->



<%
dim UserID
UserID=trim(request("UserID"))
if UserID="" then
	FoundErr=True
	ErrMsg=ErrMsg & "<br><li>请指定UserID</li>"
	call WriteErrMsg()
	response.end
else
	UserID=Clng(UserID)
end if
articleID=trim(request("articleID"))
if articleID="" then
	FoundErr=True
	ErrMsg=ErrMsg & "<br><li>请指定articleID</li>"
	call WriteErrMsg()
	response.end
else
	articleID=Clng(articleID)
end if

%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title><%=PageTitle%></title>
<link href="new/css.CSS" rel="stylesheet" type="text/css">

</head>

<body bgcolor="f2f2f2" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<%
userid=request("userid")
articleid=request("articleid")
set rs=server.createobject("adodb.recordset")
sql="select * from article where articleid="&articleid
rs.open sql,Conn,1,1
%>
<%
	classID=trim(request("classID"))
	photoid=trim(Request("articleid"))
		if photoid="" then
		response.Write "<br><li>请指定ID</li>"
		
	else
		photoid=Clng(photoid)
	
	conn.execute "delete from article where articleid=" & articleid
	response.Redirect "log.asp?userid="&userid&"&classid="&classid
    end if
%>
<%rs.close
set rs=nothing
%>
</body>
</html>

