//
//

caseXmlTag   = 1; // 0:大小寫不變 1:小寫字母 2:大寫字母
isCompactXML = 0; // 0:完整XML 1:精簡XML 2:絕對精簡XML

str2htmlAy = new Array (
	["&",     "#amp;"],
	["#amp;", "&"],
	["<",     "&lt;"],
	[">",     "&gt;"],
	[" ",     "&nbsp;"]
);

isIE = (document.all) ? 1 : 0;

//
// 計算 em 之下的 childNodes 中，有多少個 _xmlType 是 block。
// 可以用 _xmlBGID 區分不同的 block group。
//
function CountChildBlock_(em, xmlBGID)
{
	var childAy = em.childNodes, len = childAy.length;
	var n = 0;
	for (var i=0; i<len; i++) if (childAy[i].nodeType == 1)
		if (childAy[i].getAttribute("_xmlType") == "block" && childAy[i].getAttribute("_xmlBGID") == xmlBGID)
			n++;
	return n;
}

//
// 計算 em 之下的 childNodes 中，有多少個 _xmlTag。
//
function CountChildXmlTag_(em, xmlTag)
{
	var childAy = em.childNodes, len = childAy.length;
	var n = 0;
	for (var i=0; i<len; i++) if (childAy[i].nodeType == 1)
		if (childAy[i].getAttribute("_xmlTag") == xmlTag)
			n++;
	return n;
}

//
// 計算有多少個和 em 相同的 block。
// 如果 em 有 _xmlTag 則用 _xmlTag 區分，若沒有 _xmlTag 則用 _xmlType = block 及 _xmlBGID 區分。
//
function CountSameBlock_(em)
{
	return (em.getAttribute("_xmlTag")) ?
		CountChildXmlTag_(em.parentNode, em.getAttribute("_xmlTag")) :
		CountChildBlock_(em.parentNode, em.getAttribute("_xmlBGID"));
}

//
// 從 em 往上找 id
//
function FindParentId_(em, id)
{
	while (em.tagName.toLowerCase() != "body") {
		if (em.getAttribute("id") == id)
			return em;
		em = em.parentNode;
	}
	return null;
}

//
// 往上找屬於 em 的 block。
//
function FindParentBlock_(em)
{
	while (em.tagName.toLowerCase() != "body") {
		if (em.getAttribute("_xmlType") == "block")
			return em;
		em = em.parentNode;
	}
	return null;
}

//
// 在 em 之後，新增一個和 em 相同結構的 block。
//
function AddThisBlock_(em)
{
	em = FindParentBlock_(em); if (!em) return false;

	var parentNode = em.parentNode;
	var cloneNode  = em.cloneNode(true);
	parentNode.insertBefore(cloneNode, em.nextSibling);

	var selectAy = cloneNode.getElementsByTagName("select"), len = selectAy.length;
	for (var i=0; i<len; i++)
		if (selectAy[i].onchange) selectAy[i].onchange();

	return cloneNode;
}

//
// 在 em 的 parent 之後，新增一個和 em 的 parent 相同結構的 block。
//
function AddParentBlock_(em)
{
	em = FindParentBlock_(em); if (!em) return false;
	em = FindParentBlock_(em.parentNode); if (!em) return false;

	var parentNode = em.parentNode;
	var cloneNode  = em.cloneNode(true);
	parentNode.insertBefore(cloneNode, em.nextSibling);

	var selectAy = cloneNode.getElementsByTagName("select"), len = selectAy.length;
	for (var i=0; i<len; i++)
		if (selectAy[i].onchange) selectAy[i].onchange();

	return cloneNode;
}

//
// 刪除 em 這個 block，若 em 只剩一個則無作用。
//
function DelThisBlock_(em, isForce)
{
	em = FindParentBlock_(em); if (!em) return false;

	if (!isForce) {
		if (CountSameBlock_(em) <= 1) {
			alert("僅有一個元件，無法刪除！");
			return;
		}

		var tmpBGColor = em.style.backgroundColor;
		em.style.backgroundColor = "#ff0000";
		if (!confirm("確定要刪除？")) {
			em.style.backgroundColor = tmpBGColor;
			return false;
		}
	}

	var parentNode = em.parentNode;
	parentNode.removeChild(em);
}

//
// 刪除 em 的 parent block，若 em 的 parent 只剩一個則無作用。
//
function DelParentBlock_(em, isForce)
{
	em = FindParentBlock_(em); if (!em) return false;
	em = FindParentBlock_(em.parentNode); if (!em) return false;

	if (!isForce) {
		if (CountSameBlock_(em) <= 1) {
			alert("僅有一個元件，無法刪除！");
			return;
		}

		var tmpBGColor = em.style.backgroundColor;
		em.style.backgroundColor = "#ff0000";
		if (!confirm("確定要刪除？")) {
			em.style.backgroundColor = tmpBGColor;
			return false;
		}
	}

	var parentNode = em.parentNode;
	parentNode.removeChild(em);
}

//
// 將 em 這個 block 往上移一位。
//
function UpThisBlock_(em) {
	var cBlock  = FindParentBlock_(em); if (!cBlock) return false;
	var cParent = cBlock.parentNode; if (!cParent) return false;
	var cBlock2 = cBlock.previousSibling;
	if (cBlock2)
		cParent.insertBefore(cBlock, cBlock2);
}

//
// 從 em 開始，找出第一個 _xmlTag 出現的位置。
//
function FindXmlTag_(em, xmlTag)
{
	xmlTag = xmlTag.toUpperCase();
	var cTag, em2;

	if (em.nodeType == 1)
		if (cTag = em.getAttribute("_xmlTag"))
			if (cTag.toUpperCase() == xmlTag)
				return em;

	var childAy = em.childNodes, len = childAy.length;
	for (var i=0; i<len; i++)
		if (em2 = FindXmlTag_(childAy[i], xmlTag))
			return em2;

	return null;
}

//
// 改變英文字母的大小寫
//
function strChgCase_(s, caseMode)
{
	switch (caseMode) {
		case 1 : return s.toLowerCase();
		case 2 : return s.toUpperCase();
		default : return s;
	}
}

//
// 字串置換
//
function strReplace_(s, f, t)
{
	while (s.indexOf(f) >= 0)
		s = s.replace(f, t);
	return s;
}

//
// 將 \r\n 轉為 <crlf/>
//
function trimCRLF_(s) {
	s = strReplace_(s, '\r', '');
	s = strReplace_(s, '\n', '<crlf/>');
	return s;
}

//
// 將 string 轉換 str2htmlAy 所列的特殊字元為 html code
//
function str2html_(s)
{
	s = strReplace_(s, "\r", "");

	var a = s.split('\n');
	var n = a.length;
	s = "";
	for (var i=0; i<n; i++) {
		s += a[i];
		if (i < n-1)
		if (a[i][a[i].length-1] == '+')
			s += "''+";
		else if (a[i][a[i].length-1] == ';')
			s += ';;';
		else if (a[i][a[i].length-1] == '>')
			s += '<crlf/>';
		else
			s += '<br/>';
	}

	for (var i=0; i<str2htmlAy.length; i++)
		s = strReplace_(s, str2htmlAy[i][0], str2htmlAy[i][1]);
	return s;
}

