//系統載入時
function StartLoad(){

	var strProgram=GetParam("program")+"函批服務";
	keyinorder.program.value=strProgram;
	keyinorder.uid.value=getUID(strProgram,1);
	keyinorder.ucode.value=getUID(strProgram,2);
	keyinorder.txtEmail.value=getUID(strProgram,4);
	var strFee="3000";
	keyinorder.MN.value=strFee;
	keyinorder.B1.value="確定付款"+strFee+"元";
	keyinorder.OrderInfo.value=strProgram;
	caption.innerHTML=strProgram;
	//alert(keyinorder.program.value+"/"+keyinorder.MN.value);
	
	//->
	today = new Date();
	sYear = today.getFullYear();
	
	sMonth=(today.getMonth()+1);
	if (sMonth>0 && sMonth<10)
		sMonth='0'+''+sMonth;
		
	sDate2=today.getDate();
	if (sDate2>0 && sDate2<10)
		sDate2='0'+''+sDate2;
	
	today.setDate(today.getDate()+4)
	sDate=today.getDate();
	if (sDate>0 && sDate<10)
		sDate='0'+''+sDate;
		
	keyinorder.DueDate.value=sYear+''+sMonth+''+sDate;
	keyinorder.BillDate.value=sYear+''+sMonth+''+sDate2;
	keyinorder.ProductName1.value=strProgram;
	keyinorder.ProductPrice1.value=strFee;	
	//<-
}

