summaryrefslogtreecommitdiffstats
path: root/admin/ogAdmSources/ogAdmWebCon/includes/HTMLCTESELECT.php
diff options
context:
space:
mode:
Diffstat (limited to 'admin/ogAdmSources/ogAdmWebCon/includes/HTMLCTESELECT.php')
-rw-r--r--admin/ogAdmSources/ogAdmWebCon/includes/HTMLCTESELECT.php31
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