function arrastrar2(dir, alto, ancho, veloancho, veloalto, arriba, izquierda) {
if (document.all) {
var winwidth = ancho;
var winheight = alto;
var ventana = window.open("","","left=" + izquierda + ",top=" + arriba + ",width=1,height=1,scrollbars=yes");
for (myheight = 1; myheight < winheight; myheight += veloalto) {
ventana.resizeTo("1", myheight);
}
for (mywidth = 1; mywidth < winwidth; mywidth += veloancho) {
ventana.resizeTo(mywidth, myheight);
}
ventana.location = dir;
}
else
window.location = dir;
}
function abrir(dir, ancho, alto){
var nueva = window.open(dir, "Nueva","width=" + ancho + ", height=" + alto + "scrollbars=yes")
}
function info() {
//alert("I was clicked " + window.event.srcElement.tagName);
if(event.altKey && event.ctrlLeft){
//alert("tenias presionada ALT y CTRL de la izquierda");
var nueva = window.open("","","width=320, height=320, scrollbars=no, status=no");
var txt = "Los Creadores de la Web";
var txtFlash = ""
txt = txt + txtFlash;
txt = txt + ""
nueva.document.write(txt);
}
}
function abreListado(ancho, alto){
var nueva = window.open("actualid/noticias/listado.asp", "Nueva","width=" + ancho + ", height=" + alto + ", scrollbars=yes, status=no, directories=no")
}
function abreBusqueda(arg, ancho, alto){
var winBuscar = window.open("buscador/winresul.asp?txtBuscar="+arg, "","width=" + ancho + ", height=" + alto + ", scrollbars=yes, status=no, directories=no")
}
function abreFicha(id){ //usada en patrimonio.inc para abrir la ficha
var dir = "ficha.asp?id=" + id;
arrastrar2(dir, 600, 560, 10, 10, 0,0);
}
function validarBuscar(cadena, destino, objOrigen){
//caracteres no permitidos: *, ?, ¿, #, $, %, &, /, !, ¡
//longitud minima: 3
//direccion envio: buscador/buscador.asp
if(cadena.length > 2){
var caracteres = new Array("*", "?", "¿", "#", "·", "$", "%", "&", "/", "(", ")", "-", "_")
var enviar = true;
var pagDestino = "buscador.asp?txtBuscar=" + cadena;
for(i=0;i-1)
{
key=0;
}
}
}
if (f5=='u')
{
var newkey=String.fromCharCode(key).toUpperCase();
key=newkey.charCodeAt(0);
}
else if (f5=='l')
{
var newkey=String.fromCharCode(key).toLowerCase();
key=newkey.charCodeAt(0);
}
window.event.keyCode=key;
}
function enterField(f1)
{
if (f1 && f1.style)
{
f1.style.background='#FEFDE0';
}
}
function exitField(f1)
{
if (f1 && f1.style)
{
f1.style.background='#FFFFFF'
}
}
//Usado en OpinaCiber, OpinaOIJ, OpinaMAmbiente.
function enviar(arg){
var nombre = document.frmContacta.txtNombre.value;
var correo = document.frmContacta.txtEmail.value;
var comenta = document.frmContacta.txtSugerencia.value;
var mensaje
var final1 = true;
if (comenta == ""){ //comentario no vacío
final1 = false
mensaje = "El comentario no puede estar vacío"
document.frmContacta.txtSugerencia.focus()
}
if (!IsMail(correo)) {
final1 = false
mensaje = "La dirección de correo está vacía o es incorrecta"
document.frmContacta.txtEmail.focus()
}
if (nombre == ""){ //nombre no vacio
final1 = false
mensaje = "El nombre no puede estar vacío"
document.frmContacta.txtNombre.focus()
}
if(final1 == false)
alert(mensaje)
return final1;
}
//Usado en la lista de Alta de correo ADL.
function enviarADLAlta(arg){
var nombre = document.frmADLLista.txtNombre.value;
var correo = document.frmADLLista.txtEmail.value;
var mensaje
var final1 = true;
if (nombre == ""){ //nombre no vacio
final1 = false
mensaje = "El nombre no puede estar vacío"
document.frmADLLista.txtNombre.focus()
}
if (!IsMail(correo)) {
final1 = false
mensaje = "La dirección de correo está vacía o es incorrecta"
document.frmADLLista.txtEmail.focus()
}
if(final1 == false)
alert(mensaje)
return final1;
}
//Usado en la lista de baja de correo ADL.
function enviarADLBaja(arg){
var clave = document.frmADLLista.txtClave.value;
var correo = document.frmADLLista.txtEmail.value;
var mensaje
var final1 = true;
if (clave == ""){
final1 = false
mensaje = "La clave no puede estar vacía"
document.frmADLLista.txtClave.focus()
}
if (!IsMail(correo)) {
final1 = false
mensaje = "La dirección de correo está vacía o es incorrecta"
document.frmADLLista.txtEmail.focus()
}
if(final1 == false)
alert(mensaje)
return final1;
}
//la funcion \"IsMail(YourMail)\" chequea si \"YourMail\" es una direccion de correo electronico valida
//La variable \"YourMail\" es una cadena de caracteres
function IsMail(YourMail)
{
var Template = /^[a-z][a-z-_0-9.]+@[a-z-_=>0-9.]+\.[a-z]{2,3}$/i //Formato de direccion de correo electronico
if (YourMail == "")
return false;
else
return (Template.test(YourMail)); // ? 1 : 0 //Compara \"YourMail\" con el formato \"Template\" y si coincidevuelve verdadero si no devuelve falso
}
var contador=0;
function cerrarWin(){
contador++;
if(contador == 2) {
window.close();
}
setTimeout("cerrarWin()", 2000);
}
//Limpiar todos los campos de texto del formulario. Usado en OpinaCiber, OpinaOIJ, OpinaMAmbiente
function limpiarForm(){
for(i=0;i