function chkData(){
	var strXML="<data><rs>";
	var strError="";
	var datCurr=new Date();
	var strOrderID=datCurr.getTime();

	strXML=strXML+"<orderid>"+strOrderID+"</orderid>";
	keyinorder.note1.value=strOrderID;
	strXML=strXML+"<productid>1</productid>";
	strXML=strXML+"<product>"+keyinorder.program.value+"</product>";
	strXML=strXML+"<productamount>"+keyinorder.MN.value+"</productamount>";
	
	var strTmp="["+keyinorder.program.value+"]\n<<姓名>>:"+keyinorder.sna.value+"\n";
	strXML=strXML+"<username>"+keyinorder.sna.value+"</username>";
	if (keyinorder.sna.value=="")
		strError=strError+"<<姓名>>不可為空白!\n";

	if (keyinorder.Type1.value==0){
		strTmp=strTmp+"<<國曆生日>>:";
		strXML=strXML+"<btype>1</btype>";
	}
	else{
		strTmp=strTmp+"<<農曆生日>>:";
		strXML=strXML+"<btype>2</btype>";
	}
		
	strTmp=strTmp+keyinorder.Year1.value+"年"+keyinorder.Month1.value+"月"+keyinorder.Day1.value+"日"+keyinorder.Hour.value+"時"+keyinorder.Minute.value+"分\n";
	strXML=strXML+"<birthday>"+keyinorder.Year1.value+"年"+keyinorder.Month1.value+"月"+keyinorder.Day1.value+"日</birthday>";
	strXML=strXML+"<birthtime>"+keyinorder.Hour.value+"時"+keyinorder.Minute.value+"分</birthtime>";
	
	if (keyinorder.Sex[0].checked==true){
		strTmp=strTmp+"<<性別>>:男\n";
		strXML=strXML+"<sex>1</sex>";
	}
	else{
		strTmp=strTmp+"<<性別>>:女\n";
		strXML=strXML+"<sex>2</sex>";
	}
		
	if (keyinorder.txtTel.value=="")
		strError=strError+"<<聯絡電話>>不可為空白!\n";
	else{
		if (chkPhone(keyinorder.txtTel.value)=="0")
			strError=strError+"<<聯絡電話>>格式不正確!\n";
	}
		
	keyinorder.sdt.value=keyinorder.txtTel.value;
	keyinorder.std.value=keyinorder.txtTel.value;

	strXML=strXML+"<tel>"+keyinorder.txtTel.value+"</tel>";
	strTmp=strTmp+"<<聯絡電話>>"+keyinorder.txtTel.value+"\n";

	if (keyinorder.txtEmail.value=="")
		strError=strError+"<<電子郵件>>不可為空白!\n";
	else{
		if (chkEmail(keyinorder.txtEmail.value)==false)
			strError=strError+"<<電子郵件>>格式不正確!\n";
	}
	
	strTmp=strTmp+"<<電子郵件>>"+keyinorder.txtEmail.value+"\n";
	strXML=strXML+"<email>"+keyinorder.txtEmail.value+"</email>";
	keyinorder.email.value=keyinorder.txtEmail.value;
	
	strTmp=strTmp+"<<婚姻狀況>>";
	if (keyinorder.Stat1.value=="0")
		strTmp=strTmp+"已婚\n";
	else if (keyinorder.Stat1.value=="1")
		strTmp=strTmp+"未婚\n";
	else
		strTmp=strTmp+"其他\n";
		
	strXML=strXML+"<mstatus>"+keyinorder.Stat1.value+"</mstatus>";
	
	strTmp=strTmp+"<<婚姻說明>>"+keyinorder.txtStat1.value+"\n";
	strXML=strXML+"<mremark>"+keyinorder.txtStat1.value+"</mremark>";
	
	strTmp=strTmp+"<<工作狀況>>";
	if (keyinorder.Stat2.value=="0")
		strTmp=strTmp+"老闆\n";
	else if (keyinorder.Stat2.value=="1")
		strTmp=strTmp+"就業\n";
	else if (keyinorder.Stat2.value=="2")
		strTmp=strTmp+"學生\n";
	else
		strTmp=strTmp+"其他\n";
	
	strXML=strXML+"<wstatus>"+keyinorder.Stat2.value+"</wstatus>";
	
	strTmp=strTmp+"<<工作說明>>"+keyinorder.txtStat2.value+"\n";
	strXML=strXML+"<wremark>"+keyinorder.txtStat2.value+"</wremark>";

	strTmp=strTmp+"<<聯絡地址>>"+keyinorder.txtAddress.value+"\n";
	strXML=strXML+"<address>"+keyinorder.txtAddress.value+"</address>";
	if (keyinorder.SendM[0].checked==true){
		strTmp=strTmp+"<<通知方式>>:電子郵件\n";
		strXML=strXML+"<sendmethod>1</sendmethod>";
	}
	else{
		strTmp=strTmp+"<<通知方式>>:掛號\n";
		strXML=strXML+"<sendmethod>2</sendmethod>";
		if (keyinorder.txtAddress.value=="")
			strError=strError+"分析結果以掛號寄送,<<地址>>不可為空白!\n";
	}

	strTmp=strTmp+"<<說明>>:"+keyinorder.OrderInfo3.value+"\n";
	strXML=strXML+"<remark>"+keyinorder.OrderInfo3.value+"</remark>";
	
	//alert(strTmp);
	//->
	strXML=strXML+"<ip>"+getIP()+"</ip>";
	strXML=strXML+"<userid>"+keyinorder.uid.value+"</userid>";
	strXML=strXML+"<ucode>"+keyinorder.ucode.value+"</ucode>";
	if (keyinorder.ucode.value=="")
		keyinorder.UserNo.value="UNKNOWN";
	else{
		keyinorder.UserNo.value=keyinorder.ucode.value;
		strTmp=strTmp+"<<帳號>>:"+keyinorder.ucode.value+"\n";
	}

	if (keyinorder.paymethod[1].checked==true){
		keyinorder.web.value="b050511941";
		keyinorder.action="https://www.esafe.com.tw/asp3/etopm.asp";
		strTmp=strTmp+"<<付款方式>>:超商代收付機制\n";
		strXML=strXML+"<paymethod>1</paymethod>";
	}
	else{
		keyinorder.web.value="b041108626";
		keyinorder.action="https://www.esafe.com.tw/asp_prj/etood_e2.asp";
		strTmp=strTmp+"<<付款方式>>:線上信用卡付款機制\n";
		strXML=strXML+"<paymethod>2</paymethod>";
	}
	
	if (keyinorder.MN.value==""){
		alert("此項產生尚未提供線上消費。");
		return false;
	}
	else{
		if (strError==""){
			var blnReturn=confirm(strTmp+"\n以上資料是否正確?");
			if (blnReturn==true){
				if (saveData(strXML+"</rs></data>")==true){
					var strDescp="這只是預先通知有人刷卡，並不代表刷卡成功！\n";
					if (sendMail("函批服務付款機制被使用-紫微斗數、子平八字",replaceSubstring(strDescp+strTmp,'\n','<br>'))==true)
						return true;
					else
						return false;
				}
				else{
					alert("save fail!");
					return false;
				}
			}
			else
				return false;
		}
		else{
			alert('chkData:'+strError);
			return false;
		}
	}
}

function saveData(strXML){
	//alert(strXML);
	var poster1=new ActiveXObject("Microsoft.XmlHttp");
	poster1.open("post","buysafe_save.asp?next=save","false");
	poster1.send(strXML);
	var tmpReturn=poster1.responseText; 
	
	//alert(tmpReturn);
	
	if (poster1.status=="200" && tmpReturn.substr(38,5)!='error'){
		var xmlTmp=new ActiveXObject("msxml.domdocument");
		xmlTmp.loadXML(tmpReturn);
		
		//alert(xmlTmp.xml);
		
		if (xmlTmp.selectSingleNode("result").text=='Success')
			return true;
		else
			return false;
	}
	else{
		//秀錯誤訊息
		var xmlErr=new ActiveXObject("msxml.domdocument");
		xmlErr.loadXML(tmpReturn);
		alert('saveData:'+xmlErr.text);
		return false;
	}
}