//
//  將 html code 轉換 str2htmlAy 所列的特殊字元為 string
//
function html2str_(s)
{
	if (!s) return "";
	//for (var i=str2htmlAy.length-1; i>=0; i--)
		//s = strReplace_(s, str2htmlAy[i][1], str2htmlAy[i][0]);
	s = strReplace_(s, "\r", "");
	s = strReplace_(s, "\n", "");
	s = strReplace_(s, "<br/>",   ((isIE) ? "\r\n" : "\n"));
	s = strReplace_(s, "<crlf/>", ((isIE) ? "\r\n" : "\n"));
	s = strReplace_(s, ";;;",     ((isIE) ? ";\r\n" : ";\n"));
	s = strReplace_(s, "+''+",    ((isIE) ? "+\r\n" : "+\n"));
	if (s == " ") s = "";
	return s;
}

//
// 以下這兩個函式將以 _xmlType='root' 開始的 Form 架構轉換成 XML。
// 主要程式為 Form2XML_。
//
function doForm2XML_(dom, html)
{
	var em = dom, cAttr;
	var cTag        = html.getAttribute("_xmlTag");
	var cType       = html.getAttribute("_xmlType");
	var cIdxName    = html.getAttribute("_idxName");
	var cIdxNameRO  = html.getAttribute("_idxNameRO");
	var cIdxNameRW  = html.getAttribute("_idxNameRW");
	var cIdxAttr    = html.getAttribute("_idxAttr");
	var cIdxAttrRO  = html.getAttribute("_idxAttrRO");
	var cIdxAttrRW  = html.getAttribute("_idxAttrRW");
	var cIdx1Name   = html.getAttribute("_idx1Name");
	var cIdx1NameRO = html.getAttribute("_idx1NameRO");
	var cIdx1NameRW = html.getAttribute("_idx1NameRW");
	var cIdx1Attr   = html.getAttribute("_idx1Attr");
	var cIdx1AttrRO = html.getAttribute("_idx1AttrRO");
	var cIdx1AttrRW = html.getAttribute("_idx1AttrRW");

	if (cTag)
		if (cType == "attr") {
			//if (html.getAttribute("type")!="checkbox" || html.getAttribute("type")=="checkbox" && html.checked) {
				if (html.getAttribute("type")=="checkbox" && !html.checked) html.value = "---";
				if (html.value)
					em.setAttribute(strChgCase_(cTag, caseXmlTag), html.value);
				if (cIdxAttr) {
					cAttr = em.getAttribute("_idxattr");
					cAttr = (cAttr) ? cAttr+";"+cIdxAttr : cIdxAttr;
					em.setAttribute("_idxattr", cAttr);
				}
				if (cIdxAttrRO) {
					cAttrRO = em.getAttribute("_idxattrro");
					cAttrRO = (cAttrRO) ? cAttrRO+";"+cIdxAttrRO : cIdxAttrRO;
					em.setAttribute("_idxattrro", cAttrRO);
				}
				if (cIdxAttrRW) {
					cAttrRW = em.getAttribute("_idxattrrw");
					cAttrRW = (cAttrRW) ? cAttrRW+";"+cIdxAttrRW : cIdxAttrRW;
					em.setAttribute("_idxattrrw", cAttrRW);
				}
				if (cIdx1Attr) {
					c1Attr = em.getAttribute("_idx1attr");
					c1Attr = (c1Attr) ? c1Attr+";"+cIdx1Attr : cIdx1Attr;
					em.setAttribute("_idx1attr", c1Attr);
				}
				if (cIdx1AttrRO) {
					c1AttrRO = em.getAttribute("_idx1attrro");
					c1AttrRO = (c1AttrRO) ? c1AttrRO+";"+cIdx1AttrRO : cIdx1AttrRO;
					em.setAttribute("_idx1attrro", c1AttrRO);
				}
				if (cIdx1AttrRW) {
					c1AttrRW = em.getAttribute("_idx1attrrw");
					c1AttrRW = (c1AttrRW) ? c1AttrRW+";"+cIdx1AttrRW : cIdx1AttrRW;
					em.setAttribute("_idx1attrrw", c1AttrRW);
				}
			//}
		}
		else if (cType == "value")
			em.innerHTML = str2html_(html.value);
		else if (cType == "element") {
			//if (html.getAttribute("type")!="checkbox" || html.getAttribute("type")=="checkbox" && html.checked) {
				if (html.getAttribute("type")=="checkbox" && !html.checked) html.value = "---";
				em = document.createElement(strChgCase_(cTag, caseXmlTag));
				dom.appendChild(em);
				if (cIdxName)    em.setAttribute("_idx",   cIdxName);
				if (cIdxNameRO)  em.setAttribute("_idxro", cIdxNameRO);
				if (cIdxNameRW)  em.setAttribute("_idxrw", cIdxNameRW);
				if (cIdxAttr)    em.setAttribute("_idxattr",   cIdxAttr);
				if (cIdxAttrRO)  em.setAttribute("_idxattrro", cIdxAttrRO);
				if (cIdxAttrRW)  em.setAttribute("_idxattrrw", cIdxAttrRW);
				if (cIdx1Name)   em.setAttribute("_idx1",   cIdx1Name);
				if (cIdx1NameRO) em.setAttribute("_idx1ro", cIdx1NameRO);
				if (cIdx1NameRW) em.setAttribute("_idx1rw", cIdx1NameRW);
				if (cIdx1Attr)   em.setAttribute("_idx1attr",   cIdx1Attr);
				if (cIdx1AttrRO) em.setAttribute("_idx1attrro", cIdx1AttrRO);
				if (cIdx1AttrRW) em.setAttribute("_idx1attrrw", cIdx1AttrRW);
				em.innerHTML = str2html_(html.value);
			//}
		}
		else {
			em = document.createElement(strChgCase_(cTag, caseXmlTag));
			dom.appendChild(em);
			if (cIdxName)    em.setAttribute("_idx",   cIdxName);
			if (cIdxNameRO)  em.setAttribute("_idxro", cIdxName);
			if (cIdxNameRW)  em.setAttribute("_idxrw", cIdxName);
			if (cIdxAttr)    em.setAttribute("_idxattr",   cIdxAttr);
			if (cIdxAttrRO)  em.setAttribute("_idxattrro", cIdxAttrRO);
			if (cIdxAttrRW)  em.setAttribute("_idxattrrw", cIdxAttrRW);
			if (cIdx1Name)   em.setAttribute("_idx1",   cIdx1Name);
			if (cIdx1NameRO) em.setAttribute("_idx1ro", cIdx1Name);
			if (cIdx1NameRW) em.setAttribute("_idx1rw", cIdx1Name);
			if (cIdx1Attr)   em.setAttribute("_idx1attr",   cIdx1Attr);
			if (cIdx1AttrRO) em.setAttribute("_idx1attrro", cIdx1AttrRO);
			if (cIdx1AttrRW) em.setAttribute("_idx1attrrw", cIdx1AttrRW);
		}

	var childAy = html.childNodes, len = childAy.length;
	for (var i=0; i<len; i++) if (childAy[i].nodeType == 1)
		doForm2XML_(em, childAy[i]);
}

function Form2XML_(xmlTag)
{
	var dom = document.createElement("span");
	var xml = FindXmlTag_(document, xmlTag);
	doForm2XML_(dom, xml);
	if (isCompactXML) CompactXML_(dom, isCompactXML);
	return strReplace_(strReplace_(dom.innerHTML, "\r", ""), "\n", "");
}

