//OCULTAR EL CODIGO FUENTE DE UNA PAGINA CON CONTROL DE ACCESO
//Autor: Iván Nieto Pérez
//Este script y otros muchos pueden
//descarse on-line de forma gratuita
//en El Código: www.elcodigo.net
var opciones = ""
var metodo = ""
function VerScript(formulario) {
//codigo pagina
var fuente = formulario.texto.value
var titulo = ""
//titulo de la pagina
var inicio = fuente.indexOf("")
var fin = fuente.indexOf("")
if (inicio != -1) {
titulo = fuente.substring(inicio + 7, fin)
}
//control de dominio
var partes = fuente.split("")
fuente = partes[0] + '' + CompruebaDominio( formulario.dominio_fuente.value ) + partes[1]
var partes1 = fuente.split("")
var partes2 = partes1[1].split("")
fuente = partes1[0] + '' + '' + partes2[0] + ''
//codifica pagina
var pagina_codificada = codifica( fuente )
//pagina_codificada = fuente
//pagina alternativa
formulario.display.value = '\n' +
'\n' +
'' + titulo + '\n' +
'\n' +
'\n' +
'\n' +
'\n' +
'\n' +
'\n' +
''
document.location = "#verscript"
}
function codifica( datos ) {
return ( escape( datos ) )
}
function CompruebaDominio (dominio_valido) {
var codigo_comprueba_dominio = '\n' +
''
return codigo_comprueba_dominio
}