var query = ""; var INPUTFRAME = parent.frames['Suche']; var OUTPUTFRAME = parent.frames['Anzeige']; var INPUT = INPUTFRAME.document; var OUTPUT = OUTPUTFRAME.document; function noumlaut( str ) { var l = 0; // Laenge des Strings var i = 0; // Index im Strings var newstr = ""; // Rueckgabestring var a = ""; // aktuelles Zeichen l = str.length; for (i=0; i -1 ) return( isfound ); } function HTMLHeader() { with ( OUTPUT ) { writeln(""); writeln(""); writeln(""); writeln(""); writeln(""); } } function HTMLOpenBody() { with ( OUTPUT ) { write(""); writeln(""); writeln(""); writeln(""); writeln(""); writeln(""); writeln(""); writeln(""); writeln(""); writeln("
"); writeln(""); writeln(""); writeln(""); writeln(""); writeln(""); writeln(""); writeln(""); writeln(""); writeln(""); writeln(""); writeln(""); writeln("
  RESULTADOS DE LA BUSQUEDA
"); writeln(""); writeln(""); writeln(""); writeln(""); writeln(""); writeln(""); writeln("

"); } } function HTMLCloseBody() { with ( OUTPUT ) { writeln("


"); writeln("
src=pictures/empty.gif
"); writeln("


"); writeln(""); } } function HTMLOpenFont() { with ( OUTPUT ) { with( INPUT.QueryForm ) { write("" ); } } } function HTMLCloseFont() { with ( OUTPUT ) { writeln(""); } } function ListSearch() { var count = 0; query = INPUT.QueryForm.query.value; with ( OUTPUT ) { open(); writeln(""); HTMLHeader(); HTMLOpenBody(); HTMLOpenFont(); writeln("
   Buscar: ", query, "" ); writeln("
    "); for (var i=1 ; i

    "); writeln( Entry[i].Format() ); writeln("

    "); count++; } } writeln("
"); if ( count == 0 ) { writeln("

   No ha sido encontrado ningun dato"); } writeln("

   La busqueda ha terminado
   © Almanzora 1997-2001" ); HTMLCloseFont(); HTMLCloseBody(); writeln(''); close(); } } function Validator() { if ( INPUT.QueryForm.query.value.length < 3 ) { alert( "Hay que insertar mas de 2 digitos" ); INPUT.QueryForm.query.focus(); } else { ListSearch(); } } function QueryEnter() { Validator(); return (false); } function Help( url ) { OUTPUT.location = url; } function Format() { with( this ) // mit dem Element tue das Folgende { // Deklaration des RueckgabeStrings // (enthaelt die HTML-formatierte Ausgabe des Eintrages) var e = ""; // 1. Zeile, der Titel und Hyperlink (bold) e = e + ""; e = e + "" + Title + "\n"; e = e + "\n"; // 2. Zeile, Beschreibung (kursiv), wenn vorhanden if ( Description && ( Description != "-" )) e = e + "
" + Description + "\n"; } return(e); } function Element(Url,Title,Description,Keywords) { // Eigenschaften this.Url = Url; this.Title = Title; this.Description = Description; this.Keywords = Keywords; // Methoden this.Format = Format; } Entry = new Array();