<%
'****************************************************************
'**   版权所有：烈火工作室  演示网站http://www.strongfire.cn   **
'**   QQ:839225572   邮箱：strongfire2008@163.com              **
'**   非正版用户不得擅自非法修改用于商业用途！查出必究。       **
'****************************************************************
%>
<!--#include file="islogin.asp"-->
<!--#include file="Check_SqlIn.asp"-->
<!--#include file="admin_conn.asp"-->
<!--#include file = "config.asp"-->
<!--#include file = "const.asp"-->
<%


bb=replace(request.form("newhdpic")," ","")

set rs=server.CreateObject("adodb.recordset")
sql="select ID,Title,picture,ispic,ishfpic from article where  picture<>null order by id desc"
rs.open sql,conn,1,3
if not rs.EOF then
do while not rs.EOF
if InStr(","&bb&",",","&rs("id")&",")> 0 then
rs("ispic")=1
else
rs("ispic")=0
end if
rs.update
rs.MoveNext

loop
end if
rs.close
conn.close
set conn=nothing

Response.Redirect "newhdpic.asp"



%>