// start info if(typeof jsReport != 'undefined'){ jsVersion = new Array( /*Name =*/ 'URL Functions', /*Version =*/ '1.22', /*Date =*/ 20020218, /*Author =*/ 'Maurice van Creij', /*ProjectCode =*/ 'l1_urlfuncs', /*Summary =*/ 'Pass variables to a document as arguments in the URL, and manipulate URL\'s for storing and passing on.', /*Dependencies =*/ new Array('urlfuncs.js'), /*Browsers =*/ new Array('NS','MO','IE','OP'), /*Changes =*/ new Array( '1.22: added "URLdomain()" to retrieve the domain from an URL', '1.21: added "Pathstrip" to remove folder-names from local paths ("file://...")', '1.2: added "HTMLencode" to complement "URLencode"', '1.11: fixed exceedingly stupid ie4 "var" bug', '1.1: added support for getting arguments from other frames\' URLs', '1.0: A modular version was compiled from code-scraps' ), /*Usage =*/ new Array( 'URLparam(\'id\',\'defaultvalue\')', 'URLframeparam(document,\'id\',\'defaultvalue\')', 'URLstrip(document.location.href)', 'URLencode(URLstrip(document.location.href))', 'HTMLencode(\'\')' ) ) }else{ // end info function URLparam(paramName,defaulValue) { //-- get a given parameter from the URL var idx = document.URL.indexOf('?'); var params = new Array(); if (idx != -1) { var pairs = document.URL.substring(idx+1, document.URL.length).split('&'); for (var i=0; i': outStr += "%3E"; break; case '?': outStr += "%3F"; break; case '[': outStr += "%5B"; break; case '\\': outStr += "%5C"; break; case ']': outStr += "%5D"; break; case ' ': outStr += "+"; break; default: outStr += aChar; } } return outStr.substring(1, outStr.length); } function HTMLencode(inStr) { //-- translate all "reserved" characters of a string to HTML equivalents outStr=' '; //not '' for a NS bug! for (i=0; i < inStr.length; i++) { aChar=inStr.substring (i, i+1); switch(aChar){ case '<': outStr += "<"; break; case '>': outStr += ">"; break; case ' ': outStr += " "; break; case ' ': outStr += " "; break; default: outStr += aChar; } } return outStr.substring(1, outStr.length); } function URLstrip(lokatie){ //-- determine the absolute path of a location (strip the domain) if(lokatie==-1){ //-- take the current doc's URL if no location is given lokatie = document.location.href; } var slashcount = 0; var urllength = 0; for (var i=0; i-1){ lokatie = lokatie.substring(0,ripPoint) } return lokatie } function URLdomain(lokatie){ arrDomain = lokatie.split('/') return arrDomain[2] } function Pathstrip(lokatie){ //-- determine the file-name of a complete path (strip the direcories) // take the current doc's Path if no location is given if(lokatie==-1){ lokatie = document.location.href; } // find all the slashes var slashcount = 0; var urllength = 0; var slashMax = 0; var firstFound = false; i=lokatie.length; while(urllength==0&&i>0){ lettercheck = lokatie.substring(i-1,i) if (lettercheck == '/'){ urllength=i } i=i-1 } lokatie = lokatie.substring(urllength,(lokatie.length)) return lokatie } }