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

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