//==================================================
//
// 清除 em 所有的 childNodes。
//
function ClearChildNodes_(em)
{
	while (em.childNodes.length)
		em.removeChild(em.childNodes[0]);
}

//==================================================
//
// 依 xml 中每一個 childNode 的 value、option 屬性，來更新 sel 的選項。
//
function InitSelect_(xml, sel)
{
	if (!xml) return;
	var opt, em;

	ClearChildNodes_(sel);

	var childAy = xml.childNodes, len = childAy.length;
	for (var i=0; i<len; i++) if (childAy[i].nodeType == 1) {
		opt = childAy[i];
		em  = document.createElement("option");
		sel.appendChild(em);
		em.setAttribute("value", opt.getAttribute("value"));
		em.text = opt.getAttribute("option");
		if (opt.getAttribute("isSelected")) em.selected = true;
	}
	if (sel.onchange) sel.onchange();
	if (isIE) {sel.style.display = "none"; sel.style.display = "";} // 這一行 Code 怪怪的吧！沒辦法，這是 IE 5.5 的 Bug，若不如此 select 的顯示就怪怪的。
}

//==================================================
//
// 傳回 em 第一個 child。
//
function FirstChild_(em)
{
	var childAy = em.childNodes, len = childAy.length;
	for (var i=0; i<len; i++) if (childAy[i].nodeType == 1)
		return childAy[i];
	return null;
}

//==================================================
//
// 依以下 xml 中 value、option 的值來更新 select 選項。
//
// <xml id="idNewsAreas" _xmlType="select" style="display:none;">
// <NewsAreas>
//	<NewsArea AreaID="1" value="1" option="NewsArea1">
//		...
//	</NewsArea>
//	<NewsArea AreaID="2" value="2" option="NewsArea2">
//		...
//	</NewsArea>
// </NewsAreas>
// </xml>
//
// 語法 InitXmlSelect_("idNewsAreas", "AreaID");
// 其中 "idNewsAreas" 則是以上 xml 的 id，
// 而 "AreaID" 則是 <select _xmlTag="AreaID"> 中的 _xmlTag，所以只要是 _xmlTag 相同的 select 選項都會被重設。
//
function InitXmlSelect_(idXML, xmlTag)
{
	var xmlSelect = FirstChild_(document.getElementById(idXML));
	var selectAy  = document.getElementsByTagName("select"), len = selectAy.length;

	for (var i=0; i<len; i++)
		if (selectAy[i].getAttribute("_xmlTag") == xmlTag)
			InitSelect_(xmlSelect, selectAy[i]);
}

//==================================================
//
// 依以下 xml 中 value、option 的值來更新子 select 的選項。
//
// <xml id="AreaID_1" _xmlType="select" style="display:none;">
// <NewsClasses>
//	<NewsClass ClassID="1" value="1" option="NewsClass1">
//		...
//	</NewsClass>
//	<NewsClass ClassID="2" value="2" option="NewsClass2">
//		...
//	</NewsClass>
// </NewsClasses>
// </xml>
//
// 通常 InitSubSelect_ 用在父 select 的 onChange 事件中，
// 語法 <select _xmlTag="AreaID" onChange="InitSubSelect_(this, 'ClassID')">
// 其中 'ClassID' 則是子 <select _xmlTag="ClassID"> 的 _xmlTag，
// 而 xml 的 id 則必須為父 select 的 _xmlTag 加上底線 _ 再加上選到的 value，
// 如本例中則為 AreaID_1，其中 AreaID 為父 select 的 _xmlTag，1 則為選項的 value。
//
function InitSubSelect_(em, subName)
{
	var cTag      = em.getAttribute("_xmlTag");
	var nVal      = em.value;
	var xmlBlock  = FindParentBlock_(em);                   if (!xmlBlock)  return;
	var idXML     = document.getElementById(cTag+"_"+nVal); if (!idXML)     return;
	var xmlSelect = FirstChild_(idXML);                     if (!xmlSelect) return;
	var em2       = FindXmlTag_(xmlBlock, subName);         if (!em2)       return;
	InitSelect_(xmlSelect, em2);
}

//--------------------------------------------------
//
// 由 em 開始，找出以下的 childNodes 中，第一次出現 _xmlTag 的 node。
// FindingChildXmlTag_ 和 FindXmlTag_ 最大不同點是 FindXmlTag_ 會一直深入 child 去找 xmlTag，而 FindingChildXmlTag_ 不會。
//
function FindingChildXmlTag_(em, xmlTag)
{
	if (xmlTag) xmlTag = xmlTag.toUpperCase();
	var cTag;

	if (em.nodeType == 1)
		if (cTag = em.getAttribute("_xmlTag"))
			return (cTag.toUpperCase() == xmlTag || !xmlTag) ? em : null;

	return FindChildXmlTag_(em, xmlTag);
}

//--------------------------------------------------
//
// 找出 em 之下的 childNodes 中，第一次出現 _xmlTag 的 node。
//
function FindChildXmlTag_(em, xmlTag)
{
	var em2;

	var childAy = em.childNodes, len = childAy.length;
	for (var i=0; i<len; i++) if (childAy[i].nodeType == 1)
		if (em2 = FindingChildXmlTag_(childAy[i], xmlTag))
			return em2;

	return null;
}

//--------------------------------------------------
//
// 由 em 開始，找出以下的 childNodes 中，第一次出現 name 的 node。
//
function FindingChildName_(em, name)
{
	if (name) name = name.toUpperCase();
	var cTag;

	if (em.nodeType == 1)
		if (cName = em.getAttribute("name"))
			return (cName.toUpperCase() == name || !name) ? em : null;

	return FindChildName_(em, name);
}

//--------------------------------------------------
//
// 找出 em 之下的 childNodes 中，第一次出現 name 的 node。
//
function FindChildName_(em, name)
{
	var em2;

	var childAy = em.childNodes, len = childAy.length;
	for (var i=0; i<len; i++) if (childAy[i].nodeType == 1)
		if (em2 = FindingChildName_(childAy[i], name))
			return em2;

	return null;
}

//--------------------------------------------------
//
// 由 em 開始，找出以下的 childNodes 中，第一次出現 tag 的 node。
//
function FindingChildTag_(em, tagName)
{
	if (tagName) tagName = tagName.toUpperCase();
	var cTag;

	if (em.nodeType == 1)
		if (ctagName = em.tagName)
			return (ctagName.toUpperCase() == tagName || !tagName) ? em : null;

	return FindChildTag_(em, tagName);
}

//--------------------------------------------------
//
// 找出 em 之下的 childNodes 中，第一次出現 tag 的 node。
//
function FindChildTag_(em, tagName)
{
	var em2;

	var childAy = em.childNodes, len = childAy.length;
	for (var i=0; i<len; i++) if (childAy[i].nodeType == 1)
		if (em2 = FindingChildTag_(childAy[i], tagName))
			return em2;

	return null;
}

