id=request("vote_id")
user_id=request("u_id")
'-----------------------------------------------------------------
Set conn = Server.CreateObject("ADODB.Connection")
DBPath = Server.MapPath("../isi/xlist.asp")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath
sql="delete * from t_Vote where ( ID =" & id & " or ParentID=" & id & " ) And AccountID=" & user_id
conn.Execute sql
sql="delete * from t_VoteBBS where QuestionID =" & id & " And AccountID=" & user_id
conn.Execute sql
conn.close
set conn=nothing
response.redirect "votelist.asp"
%>
