function getBrowserInfo(){
    var x = navigator;
    var n = "";
    n += "NAV.appName: ".bold() + x.appName + "<br>";
    n += "&nbsp;NAV.userAgent: "+ x.userAgent + "<br>";
    n += "&nbsp;NAV.appVersion: " + x.appVersion + "<br>";
    n += "&nbsp;NAV.MinorVersion=" + x.appMinorVersion+"<br>";
    n += "&nbsp;NAV.appCodeName: " + x.appCodeName+ "<br>";
    n += "&nbsp;NAV.CookieEnabled=" + x.cookieEnabled+"<br>";
    n += "&nbsp;NAV.language: " + x.language + "<br>";
    n += "&nbsp;NAV.platform: ".bold() + x.platform + "<br>";
    n += "CPUClass=" + x.cpuClass+"<br>";
    n += "OnLine=" + x.onLine+"<br>";
    n += "BrowserLanguage=" + x.browserLanguage+"<br>";
    n += "SystemLanguage=" + x.systemLanguage+"<br>";
    n += "UserLanguage=" + x.userLanguage+"<br>";
    if(x.plugin) {
        n += "<br>Plugin:".bold() + x.plugin ;
        for (i=0; i<x.plugin.length;i++) {
            n += '<br>&nbsp; ' + x.plugin[i].name;
        }
     }
    if(x.mimeTypes) {
        n += "<br>NAV.mimeTypes: ".bold() + x.mimeTypes;    
        for (i=0; i<x.mimeTypes.length;i++){
            n += '<br>&nbsp; ' + x.mimeTypes[i]["type"].toString();
        }
    }
    return n;
}

function getDirPath(sURL) {
	var r = unescape(sURL.substring(0,(sURL.lastIndexOf("/")) + 1));
	return r
}

function getURLstring () {
	var r = self.location.href; 
	if (self.document.URL) {
		r = self.document.URL		 
	} 
	if (window.location.href) {
		r = window.location.href;		 
	} 
	return r.toString();
}

function getURLvariables (q, vS) {
	var r = "";
	var s = q.split("&");
	for ( var i = 0; i < s.length; i++ ){
		if ( s[i].indexOf(vS+ "=") > -1 ){
			var aQ = s[i].split("=");
			r = aQ[1].toString();
			break;
		}
	}
	return r;
}

function testValueExists (t) 
{
    var r = "";
    if (t.length < 1) { r += "\n_length=0"; }
    if (t.indexOf("<%") == 0) { r += "\n_ServerVariableNotReplaced"; }
    if (t == null) { r += "\n_null"; }
    if (t.toLowerCase() == "fail") { r += "\n_fail"; }
    if (t == "undefined") { r += "\n_undefined"; }
    if (typeof t== "undefined") { r += "\n_typeOfUndefined"; }
    if (typeof t== "object") { r += "\n_typeOfObject"; }
    if (typeof t!= "string") { r += "\n_typeOfNotString"; }
    if (String.prototype.isPrototypeOf(t)) { r += "\n_notStringPrototype"; }
    return r; 
}