//--------------------------------------------------
//
// inActive 模式切換
//
function SwitchMode_(cHtml, cHide, cShow)
{
	var cHtmlAy = document.getElementsByTagName(cHtml), len = cHtmlAy.length;
	var cTag;

	for (var i=0; i<len; i++) {
		if (cHtmlAy[i].getAttribute("_xmlTag") == cHide || cHtmlAy[i].getAttribute("_xmlType") == cHide) {
			cHtmlAy[i].style.display = "none";
			cTag = FindChildXmlTag_(cHtmlAy[i], "inActive");
			if (cTag && cTag.nodeType == 1) cTag.value = 0;
		}
	}
	for (var i=0; i<len; i++)
		if (cHtmlAy[i].getAttribute("_xmlTag") == cShow || cHtmlAy[i].getAttribute("_xmlType") == cShow) {
			cHtmlAy[i].style.display = "";
			cTag = FindChildXmlTag_(cHtmlAy[i], "inActive");
			if (cTag && cTag.nodeType == 1) cTag.value = 1;
		}
}

//====================================================================================================
//
// 計算有多少個 tagName 相同的 em。
//
function CountSameTag_(em)
{
	var cTag = em.tagName, n = 0;
	var childAy = em.parentNode.childNodes, len = childAy.length;
	for (var i=0; i<len; i++) if (childAy[i].nodeType == 1)
		if (childAy[i].tagName == cTag)
			n++;
	return n;
}

//====================================================================================================
//
// 由 em 開始，找出以下的 childNodes 中，最後出現 _xmlTag 的 node。
//
function FindingChildLastXmlTag_(em, xmlTag)
{
	xmlTag = xmlTag.toUpperCase();
	var htmlRet = null, cTag;

	if (em.nodeType == 1)
		if (cTag = em.getAttribute("_xmlTag"))
			return (cTag.toUpperCase() == xmlTag) ? em : null;

	var childAy = em.childNodes, len = childAy.length;
	for (var i=0; i<len; i++) if (childAy[i].nodeType == 1)
		if (cTag = FindingChildLastXmlTag_(childAy[i], xmlTag))
			htmlRet = cTag;

	return htmlRet;
}

//====================================================================================================
//
// 找出 em 之下的 childNodes 中，最後出現 _xmlTag 的 node。
//
function FindChildLastXmlTag_(em, xmlTag)
{
	var em2 = null, cTag;
	var childAy = em.childNodes, len = childAy.length;
	for (var i=0; i<len; i++) if (childAy[i].nodeType == 1)
		if (cTag = FindingChildLastXmlTag_(childAy[i], xmlTag))
			em2 = cTag;
	return em2;
}

//====================================================================================================
//
// 在 em 之前，插入一個和 em 相同結構的 block。
//
function InsertBeforeThisBlock_(em)
{
	em = FindParentBlock_(em); if (!em) return false;

	var parentNode = em.parentNode;
	var cloneNode  = em.cloneNode(true);
	parentNode.insertBefore(cloneNode, em);

	var selectAy = cloneNode.getElementsByTagName("select"), len = selectAy.length;
	for (var i=0; i<len; i++)
		if (selectAy[i].onchange) selectAy[i].onchange();

	return cloneNode;
}

//====================================================================================================
//
// 回報 em 是否有 child？
//
function hasChild_(em)
{
	var childAy = em.childNodes, len = childAy.length;
	for (var i=0; i<len; i++)
		if (childAy[i].nodeType == 1) return true;
	return false;
}

//====================================================================================================
//
// 讀取 node 的 text value
//
function getText_(dom) {
	if (dom.nodeType == 3)
		return dom.data;
	var childAy = dom.childNodes, len = childAy.length;
	for (var i=0; i<len; i++) if (childAy[i].nodeType == 3)
		return childAy[i].data;
	return "";
}

//====================================================================================================
//
// 以下這兩個函式將 idXML 所指定的 xml 資料填入 _xmlTag 的 Form 架構中。
// 主要程式為 XML2Form_。
//

var XML2Form_idXML = null, XML2Form_xmlTag = null, XML2Form_getURL = null;

function RepairForm_(html, dom)
{

	function RepairElement_(html, dom)
	{
		if (!html) return;
		if (html.getAttribute("_xmlType") == "element" || html.getAttribute("_xmlType") == "value") {
			value = html2str_(getText_(dom));
			if (html.getAttribute("type") == "checkbox") {
				chtml = html;
				do {
					if (chtml.tagName && chtml.tagName.toLowerCase() == "input")
					if (chtml.getAttribute("_xmlTag").toLowerCase() == dom.tagName.toLowerCase())
						chtml.checked = (chtml.value == value);
				} while (chtml = chtml.nextSibling);
				if (html.onclick) html.onclick(html);
			}
			else {
				html.value = value;
				if (html.onchange) html.onchange();
			}
			return;
		}
		if (html.getAttribute("_xmlType") == "attr") {
			if ((value=dom.getAttribute(html.getAttribute("_xmlTag").toLowerCase()))!=null) {
				value = html2str_(value);
				if (html.getAttribute("type") == "checkbox") {
					chtml = html;
					do {
						if (chtml.tagName && chtml.tagName.toLowerCase() == "input")
							chtml.checked = (chtml.value == value);
					} while (chtml = chtml.nextSibling);
					if (html.onclick) html.onclick(html);
				}
				else {
					html.value = value;
					if (html.onchange) html.onchange();
				}
			}
			return;
		}
		var childAy = html.childNodes, len = childAy.length;
		for (var i=0; i<len; i++) if (childAy[i].nodeType == 1)
			RepairElement_(childAy[i], dom);
	}

	function RepairAttr_(html, dom)
	{
		var cTag;
		var childAy = html.childNodes, len = childAy.length;
		if (!childAy) return null;

		for (var i=0; i<len; i++) if (childAy[i].nodeType == 1)
			if (cTag = childAy[i].getAttribute("_xmlTag")) {
				if (childAy[i].getAttribute("_xmlType") == "attr") {
					if ((value=dom.getAttribute(cTag.toLowerCase()))!=null) {
						value = html2str_(value);
						if (childAy[i].getAttribute("type") == "checkbox") {
							chtml = childAy[i];
							do {
								if (chtml.tagName && chtml.tagName.toLowerCase() == "input")
									chtml.checked = (chtml.value == value);
							} while (chtml = chtml.nextSibling);
							if (childAy[i].onclick) childAy[i].onclick(childAy[i]);
						}
						else {
							childAy[i].value = value;
							if (childAy[i].onchange) childAy[i].onchange();
						}
					}
				}
				else if (childAy[i].getAttribute("_xmlType") == "value") {
					value = html2str_(getText_(dom));
					if (childAy[i].getAttribute("type") == "checkbox") {
						chtml = childAy[i];
						do {
							if (chtml.tagName && chtml.tagName.toLowerCase() == "input")
								chtml.checked = (chtml.value == value);
						} while (chtml = chtml.nextSibling);
						if (childAy[i].onclick) childAy[i].onclick(childAy[i]);
					}
					else {
						childAy[i].value = value;
						if (childAy[i].onchange) childAy[i].onchange();
					}
				}
			}
			else
				RepairAttr_(childAy[i], dom);
	}

	function RepairChild_(html, dom)
	{
		var cTag;
		if (hasChild_(dom)) { // 如果 dom 有 child
			html = FindChildLastXmlTag_(html, dom.tagName);
			if (html && html.getAttribute("_xmlType") == "block")
				RepairForm_(html, dom);
		}
		else { // 如果 dom 沒有 child
			if (html.getAttribute("_xmlType") != "block")
				cTag = FindChildXmlTag_(html, dom.tagName);
			else if (cTag = html.getAttribute("_xmlTag"))
				if (cTag.toLowerCase() != dom.tagName.toLowerCase())
					cTag = FindChildXmlTag_(html, dom.tagName);
				else
					cTag = html;
			else
				cTag = FindingChildXmlTag_(html, dom.tagName);
			RepairElement_(cTag, dom);
		}
	}

	if (!dom) return 0;

	if (html.getAttribute("_xmlTag")) RepairAttr_(html, dom);
	
	var nTagCount, cTag;

	var childAy = dom.childNodes, len = childAy.length;
	for (var i=0; i<len; i++) if (childAy[i].nodeType == 1) {

		nTagCount = CountSameTag_(childAy[i]); // 取有多少個相同的 element
		if (nTagCount > 1) { // 同樣的 element 不只一個
			if (cTag = FindChildLastXmlTag_(html, childAy[i].tagName))
				if (cTag.getAttribute("_xmlType") != "block")
					if (cTag = FindParentBlock_(cTag))
						if (cTag.getAttribute("_xmlTag")) cTag = null;
			if (cTag) {
				if (CountSameBlock_(cTag) < nTagCount)
					if (cTag.getAttribute("type") != "checkbox")
						cTag = InsertBeforeThisBlock_(cTag);
				if (cTag.getAttribute("_xmlTag"))
					RepairForm_(cTag, childAy[i]);
				else
					RepairChild_(cTag, childAy[i]);
			}
		}
		else // 同樣的 element 只有一個
			RepairChild_(html, childAy[i]);
	}
}

