| ePortal :: html :: ´ëÈ »óÀÚ ePortal :: HTML :: Dialog´Â ´ëÈ »óÀÚ¿¡ ´ëÇÑ HTML Äڵ带 »ý¼ºÇÏ´Â À§Á¬ÀÔ´Ï´Ù. |
Áö±Ý ´Ù¿î·Îµå |
ePortal :: html :: ´ëÈ »óÀÚ ¼øÀ§ ¹× ¿ä¾à
- ƯÇã:
- Perl Artistic License
- °Ô½ÃÀÚ À̸§:
- Sergey Rusakov
- °Ô½ÃÀÚ À¥»çÀÌÆ®:
- http://search.cpan.org/~rusakov/ePortal-4.5/lib/ePortal/HTML/Calendar.pm
ePortal :: html :: ´ëÈ »óÀÚ Å±×
ePortal :: html :: ´ëÈ »óÀÚ ¼³¸í
ePortal :: HTML :: Dialog´Â ´ëÈ »óÀÚ¿¡ ´ëÇÑ HTML Äڵ带 »ý¼ºÇÏ´Â À§Á¬ÀÔ´Ï´Ù. ePortal :: html :: ´ëÈ »óÀÚ´Â ´ëÈ »óÀÚ¿¡ ´ëÇÑ HTML Äڵ带 »ý¼ºÇÏ´Â À§Á¬ÀÔ´Ï´Ù .Snopsisthis ¸ðµâÀº ´ëÈ »óÀÚ Ã¢À» ¸¸µå´Â µ¥ »ç¿ëµË´Ï´Ù. ¸ðµç µå·ÎÀ× ¸Þ¼Òµå´Â ½ºÄ®¶ó ¶Ç´Â ¹è¿ ÄÁÅؽºÆ®¿¡¼ HTMLÀ» ¹ÝȯÇϰųª void ÄÁÅؽºÆ®¿¡¼ $ M-> Àμâ·Î Ãâ·ÂÇÕ´Ï´Ù. # ÀϹÝÀûÀÎ ¿¹ : <% $ dlg-> dialog_start (title => 'dialog's title ', width => 400) %> <% $ dlg-> Çʵå ( "field1", ro => 1) %> <% $ dlg-> Çʵå ( "hidden_field", ¼û±è => 1) %> <% $ dlg-> Çʵå ( "Çʵå") %> <% $ dlg-> Çà ( '') %> <% $ dlg-> ¹öÆ° ( delete_button => 1) %> <% $ dlg-> dialog_end %>
<% method onstartrequest> <% perl> $ obj = new ePortal :: thePersistent :: SupportObject; $ dlg = new ePortal :: html :: dialog (obj => $ obj); ³» $ location = ½Ãµµ {$ dlg-> handle_request (); } ePortal :: Exception :: DatanOtValid {My $ E = Shift; $ ¼¼¼Ç {errormessage} = $ e-> ÅؽºÆ®; '' }; if ($ dlg-> isButtonpressed ( 'ok') {...} $ location, <% perl/> <% ¸Þ¼Òµå/> % # === @metags ======== ====================================== <1 ȸ> ³ªÀÇ ($ dlg, $ obj); <% 1 ȸ/> % # === @metags Á¤¸® ===================================================== ============================== <% Á¤¸®> ($ dlg, $ obj) = (); <% Á¤¸®/> ¿ä±¸ »çÇ× : ¡¤ Perl.
ePortal :: html :: ´ëÈ »óÀÚ °ü·Ã ¼ÒÇÁÆ®¿þ¾î