<%if Session("weight")<>5 then 
Response.Redirect "error.asp?cause=4"
 end if
%>
<object runat=server id=conn1 progid="adodb.connection"></object>
<%application.Lock
conn1.Open Application("p_jyzx")
Application.UnLock
%>


<object runat=server id=connpic progid="adodb.connection"></object>
<%application.Lock
connpic.Open Application("p_pic")
Application.UnLock
%>
<%'sql1="select * from user where weight=1 and last_time<#"&Request("last_login")&"#"

set rs=server.createobject("adodb.recordset")
sql="delete * from vip_user where user_name in(select user_name from user where weight=1 and last_time<#"&Request("last_login")&"#)"
rs.open sql,conn1,3,2

set rs2=server.createobject("adodb.recordset")
sql="delete * from user_info where user_name in(select user_name from user where weight=1 and last_time<#"&Request("last_login")&"#)"
rs2.open sql,conn1,3,2
'set rs3=server.createobject("adodb.recordset")
'sql="delete * from pic where user_name in(select user_name from user where weight=1 and last_time<#"&Request("last_login")&"#)"
'rs3.open sql,connpic,3,2
set rs4=server.createobject("adodb.recordset")
sql="delete * from mynote where user_name in(select user_name from user where weight=1 and last_time<#"&Request("last_login")&"#)"
rs4.open sql,conn1,3,2
set rs5=server.createobject("adodb.recordset")
sql="delete * from other_note where user_name in(select user_name from user where weight=1 and last_time<#"&Request("last_login")&"#)"
rs5.open sql,conn1,3,2
set rs6=server.createobject("adodb.recordset")
sql="delete * from ideal_friends where user_name in(select user_name from user where weight=1 and last_time<#"&Request("last_login")&"#)"
rs6.open sql,conn1,3,2
set rs7=server.createobject("adodb.recordset")
sql="delete * from online where user_name in(select user_name from user where weight=1 and last_time<#"&Request("last_login")&"#)"
rs7.open sql,conn1,3,2
set rs8=server.createobject("adodb.recordset")
sql="delete * from party where initiate_people in(select user_name from user where weight=1 and last_time<#"&Request("last_login")&"#)"
rs8.open sql,conn1,3,2
set rs9=server.createobject("adodb.recordset")
sql="delete * from party_discuss where initiate_people in(select user_name from user where weight=1 and last_time<#"&Request("last_login")&"#)"
rs9.open sql,conn1,3,2
set rs1=server.createobject("adodb.recordset")
sql="delete * from user where weight=1 and last_time<#"&Request("last_login")&"#"
rs1.open sql,conn1,3,2

	Response.Redirect "binqi.asp"

%>