function doXML2Form_()
{
	var idXML = XML2Form_idXML, xmlTag = XML2Form_xmlTag;

	var dom  = FirstChild_(document.getElementById(idXML));
	var html = FindXmlTag_(document, xmlTag);
	RepairForm_(html, dom);
}

function XML2Form_(idXML, xmlTag)
{
	XML2Form_idXML = idXML; XML2Form_xmlTag = xmlTag;
	setTimeout("doXML2Form_()", 10); // 這一行 code 怪怪的吧！嘿~嘿~又是一個 IE 5.5 的 Bug，如果沒這樣搞，select 就不會正常塞值進去。
}

function doXmlID2Form_()
{
	var XmlID = XML2Form_idXML, xmlTag = XML2Form_xmlTag;

	http_request = false;
	if (window.XMLHttpRequest) { // Mozilla, Safari,...
		http_request = new XMLHttpRequest();
		if (http_request.overrideMimeType)
			http_request.overrideMimeType('text/xml');
	} else if (window.ActiveXObject) { // IE
		try {
			http_request = new ActiveXObject("Msxml2.XMLHTTP");
		} catch (e) {
			try {
				http_request = new ActiveXObject("Microsoft.XMLHTTP");
			} catch (e) {}
		}
	}
	if (!http_request) {
		alert('Giving up :( Cannot create an XMLHTTP instance');
		return false;
	}

	http_request.open('GET', XML2Form_getURL+'?xmlid='+XmlID, false);
	http_request.send(null);

	var dom  = FirstChild_(http_request.responseXML);
	var html = FindXmlTag_(document, xmlTag);
	RepairForm_(html, dom);
}

function XmlID2Form_(XmlID, xmlTag, getURL)
{
	XML2Form_idXML = XmlID; XML2Form_xmlTag = xmlTag; XML2Form_getURL = getURL;
	setTimeout("doXmlID2Form_()", 10); // 這一行 code 怪怪的吧！嘿~嘿~又是一個 IE 5.5 的 Bug，如果沒這樣搞，select 就不會正常塞值進去。
}

//====================================================================================================
//
// 以下這兩個函式將 idXML 所指定的 xml 資料填入 _xmlTag 的 Form 架構中。
// 主要程式為 XML2Form_。
//
function RepairView_(html, dom)
{
	function RepairElement_(html, dom)
	{
		if (!html) return;
		if (html.getAttribute("_xmlType") == "element" || html.getAttribute("_xmlType") == "value") {
			value = html2str_(getText_(dom));
			if (html.getAttribute("type") == "checkbox") {
				chtml = html;
				do {
					if (chtml.tagName && chtml.tagName.toLowerCase() == "input")
					if (chtml.getAttribute("_xmlTag").toLowerCase() == dom.tagName.toLowerCase())
						chtml.checked = (chtml.value == value);
				} while (chtml = chtml.nextSibling);
				if (html.onclick) html.onclick(html);
			}
			else {
				if (emForm = FindParentId_(html, "form"+html.getAttribute("_xmlTag")))
					emForm.innerHTML = value;
			}
			return;
		}
		if (html.getAttribute("_xmlType") == "attr") {
			if ((value=dom.getAttribute(html.getAttribute("_xmlTag").toLowerCase()))!=null) {
				value = html2str_(value);
				if (html.getAttribute("type") == "checkbox") {
					chtml = html;
					do {
						if (chtml.tagName && chtml.tagName.toLowerCase() == "input")
							chtml.checked = (chtml.value == value);
					} while (chtml = chtml.nextSibling);
					if (html.onclick) html.onclick(html);
				}
				else {
					if (emForm = FindParentId_(html, "form"+html.getAttribute("_xmlTag")))
						emForm.innerHTML = value;
				}
			}
			return;
		}
		var childAy = html.childNodes, len = childAy.length;
		for (var i=0; i<len; i++) if (childAy[i].nodeType == 1)
			RepairElement_(childAy[i], dom);
	}

	function RepairAttr_(html, dom)
	{
		var cTag;
		var childAy = html.childNodes, len = childAy.length;
		if (!childAy) return null;

		for (var i=0; i<len; i++) if (childAy[i].nodeType == 1)
			if (cTag = childAy[i].getAttribute("_xmlTag")) {
				if (childAy[i].getAttribute("_xmlType") == "attr") {
					if ((value=dom.getAttribute(cTag.toLowerCase()))!=null) {
						value = html2str_(value);
						if (childAy[i].getAttribute("type") == "checkbox") {
							chtml = childAy[i];
							do {
								if (chtml.tagName && chtml.tagName.toLowerCase() == "input")
									chtml.checked = (chtml.value == value);
							} while (chtml = chtml.nextSibling);
							if (childAy[i].onclick) childAy[i].onclick(childAy[i]);
						}
						else {
							if (emForm = FindParentId_(childAy[i], "form"+childAy[i].getAttribute("_xmlTag")))
								emForm.innerHTML = value;
						}
					}
				}
				else if (childAy[i].getAttribute("_xmlType") == "value") {
					value = html2str_(getText_(dom));
					if (childAy[i].getAttribute("type") == "checkbox") {
						chtml = childAy[i];
						do {
							if (chtml.tagName && chtml.tagName.toLowerCase() == "input")
								chtml.checked = (chtml.value == value);
						} while (chtml = chtml.nextSibling);
						if (childAy[i].onclick) childAy[i].onclick(childAy[i]);
					}
					else {
						if (emForm = FindParentId_(childAy[i], "form"+childAy[i].getAttribute("_xmlTag")))
							emForm.innerHTML = value;
					}
				}
			}
			else
				RepairAttr_(childAy[i], dom);
	}

	function RepairChild_(html, dom)
	{
		var cTag;
		if (hasChild_(dom)) { // 如果 dom 有 child
			html = FindChildLastXmlTag_(html, dom.tagName);
			if (html && html.getAttribute("_xmlType") == "block")
				RepairView_(html, dom);
		}
		else { // 如果 dom 沒有 child
			if (html.getAttribute("_xmlType") != "block")
				cTag = FindChildXmlTag_(html, dom.tagName);
			else if (cTag = html.getAttribute("_xmlTag"))
				if (cTag.toLowerCase() != dom.tagName.toLowerCase())
					cTag = FindChildXmlTag_(html, dom.tagName);
				else
					cTag = html;
			else
				cTag = FindingChildXmlTag_(html, dom.tagName);
			RepairElement_(cTag, dom);
		}
	}

	if (!dom) return 0;

	if (html.getAttribute("_xmlTag")) RepairAttr_(html, dom);
	
	var nTagCount, cTag;

	var childAy = dom.childNodes, len = childAy.length;
	for (var i=0; i<len; i++) if (childAy[i].nodeType == 1) {

		nTagCount = CountSameTag_(childAy[i]); // 取有多少個相同的 element
		if (nTagCount > 1) { // 同樣的 element 不只一個
			if (cTag = FindChildLastXmlTag_(html, childAy[i].tagName))
				if (cTag.getAttribute("_xmlType") != "block")
					if (cTag = FindParentBlock_(cTag))
						if (cTag.getAttribute("_xmlTag")) cTag = null;
			if (cTag) {
				if (CountSameBlock_(cTag) < nTagCount)
					if (cTag.getAttribute("type") != "checkbox")
						cTag = InsertBeforeThisBlock_(cTag);
				if (cTag.getAttribute("_xmlTag"))
					RepairView_(cTag, childAy[i]);
				else
					RepairChild_(cTag, childAy[i]);
			}
		}
		else // 同樣的 element 只有一個
			RepairChild_(html, childAy[i]);
	}
}

