<object runat=server id=conn1 progid="adodb.connection"></object>
<%application.Lock
conn1.Open Application("p_jyzx")
Application.UnLock
%>
<%
   set rs=server.createobject("adodb.recordset")
sql="delete * from affiliate where user_name='"&session("Current_user")&"'"
rs.open sql,conn1,3,2
   set rs=server.createobject("adodb.recordset")
sql="delete * from affiliate_link where user_name='"&session("Current_user")&"'"
rs.open sql,conn1,3,2
   set rs=server.createobject("adodb.recordset")
sql="delete * from affiliate_intro where user_name='"&session("Current_user")&"'"
rs.open sql,conn1,3,2
   set rs=server.createobject("adodb.recordset")
sql="delete * from affiliate_intro_vip where user_name='"&session("Current_user")&"'"
rs.open sql,conn1,3,2
    
Response.Redirect "affiliate.asp"
%>