diff options
Diffstat (limited to 'admin/ogAdmSources/ogAdmWebCon/includes/HTMLCTESELECT.php')
-rw-r--r-- | admin/ogAdmSources/ogAdmWebCon/includes/HTMLCTESELECT.php | 31 |
1 files changed, 31 insertions, 0 deletions
diff --git a/admin/ogAdmSources/ogAdmWebCon/includes/HTMLCTESELECT.php b/admin/ogAdmSources/ogAdmWebCon/includes/HTMLCTESELECT.php new file mode 100644 index 00000000..d2bfb3eb --- /dev/null +++ b/admin/ogAdmSources/ogAdmWebCon/includes/HTMLCTESELECT.php @@ -0,0 +1,31 @@ +<? +// ************************************************************************************************************************************************* +// Aplicación WEB: ogAdmWebCon. +// Autor: José Manuel Alonso (E.T.S.I.I.) Universidad de Sevilla +// Fecha Creación:2003-2004 +// Fecha Última modificación: Febrero-2005 +// Nombre del fichero: HTMLCTESELECT.php +// Descripción : +// Crea la etiqueta html <SELECT> de valores constantes +// Parametros: +// - parametros:Una cadena con la forma valor=literal separada por un caracter INTRO +// - nombreid: Nombre del desplegable (atributo HTML name) +// - clase: Clase que define su estilo +// - defaultlit: Literal de la primera opción cuyo valor es siempre 0 +// - valorselec: Valor del item que saldrá seleccionado por defecto +// - ancho: Anchura del desplegable +// - eventochg: Nombre de la función que se ejecutará en respuesta al evento onchange +// ************************************************************************************************************************************************* +function HTMLCTESELECT($parametros,$nombreid,$clase,$defaultlit,$valorselec,$ancho,$eventochg=""){ + if (!empty($eventochg)) $eventochg='onchange="'.$eventochg.'(this);"'; + $opciones=split(chr(13),$parametros); + $SelectHtml= '<SELECT '.$eventochg.' class= "'.$clase.'" id='.$nombreid.' name="'.$nombreid.'" style="WIDTH: '.$ancho.'">'; + if (!empty($defaultlit)) $SelectHtml.= '<OPTION value="0">'.$defaultlit.'</OPTION>'; + for($i=0;$i<sizeof($opciones);$i++){ + $item=split("=",$opciones[$i]); + $SelectHtml.= '<OPTION value="'.$item[0].'"'; + if($valorselec==$item[0]) $SelectHtml.=" selected "; + $SelectHtml.= '>'.$item[1].'</OPTION>'; + } + return($SelectHtml); +}
\ No newline at end of file |