function doXML2View_()
{
	var idXML = XML2Form_idXML, xmlTag = XML2Form_xmlTag;

	var dom  = FirstChild_(document.getElementById(idXML));
	var html = FindXmlTag_(document, xmlTag);
	RepairView_(html, dom);
}

function XML2View_(idXML, xmlTag)
{
	XML2Form_idXML = idXML; XML2Form_xmlTag = xmlTag;
	setTimeout("doXML2View_()", 10); // 這一行 code 怪怪的吧！嘿~嘿~又是一個 IE 5.5 的 Bug，如果沒這樣搞，select 就不會正常塞值進去。
}

function doXmlID2View_()
{
	var XmlID = XML2Form_idXML, xmlTag = XML2Form_xmlTag;

	http_request = false;
	if (window.XMLHttpRequest) { // Mozilla, Safari,...
		http_request = new XMLHttpRequest();
		if (http_request.overrideMimeType)
			http_request.overrideMimeType('text/xml');
	} else if (window.ActiveXObject) { // IE
		try {
			http_request = new ActiveXObject("Msxml2.XMLHTTP");
		} catch (e) {
			try {
				http_request = new ActiveXObject("Microsoft.XMLHTTP");
			} catch (e) {}
		}
	}
	if (!http_request) {
		alert('Giving up :( Cannot create an XMLHTTP instance');
		return false;
	}

	http_request.open('GET', XML2Form_getURL+'?xmlid='+XmlID, false);
	http_request.send(null);

	var dom  = FirstChild_(http_request.responseXML);
	var html = FindXmlTag_(document, xmlTag);
	RepairView_(html, dom);
}

function XmlID2View_(XmlID, xmlTag, getURL)
{
	XML2Form_idXML = XmlID; XML2Form_xmlTag = xmlTag; XML2Form_getURL = getURL;
	setTimeout("doXmlID2View_()", 10); // 這一行 code 怪怪的吧！嘿~嘿~又是一個 IE 5.5 的 Bug，如果沒這樣搞，select 就不會正常塞值進去。
}

//====================================================================================================
//
// 精簡 XML
//
function CompactXML_(dom, isCompactXML)
{
	var hasData = 0;
	var childAy = dom.childNodes, len = childAy.length;
	for (var i=0; i<len; i++) if (childAy[i].nodeType == 1)
		if (CompactXML_(childAy[i], isCompactXML))
			hasData = 1;
		else {
			dom.removeChild(childAy[i]);
			i--; len--;
		}
	if (dom.innerHTML) hasData = 1;
	if (isCompactXML < 2)
		if (isIE) { // 哈！又一個 IE 的 Bug，dom.attributes 怪怪的，不是標準的啦！
			if (dom.getAttribute("_idx")    || dom.getAttribute("_idxattr")    ||
				dom.getAttribute("_idxrw")  || dom.getAttribute("_idxattrrw")  ||
				dom.getAttribute("_idxro")  || dom.getAttribute("_idxattrro")  ||
				dom.getAttribute("_idx1")   || dom.getAttribute("_idx1attr")   ||
				dom.getAttribute("_idx1rw") || dom.getAttribute("_idx1attrrw") ||
				dom.getAttribute("_idx1ro") || dom.getAttribute("_idx1attrro")) hasData = 1;
		}
		else {
			if (dom.attributes.length) hasData = 1;
		}
	return hasData;
}

//====================================================================================================
//
// 一些有用的公用程式
//
function SwitchActiveMode_(cHtml, cHide, cShow)
{
	var cHtmlAy = document.getElementsByTagName(cHtml), len = cHtmlAy.length;
	var cTag;

	if (cHide == cShow) {
		for (var i=0; i<len; i++)
			if (cHtmlAy[i].getAttribute("_xmlTag") == cHide || cHtmlAy[i].getAttribute("_xmlType") == cHide) {
				if (cHtmlAy[i].style.display == "none") {
					cHtmlAy[i].style.display = "";
					cTag = FindChildXmlTag_(cHtmlAy[i], "inActive");
					if (cTag && cTag.nodeType == 1) cTag.value = 1;
				}
				else {
					cHtmlAy[i].style.display = "none";
					cTag = FindChildXmlTag_(cHtmlAy[i], "inActive");
					if (cTag && cTag.nodeType == 1) cTag.value = 0;
				}
			}
	}
	else {
		for (var i=0; i<len; i++)
			if (cHtmlAy[i].getAttribute("_xmlTag")==cHide || cHtmlAy[i].getAttribute("_xmlType")==cHide ||
				(cHide=='_ALL_' && (cHtmlAy[i].getAttribute("_xmlTag") || cHtmlAy[i].getAttribute("_xmlType"))) ||
				(cHide.indexOf(cHtmlAy[i].getAttribute("_xmlTag"))>=0 || cHide.indexOf(cHtmlAy[i].getAttribute("_xmlType"))>=0))
			{
				cHtmlAy[i].style.display = "none";
				cTag = FindChildXmlTag_(cHtmlAy[i], "inActive");
				if (cTag && cTag.nodeType == 1) cTag.value = 0;
			}
		for (var i=0; i<len; i++)
			if (cHtmlAy[i].getAttribute("_xmlTag")==cShow || cHtmlAy[i].getAttribute("_xmlType")==cShow ||
				(cShow=='_ALL_' && (cHtmlAy[i].getAttribute("_xmlTag") || cHtmlAy[i].getAttribute("_xmlType"))) ||
				(cShow.indexOf(cHtmlAy[i].getAttribute("_xmlTag"))>=0 || cShow.indexOf(cHtmlAy[i].getAttribute("_xmlType"))>=0))
			{
				cHtmlAy[i].style.display = "";
				cTag = FindChildXmlTag_(cHtmlAy[i], "inActive");
				if (cTag && cTag.nodeType == 1) cTag.value = 1;
			}
	}
}

