<% member_id=request.form("hid_id") 'usercode=request.form("txt_username") 'password=request.form("txt_userpass") XingMing=request.form("txt_xingming") firstXingMing=request.form("txt_firstxingming") middleXingMing=request.form("txt_middlexingming") txt_sex=request.form("rad_sex") txt_title=request.form("txt_title") txt_guojia=request.form("txt_guojia") txt_huzhao=request.form("txt_huzhao") txt_jigou=request.form("txt_jigou") txt_youbian=request.form("txt_post") txt_zhuce=date() txt_mail=request.form("txt_mail") txt_tel=request.form("txt_tel") txt_fax=request.form("txt_fax") txt_dizhi=request.form("txt_address") txt_peitong=request.form("txt_peitong") txt_research=request.form("txt_research") txt_come=request.form("txt_come") txt_leave=request.form("txt_leave") 'txt_room=request.form("txt_room") 'txt_day=request.form("txt_day") txt_food=request.form("chk_food") txt_food3=request.form("chk_food3") txt_session=request.form("sel_session") txt_item=request.form("txt_item") if instr(txt_item,"演讲")>0 then if txt_session="" then response.write "" response.end end if end if txt_other=request.form("txt_other") txt_ticket=request.form("rad_ticket") ticket_other=request.form("ticket_other") txt_room=request.form("rad_room") 'txt_session=request.form("sel_session") txt_need=request.form("txt_bark") txt_need2=request.form("txt_bark2") txt_payment=request.form("txt_payment") txt_payment2=request.form("txt_payment2") if txt_payment2="" then txt_payment2 = 0 end if payment_type=request.form("Payment") card_number=request.form("txt_cardnumber") expiration_date=request.form("sel_year")& "-" & request.form("sel_month") card_holder=request.form("card_holder") security_cod=request.form("security_cod") 'admin_user=session("USER_NAME") dim db Set db=new Connections select case request("Action") 'case "mail_up" 'set mail=CreateObject("jmail.Message") 'mail.Charset ="gb2312" 'mail.From ="yys@bitlifesciences.com" 'mail.AddRecipient request.form("hid_mail") 'mail.MailDomain="mail.bitlifesciences.com" 'mail.MailServerUserName = "yys@bitlifesciences.com" 'mail.MailServerPassWord = "123456" 'mail.subject="BIT's 3rd Annual World Congress of Regenerative Medicine & Stem Cells Registration Confirmation" 'mail.HTMLBody= "This is an automatic reply to your registration. Please don't reply for this.

Thank you for your attention on BIT's 3rd Annual World Congress of Regenerative Medicine & Stem Cells, which will be held during Nov.19-21, 2009 Beijing, China. We have received your registration information. The staff from Organizing Committee will contact you later regarding your registration and payment later. Thank you in advance!

If you still don't get reply within three working days or you have any questions, please feel free to contact us via E-mail: zaylin@bit-cemd.com or anna@bit-cemd.com Tel: 0086-411-84799609-813 Fax: 0086-411-84799629." 'On Error Resume Next 'mail.Send("mail.bitlifesciences.com") 'mail.close() 'set mail=nothing 'response.write "alert('This E-Mail has been registered！');history.go(-1);" response.end end if add_sql="insert into Member_Info (M_NAME,M_firstNAME,M_middleNAME,M_SEX,M_TITLE,M_AGENCIES,M_COUNTRY,M_PASSPORT,M_MAIL,M_ZIP,M_ADDRESS,M_TEL,M_FAX,M_ACCOMPANYING,M_RESEARCH,CHECK_FOOD,CHECK_FOOD3,COME_TIME,LEAVE_TIME,MEET_ITEM,OTHER,ROOM_TYPE,TICKETS_TYPE,TICKETS_OTHER,M_SESSION,M_NEEDS,M_NEEDS2,TOTAL_PAY,TOur_price,CARD_TYPE,CARD_NUMBER,EXPRI_DATE,CARD_HOLDER,SECURITY_CODE) values ('"& XingMing &"','"& firstXingMing &"','"& middleXingMing &"','"& txt_sex &"','"& txt_title &"','"& txt_jigou &"','"& txt_guojia &"','"& txt_huzhao &"','"& txt_mail &"','"& txt_youbian &"','"& txt_dizhi &"','"& txt_tel &"','"& txt_fax &"','"& txt_peitong &"','"& txt_research &"','"& txt_food &"','"& txt_food3 &"','"& txt_come &"','"& txt_leave &"','"& txt_item &"','"& txt_other &"','"& txt_room &"','"& txt_ticket &"','"& ticket_other &"','"& txt_session &"','"& txt_need &"','"& txt_need2 &"','"& txt_payment &"',"& txt_payment2 &",'"& payment_type &"','"& card_number &"','"& expiration_date &"','"& card_holder &"','"& security_cod &"')" db.Query add_sql,0 if txt_payment2="0" then response.write "" else %>

<% end if case "upd" add_sql="update Member_Info set M_NAME='"& XingMing &"',M_firstNAME='"& firstXingMing &"',M_middleNAME='"& middleXingMing &"',M_SEX='"& txt_sex &"',M_TITLE='"& txt_title &"',M_AGENCIES='"& txt_jigou &"',M_COUNTRY='"& txt_guojia &"',M_PASSPORT='"& txt_huzhao &"',M_MAIL='"& txt_mail &"',M_ZIP='"& txt_youbian &"',M_ADDRESS='"& txt_dizhi &"',M_TEL='"& txt_tel &"',M_FAX='"& txt_fax &"',M_ACCOMPANYING='"& txt_peitong &"',M_RESEARCH='"& txt_research &"',CHECK_FOOD='"& txt_food &"',COME_TIME='"& txt_come &"',LEAVE_TIME='"& txt_leave &"',MEET_ITEM='"& txt_item &"',OTHER='"& txt_other &"',ROOM_TYPE='"& txt_room &"',TICKETS_TYPE='"& txt_ticket &"',TICKETS_OTHER='"& ticket_other &"',M_SESSION='"& txt_session &"',M_NEEDS='"& txt_need &"',TOTAL_PAY='"& txt_payment &"',UPD_DATE=#"& now() &"# where MEMBER_ID=" & member_id db.Query add_sql,0 response.write "" end select Set db=Nothing %>