<%
paras=paras&"pl_steurl:"&pl_steurl&Vend
paras=paras&"d_dme:"&getval(substrContent,"d_dme")&Vend
paras=paras&"d_pss:"&getval(session("dme_doresult"),"d_pss")&Vend
paras=paras&"d_yarcnt:"&getval(session("dme_doresult"),"d_yarcnt")&Vend
paras=paras&"pl_dmectr_url:"& pl_dmectr_url&Vend
if session("usremail")<>"" then
toemail=session("usremail")
else
toemail=getval(substrContent,"u_eml")
end if

dmetpe=left(getval(substrContent,"entryclass"),3)

select case  getval(substrContent,"bmode") 
case "0"
mailtag=dmetpe&"_reg_1"
case "1"
mailtag=dmetpe&"_reg_0"
case "5"
mailtag=dmetpe&"_reg_5"
case else
if getval(substrcontent,"entrytype")="getdns" then
mailtag="dme_dns_1"
else
mailtag=dmetpe&"_reg_1"
end if
end select



recs=jmail_feedback(toemail,mailtag,paras,true)
if recs then
ifsendwrd="·¢ËÍ³É¹¦"
else
ifsendwrd="·¢ËÍÊ§°Ü"
end if

%>