// ***** Create xmlHttp XML Object *****
var xmlHttp
try {
	// Firefox, Opera 8.0+, Safari
	xmlHttp=new XMLHttpRequest();
} catch (e) {
	// Internet Explorer
	try {
		xmlHttp=new ActiveXObject("Msxml2.XMLHTTP");
	} catch (e) {
		try {
			xmlHttp=new ActiveXObject("Microsoft.XMLHTTP");
		} catch (e) {
			alert("Your browser does not support AJAX!");
		}
	}
}

function ReadyStateTest() {
	if (xmlHttp.readyState==4) {
		return xmlHttp.responseText
	} else {
		return ReadyStateTest()
	}
}

function AJAXStart(URL) {
	with (xmlHttp) {
		open("GET",URL,false)
		send(null)
	}
	return ReadyStateTest()
}

function AJAXGet(Cmd) {
	TheData=[]
	URL="../BehindWork/GetData.asp?Cmd="+Cmd
	TheDataStr=AJAXStart(URL)
	if (TheDataStr.substring(0,6)=="Error:") {
		alert(TheDataStr.substring(6))
	} else if (TheDataStr.length>0) {
		Rows=TheDataStr.split("\n\n")
		for (RowI=0;RowI<Rows.length;RowI++) {
			TheData[RowI]=[]
			Cols=Rows[RowI].split("\n")
			for (ColI=0;ColI<Cols.length;ColI++) {
				NameVal=Cols[ColI]
				EqI=NameVal.indexOf("=")
				TheName=NameVal.substring(0,EqI)
				TheVal=NameVal.substring(EqI+1)
				TheData[RowI][TheName]=TheVal
			}
		}
	}
	return TheData
}

function AJAXFormPost(URL) {
	Params=[]
	Params[0]="Table="+FormView.DbTable
	Ps=GetObj("AdminFormView").childNodes
	for (I=0;I<Ps.length-1;I++) {
		with (Ps[I]) {
			Obj=childNodes[1]
			Val=Obj.value
			switch (Type) {
				case "CheckBox":
					Val=Number(Obj.checked)
					break
				case "RichBox":
					Obj=childNodes[2]
					Val=eval(Obj.id).document.body.innerHTML
					break
			}
			Val=String(Val)
			Val=Val.replace(/\'/g,"\'\'")
			Val=Val.replace(/\n/g,"")
			Val=Val.replace(/&amp;/g,"&")
			Val=Val.replace(/\+/g,"&#43;")
			Val=escape(Val)
			Params[I+1]=DataField+"="+Val
		}
	}
	Params=Params.join("&")
	with (xmlHttp) {
		open("POST",URL,false)
		setRequestHeader("Content-type","application/x-www-form-urlencoded")
		send(Params)
		return ReadyStateTest()
	}
}