<%
  
  
   curpage=Request.QueryString("curpage") 
   strId=request("id")
   
         strdate1=request("date1")
		 strdate2=request("date2")
		 title=request("title")
		 guanjianci=request("guanjianci")
		 
		 
     Set MyOAASPObj = Server.CreateObject("YFSchoolOApro.YFSchoolDll")
 	     MyOAASPObj. Email_del(strId)
     set MyOAASPObj=nothing 

 
    response.redirect   "Havesended.asp?curpage="&curpage&"&date1="&strdate1&"&date2="&strdate2&"&title="&title&"&guanjianci="&guanjianci
 %>