function PreviewURL_(html, cTag)
{
	var cBlock = FindParentBlock_(html); if (!cBlock) return;
	var cInput = FindChildXmlTag_(cBlock, cTag);
	window.open(cInput.value, "_blank");
}

function PutDateTime_(html, cTag)
{
	var today = new Date();
	var thisYear   = today.getYear()+((isIE) ? 0 : 1900);
	var thisMonth  = today.getMonth()+1; if (thisMonth<10)  thisMonth  = '0'+thisMonth;
	var thisDay    = today.getDate();    if (thisDay<10)    thisDay    = '0'+thisDay;
	var thisHour   = today.getHours();   if (thisHour<10)   thisHour   = '0'+thisHour;
	var thisMinute = today.getMinutes(); if (thisMinute<10) thisMinute = '0'+thisMinute;
	var thisSecond = today.getSeconds(); if (thisSecond<10) thisSecond = '0'+thisSecond;

	var cBlock = FindParentBlock_(html); if (!cBlock) return;
	var cInput = FindChildXmlTag_(cBlock, cTag);
	cInput.value = thisYear+'-'+thisMonth+'-'+thisDay+' '+thisHour+':'+thisMinute+':'+thisSecond;
}

var UploadURL_html = null;
var UploadURL_cTag = null;

function UploadURL_(html, cTag, cUploadPath)
{
	if (!cUploadPath) cUploadPath = "";
	UploadURL_html = html;
	UploadURL_cTag = cTag;
	ShowForm_(640, 240, (wdbPath ? wdbPath+'/' : "wdb/")+"UploadMan.php?UploadPath="+cUploadPath, "_blank")
}

function UploadURL_Ret_(s)
{
	var cBlock = FindParentBlock_(UploadURL_html); if (!cBlock) return;
	var cInput = FindChildXmlTag_(cBlock, UploadURL_cTag);
	cInput.value = s;
	if (cInput.onchange) cInput.onchange();
}

var tmpSetImgSrc = new Array(), tmpSetImgSrcIdx = 0;

function SetImgSrc_(em, url) {

	if (!url) return;

	var cBlock = FindParentBlock_(em); if (!cBlock) return;
	var cImg = FindChildName_(cBlock, 'Img'+em.getAttribute("_xmlTag")); if (!cImg) return;

	tmpSetImgSrc[tmpSetImgSrcIdx] = cImg; tmpSetImgSrcIdx++;
	cImg.style.display = 'none';
	cImg.style.width   = "";
	cImg.style.height  = "";

	if (url.indexOf("/") == -1)
		cImg.src = wdbROOT_URL+"/uploads"+wdbUploadPath+"/"+url;
	else if (url.indexOf("http") == -1)
		cImg.src = wdbROOT_URL+((url.indexOf("/") == 0) ? "" : "/")+url;
	else if (document.location.href.indexOf('https:') == 0)
		cImg.src = url.replace('http:', 'https:');
	else
		cImg.src = url;

	cImg.srcURL = cImg.src;
	if (cImg.srcURL.indexOf('.swf')>0) {
		cImg.src = '/xxliving/wdb2/FlashView.jpg';
		cImg.srcURL = cImg.srcURL.replace('https://', 'http://');
	}

	setTimeout('SetImgSrcShow_()', 500);
}

function SetImgSrcShow_() {

	tmpSetImgSrcIdx--;
	var cImg = tmpSetImgSrc[tmpSetImgSrcIdx];

	cImg.srcWidth = cImg.width;
	if (cImg.width > 400) {
		cImg.title = '點擊圖片檢視原始大小 ('+cImg.width+','+cImg.height+')';
		cImg.style.width = 400;
	}
	else if (cImg.srcURL.indexOf('.swf')>0) {
		cImg.title = '點擊圖片檢視 Flash';
	}
	else {
		cImg.title = '這是原始大小 ('+cImg.width+','+cImg.height+')';
	}
	cImg.style.display = '';
}

function SetImgSrc_onClick_(e) {
	if (e.srcURL.indexOf('.swf')>0) {
		p = e.srcURL.indexOf('#'); url = e.srcURL.substr(0, p); param = e.srcURL.substr(p+1);
		param = strReplace_(param, '%22', '"');
		param = strReplace_(param, '%20', ' ');
		win = window.open('', '_blank');
		win.document.write('<html><body><embed src="'+url+'" '+param+' type="application/x-shockwave-flash" pluginspage="http://www.macromedia.com/go/getflashplayer" /></body></html>');
		win.document.close();
	}
	else if (e.srcWidth > e.width)
		window.open(e.src, '_blank');
}

function SetImgId_(em, url) {
	if (!url)
		return;
	var cBlock = FindParentBlock_(em); if (!cBlock) return;
	var cSpan = document.getElementById('Span'+em.getAttribute("_xmlTag"));
	if (url.indexOf(".swf") == -1)
		if (url.indexOf("/") == -1)
			cSpan.src = "<img src='"+wdbROOT_URL+wdbUploadPath+"/"+url+"' border=0>";
		else
			cSpan.innerHTML = "<img src='"+url+"' border=0>";
	else
		if (url.indexOf("/") == -1)
			cSpan.src = "<embed src='"+wdbROOT_URL+wdbUploadPath+"/"+url+"' quality='high' pluginspage='http://www.macromedia.com/go/getflashplayer' type='application/x-shockwave-flash' width=100%></embed>";
		else
			cSpan.innerHTML = "<embed src='"+url+"' quality='high' pluginspage='http://www.macromedia.com/go/getflashplayer' type='application/x-shockwave-flash' width=100%></embed>";
}

function SetParentImgSrc_(em, url) {
	if (!url)
		return;
	var cBlock = FindParentBlock_(em); if (!cBlock) return;
	cBlock = FindParentBlock_(cBlock.parentNode); if (!cBlock) return;
	var cImg = FindChildName_(cBlock, 'Img'+em.getAttribute("_xmlTag"));
	if (url.indexOf("/") == -1)
		cImg.src = wdbROOT_URL+wdbUploadPath+"/"+url;
	else
		cImg.src = url;
}

function ShowForm_(w, h, url, name)
{
	var WinW = w, WinH = h;
	var ScrW = window.screen.availWidth;
	var ScrH = window.screen.availHeight;
	var x = (ScrW - WinW) / 2;
	var y = (ScrH - WinH) / 2;
	var w = window.open(url, name, "scrollbars=yes,left="+x+",top="+y+",width="+WinW+",height="+WinH);
	w.focus();
}

var cBlock = null, cBG = null;

function Confirm_(html)
{
	cBlock = FindParentBlock_(html); if (!cBlock) return; cBG = null;
	cBG = cBlock.style.backgroundColor;
	cBlock.style.backgroundColor = "#ff4040";
}

function DelXmlID_(cXmlID)
{
	if (confirm("確定要刪除？"))
		document.location.href = "?op=del&delxmlid="+ cXmlID;
	if (cBlock)
		cBlock.style.backgroundColor = cBG;
	cBlock = null; cBG = null;
}

function CpXmlID_(cXmlID)
{
	if (confirm("確定要複製？"))
		document.location.href = "?op=cp&cpxmlid="+ cXmlID;
	if (cBlock)
		cBlock.style.backgroundColor = cBG;
	cBlock = null; cBG = null;
}

