var WA_Arr_O = ("Microsoft.XMLHTTP","Microsoft.XMLDOM","MSXML2.XMLHTTP").split(",")
var Flag_Object = -1
if (window.XMLHttpRequest)
    Flag_Object = 0
else
{
    for (i=0;i<WA_Arr_O.length;i++)
    {
        try
        {
           a = new ActiveXObject(WA_Arr_O[i]);
           Flag_Object = i
           break
        }
        catch(e){}
    }
}
var WA_aoCalls   = new Array();
function __GetStringURL(strXMLSrc, fnc_Ret )
{
	var FlagDo = true;
    var iCall;
    if (strXMLSrc.indexOf("?")<0){strXMLSrc+="?"}else{strXMLSrc+="&"}
    strXMLSrc+="__asd="+Math.random()

    for (iCall=0; !(WA_aoCalls[iCall] == null || WA_aoCalls[iCall]=="") ;iCall++)
    {}

    var objXMLDoc
    if (window.XMLHttpRequest)
        objXMLDoc = new XMLHttpRequest();
    else
        objXMLDoc = new ActiveXObject(WA_Arr_O[Flag_Object]);
    WA_aoCalls[iCall] = new __CallObject( objXMLDoc ,strXMLSrc, fnc_Ret );
    objXMLDoc.onreadystatechange = Function( "__fnLoadComplete( " + iCall + " );" );

    if (Flag_Object==0)
    {
        objXMLDoc.open("GET", WA_aoCalls[iCall].strURL, true); 
        objXMLDoc.send(null); 
    }
    else if (Flag_Object==1)
    {
        objXMLDoc.async = true;
	    objXMLDoc.load(WA_aoCalls[iCall].strURL);
	}
}
function __CallObject( oXml , strURL, func)
{
    this.oXml = oXml;
    this.strURL = strURL
    this.func = func;
    this.ReturnString = ""
}
		
function __fnLoadComplete( iIndex )
{ 
	var Ret_Text = ""
    if( iIndex == null ) return;
    var oCall = WA_aoCalls[iIndex ];
    try{var iReadyState = oCall.oXml.readyState;}catch(e){return;}

    if(iReadyState!=4) return;
    
    if (Flag_Object==0)
        Ret_Text = oCall.oXml.responseText  
    else 
        Ret_Text = oCall.oXml.documentElement.childNodes.item(0).text
	WA_aoCalls[ iIndex ] = null	
	try{eval(oCall.func + "('"+Ret_Text+"')")}catch(e){
	//document.write(oCall.strURL )
     //alert(Ret_Text)
	 
	}

}