Learn from sources
       Member LAB31B in CGI400C2 / HTMLSRC

 /$top              **** START HTML
 Content-type: text/html
 Expires: Fri Jan 01 00:00:00 1999
 
 «HTML»
 «HEAD»
 «TITLE»CGI lab- using a form- Example 2«/TITLE»
 «/HEAD»
 
 «BODY TEXT="black" LINK="blue" VLINK="purple" ALINK="red" BGCOLOR="white"»
 «br»«br»
 «h2»Customer registration«/h2»
 
 /$inperr           **** INPUT ERROR
 «font face="Verdana,Helvetica,Arial" color=red»
 «b»Warning«/b»- Fill in the fields with red headers
 
 /$form             **** INPUT FORM
 «table»
 «form method=post action="/cgi400c2p/lab31b.pgm"»
 «input type=hidden name=action value=register»
 «tr»«td colspan=2»
         «font face="Verdana,Helvetica,Arial" color=blue»
         Please enter the following data and press the
         «i»Submit«/i» button.«/td»«/tr»
 «tr»«td»«/td»
     «td»«font face="Verdana,Helvetica,Arial" size=-1 color=/%COLOR01%/»
         «input type=radio name=xcus01sex value="1" /%XCUS01SEX1%/»
                Mr.  
         «input type=radio name=xcus01sex value="2" /%XCUS01SEX2%/»
                Mrs.  
         «input type=radio name=xcus01sex value="3" /%XCUS01SEX3%/»
                Miss«/td»«/tr»
 «tr»«td»«font face="Verdana,Helvetica,Arial" size=-1 color=/%COLOR02%/»
         First name«/td»
     «td»«input type=text name=xcus01fnm size=20 maxlength=30
                value="/%XCUS01FNM%/"»
                «/td»«/tr»
 «tr»«td»«font face="Verdana,Helvetica,Arial" size=-1 color=/%COLOR03%/»
         Last name«/td»
     «td»«input type=text name=xcus01lnm size=20 maxlength=30
                value="/%XCUS01LNM%/"»
                «/td»«/tr»
 «tr»«td»«font face="Verdana,Helvetica,Arial" size=-1 color=/%COLOR04%/»
         Address«/td»
     «td»«input type=text name=xcus01adr size=30 maxlength=50
                value="/%XCUS01ADR%/"»
                «/td»«/tr»
 «tr»«td»«font face="Verdana,Helvetica,Arial" size=-1 color=/%COLOR05%/»
         Zip code«/td»
     «td»«input type=text name=xcus01zip size=15 maxlength=15
                value="/%XCUS01ZIP%/"»
                «/td»«/tr»
 «tr»«td»«font face="Verdana,Helvetica,Arial" size=-1 color=/%COLOR06%/»
         City«/td»
     «td»«input type=text name=xcus01cit size=20 maxlength=50
                value="/%XCUS01CIT%/"»
                «/td»«/tr»
 «tr»«td»«font face="Verdana,Helvetica,Arial" size=-1 color=/%COLOR07%/»
         State/Province«/td»
     «td»«input type=text name=xcus01sta size=20 maxlength=30
                value="/%XCUS01STA%/"»
                «/td»«/tr»
 «tr»«td»«font face="Verdana,Helvetica,Arial" size=-1 color=/%COLOR08%/»
         Country«/td»
     «td»«input type=text name=xcus01ctr size=20 maxlength=30
                value="/%XCUS01CTR%/"»
                «/td»«/tr»
 «tr»«td colspan=2 align=center»
         «input type=submit value="Submit"»
     «/td»«/tr»
 «/form»
 «/table»
 
 /$done             **** CUSTOMER WAS REGISTERED
 «font face="Verdana,Helvetica,Arial"»
 Thanks for registering.«br»
 Your customer number is «b»/%XCUS01NBR%/«/b».
 
 /$end              **** END HTML
 «/BODY»«/HTML»
0.014 sec.s