Maypole :: Modelo: CDBI :: Asform Maypole :: Modelo: CDBI :: ASFORM Módulo puede producir elementos de formulario HTML para columnas de base de datos.
Descargar ahora

Maypole :: Modelo: CDBI :: Asform Clasificación y resumen

Maypole :: Modelo: CDBI :: Asform Etiquetas

Html formas Formas html elementos elementos de formulario Columnas de base de datos

Maypole :: Modelo: CDBI :: Asform Descripción

Maypole :: Modelo: CDBI :: ASFORM Módulo puede producir elementos de formulario HTML para columnas de base de datos. Maypole :: Modelo: CDBI :: ASFORM Módulo puede producir elementos de formulario HTML para columnas de base de datos.Synopsis Paquete Música :: CD; Use Maypole :: Modelo :: CDBI :: Asform; Usa la base de la base :: DBI '; usar CGI; ... sub create_or_edit {My $ Self = Shift; mi% cgi_field = $ self-> to_cgi; Devolver Start_Form, (map {"$ _ _:". $ cgi_field {$ _} -> As_html. ""} $ Class-> Columnas), Fin_Form; }. . . # En algún otro lugar en una aplicación Maypole sobre la cerveza ... $ Cerveza-> TO_FIELD ('BREWERY', 'Textfield', {Name => '' brewery_id ', valor => $ cerveza-> Cervecería, # sin necesidad de establecer valor desde $ la cerveza es objeto}); # Calificar una cerveza $ cerveza-> to_field (calificación => Seleccionar => {iTems => ,}); # Seleccione una cervecería para visitar en el Reino Unido Brewery-> to_field (brewery_id => {items => ,}); # Hacer un selecto para un campo booleano $ pub-> to_field ('abrir', {elementos => }); $ cerveza-> to_field ('brewery', {seleccionado => $ cerveza-> cervecería, # de nuevo no es necesario ya que la persona que llama es obj.}); $ cerveza-> to_field ('cervecería', 'link_hidden', {r => $ r, uri => 'www.maypole.perl.org/Brewery/View/'.$Beer-8Brewery}); # Un enlace HTML que también es una entrada oculta al objeto. Se requiere R a # Hacer el URI a menos que pase un URI ##################################### ################ # plantillas Uso ... : . . . Brewery: . . . ############################################## ####### # Uso avanzado # has_many Seleccionar trabajo de paquete; __Package __-> has_a ('job_employer' => 'empleador'); __Paquetar __-> has_a ('contacto' => 'contacto') Contacto del paquete; __Package __-> has_a ('cont_employer' => 'empleador'); __Paquetar __-> has_many ('trabajos' => 'trabajo', {Únete => {trabajando_employer => 'cont_employer'}, restricción => {'FINSHED' => 0}, order_by => "creado Asc",}); empleador del paquete; __Paquetar __-> has_many ('trabajos' => 'trabajo',); __Paquete __-> has_many ('contactos' => 'contacto', order_by => 'nombre DESC',); # Elija algunos trabajos para agregar a un contacto (tiene varios atributos). My $ job_sel = contactar-> to_field ('trabajos'); # Usa restricción y pedido por # Elija un trabajo de $ contacto-> trabajos mi $ job_sel = $ Contact-> to_field ('trabajos'); 1; Requisitos: · Perl

Maypole :: Modelo: CDBI :: Asform Software relacionado