function UptXmlID_(cXmlID, cFunc)
{
	if (confirm("確定要更新？"))
	if (cFunc)
		cFunc(cXmlID);
	else
		document.location.href = "?op=upt&uptxmlid="+ cXmlID;
	if (cBlock)
		cBlock.style.backgroundColor = cBG;
	cBlock = null; cBG = null;
}

function Submit_(xmlTag, saveFile)
{
	if (!confirm("確定要存檔？"))
		return;
	document.getElementById("idFormSend").action = (saveFile) ? saveFile : (wdbPath ? wdbPath+'/' : "wdb/")+"wdbSave.php";
	document.getElementById("idFormSend").target = "";
	document.getElementById("idTextarea").value = escape(Form2XML_(xmlTag));
	document.getElementById("idFormSend").submit();
}

function SubmitReplace_(xmlTag, saveFile)
{
	if (!confirm("確定要存檔？"))
		return;
	document.getElementById("idFormSend").action = (saveFile) ? saveFile : (wdbPath ? wdbPath+'/' : "wdb/")+"wdbReplace.php";
	document.getElementById("idFormSend").target = "";
	document.getElementById("idTextarea").value = escape(Form2XML_(xmlTag));
	document.getElementById("idFormSend").submit();
}

function ViewXML_(xmlTag, viewFile)
{
	document.getElementById("idFormSend").action = (viewFile) ? viewFile : (wdbPath ? wdbPath+'/' : "wdb/")+"wdbView.php";
	document.getElementById("idFormSend").target = "_blank";
	document.getElementById("idTextarea").value = escape(Form2XML_(xmlTag));
	document.getElementById("idFormSend").submit();
}

var HtmlAreaInput = '';
var HtmlAreaSpan  = '';

function HtmlEdit_(em) {
	var cBlock = FindParentBlock_(em); if (!cBlock) return;
	HtmlAreaInput = FirstChild_(cBlock);
	HtmlAreaSpan  = FindChildName_(cBlock, 'Span'+HtmlAreaInput.getAttribute('_xmlTag'));
	ShowForm_(780, 480, (wdbPath ? wdbPath+'/' : 'wdb/')+'TinyMCE.php', 'winHtmlEdit');
}

function SyncHtmlEditSpan_(em) {
	var cBlock = FindParentBlock_(em); if (!cBlock) return;
	HtmlAreaInput = FirstChild_(cBlock);
	HtmlAreaSpan  = FindChildName_(cBlock, 'Span'+em.getAttribute('_xmlTag'));
	HtmlAreaSpan.innerHTML = HtmlAreaInput.value;
}

var HtmlAreaTextArea = '';

function HtmlTextAreaEdit_(em) {
	var cBlock = FindParentBlock_(em); if (!cBlock) return;
	HtmlAreaTextArea = FirstChild_(cBlock);
	ShowForm_(780, 480, (wdbPath ? wdbPath+'/' : 'wdb/')+'TinyMCE.php?isTextArea=1', 'winHtmlEdit');
}

function HtmlTextAreaView_(em) {
	var cBlock = FindParentBlock_(em); if (!cBlock) return;
	cTextArea = FirstChild_(cBlock);
	cSpan = FindChildName_(cBlock, 'HtmlTextAreaView');
	var s = cTextArea.value;
	if (s.indexOf("<br>")==-1 && s.indexOf("<br/>")==-1 && s.indexOf("<br />")==-1)
		while (s.indexOf('\n') >= 0)
			s = s.replace('\n', '<br>');
	cSpan.innerHTML = s;
	cSpan.style.display = '';
}

var popUpColor_html = '';

function popUpColor_(em) {
	popUpColor_html = em;
	window.open((wdbPath ? wdbPath+'/' : 'wdb/')+'select_color.php', 'winSelectColor', 'width=238,height=182');
}

function setColor_(c) {
	popUpColor_html.value = '#'+c;
	if (popUpColor_html.onchange)
		popUpColor_html.onchange();
}

function setAllChkbox_(is1, InputName) {
	if (!InputName) InputName = 'TransXmlID[]';
	var InputAy = document.getElementsByTagName("input");
	for (var i=0; i < InputAy.length; i++)
		if (InputAy[i].type=="checkbox" && InputAy[i].name==InputName)
			InputAy[i].checked = is1;
}

function xSelect2Input_(em, name) {
	var cBlock = FindParentBlock_(em); if (!cBlock) return;
	var tagName = em.tagName.toLowerCase();
	if (tagName != "select") {
		var cSelect = FindChildTag_(cBlock, "select");
		em.style.display = "none";
		cSelect.style.display = "";
		cSelect.value = em.value;
	}
	else if (tagName == "select") {
		var cInput = FindChildTag_(cBlock, "input");
		cInput.value = em.value;
		em.style.display = "none";
		cInput.style.display = "";
	}
}

function ShowHideBlock_(e) {
	var id = e.getAttribute('id');
	id = 'blk'+id.substr(2);
	document.getElementById(id).style.display = (e.checked) ? '' : 'none';
}

function ShowHideBlock_Set_(blk, isShow) {
	var id = document.getElementById('is'+blk);
	id.checked = isShow;
	if (id.onclick) id.onclick(id);
}

//==================================================
// 只要在網頁裡頭，執行 InputEdit_Init_()
// 就可以將所有的 <input type=text ...> 加上 onDblClick='HtmlTextAreaEdit_(this)'
//
function InputEdit_Event_(e) {
	var em = (isIE) ? event.srcElement : e.target;
	HtmlTextAreaEdit_(em);
}

function InputEdit_Init_() {
	var inputAy = document.getElementsByTagName('input');
	for (var i=0; i<inputAy.length; i++)
	if (inputAy[i].type == 'text' && !inputAy[i].ondblclick) {
		inputAy[i].ondblclick = InputEdit_Event_;
		inputAy[i].title = '雙擊滑鼠 HTML 編輯';
	}
}

//==================================================
// 將所有 Form 的元件設為唯讀
//
function Form_ReadOnly_() {
	var emAy = document.getElementsByTagName('input');
	for (var i=0; i<emAy.length; i++)
	if (emAy[i].getAttribute('isRO') != 'off') {
		emAy[i].readOnly = true;
		emAy[i].style.backgroundColor = '#eeeeee';
	}
	emAy = document.getElementsByTagName('textarea');
	for (var i=0; i<emAy.length; i++)
	if (emAy[i].getAttribute('isRO') != 'off') {
		emAy[i].readOnly = true;
		emAy[i].style.backgroundColor = '#eeeeee';
	}
	emAy = document.getElementsByTagName('select');
	for (var i=0; i<emAy.length; i++)
	if (emAy[i].getAttribute('isRO') != 'off') {
		emAy[i].readOnly = true;
		emAy[i].style.backgroundColor = '#eeeeee';
	}
}

//==================================================
// show 出 iDate
//
var tmp_iDatePopup_idCtrl = "";

function iDatePopup_(idCtrl, x, y) {
	tmp_iDatePopup_idCtrl = idCtrl;
	iDate.alignCtrl_(idCtrl, 'wdbDate', 0, 20);
	iDate.onClickDay = iDatePopup_ClickDay_;
	iDate.showMiniMonth_(idCtrl.value);
}

function iDatePopup_ClickDay_(s) {
	tmp_iDatePopup_idCtrl.value = s;
	document.getElementById('wdbDate').style.display = 'none';
}