miércoles, 6 de junio de 2018

Código Recursos Indaga.net, más buscadores

Anotaciones privadas...
Valencia. 06/06/2018, G.B.
Ahora Indaga.net y todos los subdominios están en recursos.indaga.net. He puesto como gadget en Blogger el buscador (+ Buscadores). Iré añadiendo más (recordar cambiarlo en el resto de webs...).

Comentar que primero creé el subdominio recursos.puntocomunica.com, pero al haber dado de alta puntocomunica.com en CloudFlare (con el usuario gbeltranp@puntocomunica.com y la contraseña ****nombre), los subdominios de puntocomunica ya no funcionan (cambio a DNS personalizadas). Por eso he creado el subdominio recursos.indaga.net. 

La web www.indaga.net, los subdominios foros.indaga.net, directorio.indaga.net y www.indaga.net/blog apuntan todos al espacio de mi hiosting 1and1 recursosindaga. Mantengo el buscador en
www.puntocomunica.com/recursos/txt en el espacio web recursos/txt.

Este es el código del nuevo buscador (elimino tema acentos):
<small> Despliega este menú para elegir el buscador:</small>
<script type="text/javascript">
<!--
    function buscar () {
        var f = document.forms['formBuscador'];
        var palabra1 = f.Palabra.value;
        var buscador1 = f.Buscador.options[f.Buscador.selectedIndex].value;
        var cadena;   
        var st = document.formBuscador.Palabra.value;
        patron =/[`"'@/\|<>!?/]/; // Añade todos los caracteres no aceptados
        if ( patron.test(st) ) {
            alert("Lo siento, no se aceptan esos caracteres.");
            formBuscador.Palabra.value="";
            formBuscador.Palabra.focus();
        } else {
            if (palabra1 == "") {
               // alert ("No has indicado lo quieres buscar.");
                   formBuscador.Palabra.focus();
           formBuscador.Palabra.value="";
            } else {
                if (buscador1 == "1") {
                    alert ("Por favor, indica un buscador.");
            formBuscador.Palabra.focus();
                    formBuscador.Palabra.value="";
                                    } else {
                    if (palabra1.length < 3) {
                        alert ("Por favor, introduce al menos tres caracteres.");
                        formBuscador.Palabra.focus();
            formBuscador.Palabra.value="";
                    } else {
                        cadena = buscador1 + palabra1;
                        IrA(cadena);
                    }
                }
            }
        }
    }
   
    function IrA (cadena) {
        ventana=window.open(cadena);
    }
</script>

<form name="formBuscador" method="GET" action="javascript:buscar(); target="_top"">
    <select class="frm" size="1" name="Buscador" onchange="document.formBuscador.Palabra.focus();">
   
    <!-- <option value="http://directorio.indaga.net/search.php?what=">&nbsp;Directorio INDAGA</option> -->
    <option value="https://duckduckgo.com/?q=" />&nbsp;DuckDuckGo
    <option value="http://www.noticiascomunitat.tk/search/?q=" />&nbsp;NCV
    <option value="https://www.puntocomunica.com/?s=" /> &nbsp;Puntocomunica 2.0
    <option value="http://www.comerciosvalencia.com/search/label/" /> &nbsp;Comercios Valencia
    <option value="http://archive.org/search.php?query=" />&nbsp;Archive.org
    <option value="http://www.bing.com/search?q=" />&nbsp;Bing
    <option value="https://www.google.es/#q=" />&nbsp;Google España
    <option value="http://es.search.yahoo.com/search?p=" />&nbsp;Yahoo! Espa&ntilde;a
    <option value="http://es.answers.yahoo.com/search/search_result?p=" />&nbsp;Yahoo! Respuestas
    <option value="https://twitter.com/search?q=" />&nbsp;Buscar en Twitter
    <option value="https://www.facebook.com/search/top/?q=" />&nbsp;Buscar en Facebook
<option value="https://www.deepl.com/translator#es/en/" />&nbsp;Traducir al inglés con Deepl
    <!-- <option value="http://www.googlemusicsearch.com/search?q=">&nbsp;Escuchar canciones (Googlemusic)</option> -->
    <option value="http://yourlisten.com/search/" />&nbsp;Buscar audio en YourListen
    <option value="https://pixabay.com/es/photos/?q=" />&nbsp;Imágenes en Pixabay
    <option value="https://www.flickr.com/search/?q=" />&nbsp;Imágenes en Flickr
    <option value="http://www.ted.com/search?q=" />&nbsp;Charlas y vídeos en Ted.com
    <option value="https://www.youtube.com/results?search_query=" />&nbsp;Vídeos en Youtube
    <option value="http://www.dailymotion.com/es/relevance/universal/search/" />&nbsp;Películas en Dailymotion
    <option value="http://lema.rae.es/drae/?val=" />&nbsp;RAE (diccionario)
    <!-- <option value="http://www.webtaller.com/?s=">&nbsp;Webtaller</option> -->
    <option value="http://es.wikipedia.org/w/index.php?title=Especial%3ABuscar&amp;redirs=0&amp;search=" />&nbsp;Wikipedia
    <option value="http://www.wordreference.com/es/en/translation.asp?spen=" />&nbsp;Wordreference (español - inglés)
    <option value="http://www.wordreference.com/es/translation.asp?tranword=" />&nbsp;Wordreference (inglés - español)
    <option value="https://www.gutenberg.org/ebooks/search/?query=" target="_top" />&nbsp;ebooks sin copyright (Proyecto Gutenberg)
    <option value="http://www.etnassoft.com/biblioteca/?search_term=" />&nbsp;ebooks en OpenLibra (etnasoft)
    <option value="http://espanol.free-ebooks.net/search/" />&nbsp;ebooks en Free ebooks.net
    <option value="https://www.epublibre.org/catalogo/index/0/nuevo/todos/sin/todos/" />&nbsp;ebooks en epubLibre
   
    </select>
    <input type="text" style="width:250px;height:15px" name="Palabra" /><br />
    <input type="submit" class="btn" name="submit" value="Buscar" onclick="buscar();"/>
    <input type="reset" class="btn" value="Restablecer" name="delete" onclick="document.formBuscador.Palabra.focus();" />
    </form>
<small> Fuente: Recursos INDAGA.net</small>