function setCharset ( charset ) {
var metatags = document.getElementsByName('META');
var charsetMetatag = null;
for (i = 0; i < metatags.length; i++ ) {
if ( metatags[i].getAttribute( 'http-equiv' ).toLowerCase() == 'content-type' ) {
charsetMetatag = metatags[i];
break;
}
}
if ( charsetMetatag == null ) {
var metatag = document.createElement('meta');
metatag.setAttribute('http-equiv','Content-Type');
metatag.setAttribute('content','text/html; charset='+charset);
if ( document.getElementsByTagName('head').item(0).hasChildNodes() ) {
document.getElementsByTagName('head').item(0).insertBefore ( metatag,
document.getElementsByTagName('head').item(0).childNodes[0] );
}
else document.getElementsByTagName('head').item(0).appendChild( metatag );
}
else {
charsetMetatag.content = 'text/html; charset='+charset;
}
}