Annotation of capa/capa51/Discuss/Ver1.3/capadiscuss_html, revision 1.3

1.1       albertel    1: ## CapaDiscuss HTML Subroutines
                      2: 
                      3: sub NewSetHTML {
                      4: print <<NewSetHTML2;
                      5: <html>
                      6: <head>
                      7:   <title>
                      8:   </title>
                      9: </head>
                     10: <body bgcolor="#FFFFFF">
                     11: <table><tr><td bgcolor="#000000">
                     12: <table width="100%" border=0 cellspacing=1 cellpadding=4>
                     13: <tr bgcolor="#FFFFFF">
                     14:   <td>Class: <b>$class</b></td>
                     15: </tr></table>
                     16: </td></tr></table>
                     17: 
                     18: <table><tr><td bgcolor="#000000">
                     19: <table width="100%" border=0 cellspacing=1 cellpadding=4>
                     20:   <tr bgcolor="#FFFFFF">
                     21:   <td>
                     22:   Please enter your CapaID for <b>set $setid</b>
                     23:   </td>
                     24:   </tr>
                     25:   <tr>
                     26:   <td bgcolor="#DEDFDF">
                     27:   <form method=post action="$cgidirurl/$discussurl">
                     28:   <input type=hidden name="ACTION" value="viewset">
                     29:   <input type=hidden name="CLASS" value="$class">
                     30:   <input type=hidden name="SETID" value="$setid">
                     31:   <input type=hidden name="PSETID" value="$setid">
                     32:   <input type=hidden name="SNUM" value="$snum">
                     33:   CapaID: <input type=password name="CAPAID" size=4 maxsize=4>
                     34:   &nbsp;&nbsp;<input type=submit value="Submit">
                     35:   </form>
                     36:   </td>
                     37: </tr></table>
                     38: </td></tr></table>
                     39: </body>
                     40: </html>
                     41: NewSetHTML2
                     42: }
                     43: 
                     44: sub ViewSetTitleHTML {
                     45: print <<ViewSetTitleHTML2;
                     46: <html>
                     47: <head>
                     48:   <title></title>
                     49: </head>
                     50: <body bgcolor="#FFFFFF">
                     51: <center>
                     52: <table><tr><td bgcolor="#000000">
                     53: <table width="100%" border=0 cellspacing=2 cellpadding=4>
                     54:   <tr valign=top>
                     55:   <td bgcolor="#FFFFFF" align=center>Class:<br><b> $class </b></td>
                     56:   <td bgcolor="#FFFFFF">
                     57:     <table width="100%" border=0 cellspacing=0 cellpadding=0><tr>
                     58:     <td>
                     59:     <form method=post action="$cgidirurl/$discussurl">
                     60:     <input type=submit value="Go">
                     61:     <b> to Set </b>
                     62:     <font size=+1>$pdset</font>
                     63:     <input type=hidden name="ACTION" value="newset">
                     64:     <input type=hidden name="CLASS" value="$class">
                     65:     <input type=hidden name="SNUM" value="$snum">
                     66:     <input type=hidden name="CAPAID" value="$capaid">
                     67:     <input type=hidden name="PSETID" value="$psetid">
                     68:     <input type=submit value="Go">
                     69:     </form>
                     70:     </td></tr></table>
                     71:   </td>
                     72:   </tr>
                     73: </table>
                     74: </td></tr></table>
                     75: <br>
                     76: <center>
                     77: <table><tr>
                     78:   <td>
                     79:   <form method=post action="$cgidirurl/$discussurl">
                     80:   <input type=hidden name="ACTION" value="viewset">
                     81:   <input type=hidden name="CLASS" value="$class">
                     82:   <input type=hidden name="SETID" value="$setid">
                     83:   <input type=hidden name="PSETID" value="$psetid">
                     84:   <input type=hidden name="SNUM" value="$snum">
                     85:   <input type=hidden name="CAPAID" value="$capaid">
                     86:   <input type=submit value="Refresh">
                     87:   </form>
                     88:   </td>
                     89:   <td>
                     90:   <form method=post action="$capasbin">
                     91:   <input type=hidden name="CLASS" value="$class">
                     92:   <input type=hidden name="SNUM"  value="$snum">
                     93:   <input type=hidden name="CAPAID" value="$capaid">
                     94:   <input type=hidden name="M" value="2">
                     95:   <input type=submit value="Try current set">
                     96:   </form>
                     97:   </td>
                     98:   <td>
                     99:   $adminbutton
                    100:   </td>
                    101:   $infostring
                    102: </tr></table>
                    103: </center>
                    104: ViewSetTitleHTML2
                    105: }
                    106: 
                    107: sub ViewSetTopSmallHTML {
                    108: print <<ViewSetTopSmallHTML2;
                    109: <center>
                    110: <table><tr><td bgcolor="#000000">
                    111: <table border=0 cellspacing=1 cellpadding=4>
                    112: <tr bgcolor="#007F7F">
                    113:   <td>
                    114:   <font color="#FFFFFF">
                    115:   <b>Problem</b>
                    116:   </td>
                    117:   <td align=center>
                    118:   <font color="#FFFFFF">
                    119:   <b>Posts</b>
                    120:   </td>
                    121:   <td>
                    122:   <font color="#FFFFFF">
                    123:   <center>
                    124:   <b>Last Post</b>
                    125:   </td>
                    126: </tr>
                    127: ViewSetTopSmallHTML2
                    128: }
                    129: 
                    130: sub ViewSetTopBigHTML {
                    131: print <<ViewSetTopBigHTML2;
                    132: <center>
                    133: <table border=0 cellspacing=12 cellpadding=0><tr>
                    134:   <td valign=top>
                    135: ViewSetTopBigHTML2
                    136: &ViewSetTopSmallHTML;
                    137: }
                    138: 
                    139: sub ViewSetGutsHTML {
                    140: print <<ViewSetGutsHTML2;
                    141: <tr>
                    142:   <td bgcolor="#FFFFFF" align=center>
                    143:   <form method=post action="$cgidirurl/$discussurl">
                    144:   <input type=hidden name="ACTION" value="viewproblem">
                    145:   <input type=hidden name="CLASS" value="$class">
                    146:   <input type=hidden name="SETID" value="$setid">
                    147:   <input type=hidden name="PSETID" value="$psetid">
                    148:   <input type=hidden name="SNUM" value="$snum">
                    149:   <input type=hidden name="CAPAID" value="$capaid">
                    150:   <input type=hidden name="PROBNUM" value="$probnum">
                    151:   <input type=hidden name="FILE" value="$file">
                    152:   <input type=submit value=" $probnum ">
                    153:   </form>
                    154:   </td>
                    155:   <td bgcolor="#FFFFFF" align=center>
                    156:   $posts
                    157:   </td>
                    158:   <td bgcolor="#FFFFFF">
                    159:   $lastpost
                    160:   </td>
                    161: </tr>
                    162: ViewSetGutsHTML2
                    163: }
                    164: 
                    165: sub ViewSetEndColHTML {
                    166: print <<ViewSetEndColHTML2;
                    167: </table>
                    168: </td></tr></table>
                    169: </td><td valign=top>
                    170: ViewSetEndColHTML2
                    171: }
                    172: 
                    173: sub ViewSetBotHTML {
                    174: print <<ViewSetBotHTML2;
                    175: </table>
                    176: </td></tr></table>
                    177: </td></tr></table>
                    178: </body>
                    179: </html>
                    180: ViewSetBotHTML2
                    181: }
                    182: 
                    183: sub ViewProblemTopHTML {
                    184: print <<ViewProblemTopHTML2;
                    185: <html>
                    186: <head>
                    187:   <title></title>
                    188: </head>
                    189: <body bgcolor="#FFFFFF">
                    190: <center>
                    191: <table><tr><td bgcolor="#000000">
                    192: <table width="100%" border=0 cellspacing=2 cellpadding=4>
                    193:   <tr>
                    194:   <td bgcolor="#FFFFFF" valign=top align=center>Class:<br><b> $class </b></td>
                    195:   <td bgcolor="#FFFFFF" valign=top align=center>
                    196:     Set: <br><b>$setid</b>
                    197:     </td>
                    198:     <td bgcolor="#FFFFFF">
                    199:     <table width="100%" border=0 cellspacing=0 cellpadding=0><tr><td>
                    200:     <form method=post action="$cgidirurl/$discussurl">
                    201:     <font size=+1>
                    202:     <input type=submit value="Go"></font> <b>to Problem</b> </td>
                    203:     <td>
                    204:     <input type=hidden name="ACTION" value="viewproblem">
                    205:     <input type=hidden name="CLASS" value="$class">
                    206:     <input type=hidden name="SETID" value="$setid">
                    207:     <input type=hidden name="PSETID" value="$psetid">
                    208:     <input type=hidden name="SNUM" value="$snum">
                    209:     <input type=hidden name="CAPAID" value="$capaid">
                    210:     <font size=+1>$pdprob
                    211:     <input type=submit value="Go">
                    212:     </font>
                    213:     </td></tr></table>
                    214:     </form>
                    215:   </td>
                    216:   </tr>
                    217: </table>
                    218: </td></tr></table>
                    219: 
                    220: <br>
                    221: <center>
                    222: <table border=0 cellspacing=3 cellpadding=0>
                    223: <tr>
                    224: <td>
                    225:   <form method=post action="$cgidirurl/$discussurl">
                    226:   <input type=hidden name="ACTION"   value="$viewset">
                    227:   <input type=hidden name="CLASS"    value="$class">
                    228:   <input type=hidden name="SETID"    value="$setid">
                    229:   <input type=hidden name="PSETID" value="$psetid">
                    230:   <input type=hidden name="SNUM"     value="$snum">
                    231:   <input type=hidden name="CAPAID"   value="$capaid">
                    232:   <input type=submit value="<-- Back">
                    233:   </form>
                    234: </td>
                    235: <td>
                    236:   <form method=post action="$cgidirurl/$discussurl">
                    237:   <input type=hidden name="ACTION" value="viewproblem">
                    238:   <input type=hidden name="CLASS" value="$class">
                    239:   <input type=hidden name="SETID" value="$setid">
                    240:   <input type=hidden name="PSETID" value="$psetid">
                    241:   <input type=hidden name="SNUM" value="$snum">
                    242:   <input type=hidden name="CAPAID" value="$capaid">
                    243:   <input type=hidden name="PROBNUM" value="$probnum">
                    244:   <input type=submit value="Refresh">
                    245:   </form>
                    246: </td>
                    247: <td>
                    248:   <form method=post action="$capasbin#P$probnum">
                    249:   <input type=hidden name="CLASS"    value="$class">
                    250:   <input type=hidden name="SNUM"     value="$snum">
                    251:   <input type=hidden name="CAPAID"   value="$capaid">
                    252:   <input type=hidden name="SETID"    value="$setid">
                    253:   <input type=hidden name="PSETID" value="$psetid">
                    254:   <input type=hidden name="M"        value="2">
                    255:   <input type=submit value="Try this problem">
                    256:   </form>
                    257: </td>
                    258: <td>
                    259:   $postbutton
                    260: </td>
                    261: <td>
                    262:   $adminbutton
                    263: </td>
1.2       albertel  264:   $infostring
1.1       albertel  265: </tr></table>
                    266: ViewProblemTopHTML2
                    267: }
                    268: 
                    269: sub ViewProblemGutsHTML {
                    270: print <<ViewProblemGutsHTML2;
                    271: <table width="95%" align=center><tr bgcolor="#000000"><td>
                    272: <table width="100%" border=0 cellspacing=1 cellpadding=4>
                    273:   <tr bgcolor="$subjectbgcolor">
                    274:     <td>
                    275:     <font size=+1>$subject</b></font>
                    276:     </td>
                    277:     <td align=right width="54%" valign=top>
                    278:     <font size=-1>
                    279:     Posted by <a href="mailto:$email">$poster</a> on $date at $time
                    280:     </font>
                    281:     </td>
                    282:   </tr>
                    283:   <tr bgcolor="#FFFFFF">
                    284:     <td colspan=2>
                    285:     $message
                    286:     <table><tr>
                    287:       <td>$delbutton</td>
                    288:       <td>$hidebutton</td>
                    289:       <td>$topbutton</td>
                    290:       </tr></table>
                    291:       <font size=1>$messagenote</font></p>
                    292:     </td>
                    293:   </tr>
                    294: </table>
                    295: </td></tr></table>
                    296: ViewProblemGutsHTML2
                    297: }
                    298: 
                    299: sub ViewProblemBotHTML {
                    300: print <<ViewProblemBotHTML2;
                    301: </body></html>
                    302: ViewProblemBotHTML2
                    303: }
                    304: 
                    305: 
                    306: sub ViewProblemNoneHTML {
                    307: print <<ViewProblemNoneHTML2;
                    308: <br>
                    309: <table><tr><td bgcolor="#000000">
                    310: <table width="100%" border=0 cellspacing=1 cellpadding=4>
                    311:   <tr bgcolor="#FFFFFF">
                    312:   <td>
                    313:   No messages exist for this problem number.  Click on the above
                    314:   <b>"Post New Message"</b> button to post a new message.
                    315:   </td>
                    316: </tr></table>
                    317: </td></tr></table>
                    318: ViewProblemNoneHTML2
                    319: }
                    320: 
                    321: sub ReplyButtonHTML {
                    322: return <<ReplyButtonHTML2;
                    323:   <form method=post action="$cgidirurl/$discussurl">
                    324:   <input type=hidden name="ACTION" value="post">
                    325:   <input type=hidden name="CLASS" value="$class">
                    326:   <input type=hidden name="SETID" value="$setid">
                    327:   <input type=hidden name="PSETID" value="$psetid">
                    328:   <input type=hidden name="SNUM" value="$snum">
                    329:   <input type=hidden name="CAPAID" value="$capaid">
                    330:   <input type=hidden name="PROBNUM" value="$probnum">
                    331:   <input type=hidden name="REPLYNUM" value="$replynum">
                    332:   <input type=submit value="Post Reply">
                    333:   </form>
                    334: ReplyButtonHTML2
                    335: }
                    336: 
                    337: sub PostNewButtonHTML {
                    338: return <<PostNewButtonHTML2;
                    339:   <form method=post action="$cgidirurl/$discussurl">
                    340:   <input type=hidden name="ACTION" value="post">
                    341:   <input type=hidden name="CLASS" value="$class">
                    342:   <input type=hidden name="SETID" value="$setid">
                    343:   <input type=hidden name="PSETID" value="$psetid">
                    344:   <input type=hidden name="SNUM" value="$snum">
                    345:   <input type=hidden name="CAPAID" value="$capaid">
                    346:   <input type=hidden name="PROBNUM" value="$probnum">
                    347:   <input type=hidden name="FILE" value="none">
                    348:   <input type=submit value="Post New Message">
                    349:   </form>
                    350: PostNewButtonHTML2
                    351: }
                    352: 
                    353: sub AdminButtonHTML {
                    354: return <<AdminButtonHTML2;
                    355:   <form method=post action="$cgidirurl/$discussurl">
                    356:   <input type=hidden name="ACTION" value="admin">
                    357:   <input type=hidden name="CLASS" value="$class">
                    358:   <input type=hidden name="SNUM" value="$snum">
                    359:   <input type=hidden name="CAPAID" value="$capaid">
                    360:   <input type=hidden name="SETID" value="$setid">
                    361:   <input type=hidden name="PSETID" value="$psetid">
                    362:   <input type=hidden name="PROBNUM" value="$probnum">
                    363:   <input type=submit value="Admin">
                    364:   </form>
                    365: AdminButtonHTML2
                    366: }
                    367: 
                    368: sub DelButtonHTML {
                    369: return <<DelButtonHTML2;
                    370:   <p align=right><font size=1>
                    371:   <form method=post action="$cgidirurl/$discussurl">
                    372:   <input type=hidden name="ACTION" value="delmsgpre">
                    373:   <input type=hidden name="CLASS" value="$class">
                    374:   <input type=hidden name="SNUM" value="$snum">
                    375:   <input type=hidden name="CAPAID" value="$capaid">
                    376:   <input type=hidden name="SETID" value="$setid">
                    377:   <input type=hidden name="PSETID" value="$psetid">
                    378:   <input type=hidden name="PROBNUM" value="$probnum">
                    379:   <input type=hidden name="FILE" value="$file">
                    380:   <input type=submit value="Delete Message">
                    381:   </form>
                    382:   </font></p>
                    383: DelButtonHTML2
                    384: }
                    385: 
                    386: sub HideButtonHTML {
                    387: return <<HideButtonHTML2;
                    388:   <font size=1>
                    389:   <form method=post action="$cgidirurl/$discussurl">
                    390:     <input type=hidden name="ACTION" value="hidemsgpre">
                    391:     <input type=hidden name="CLASS" value="$class">
                    392:     <input type=hidden name="SNUM" value="$snum">
                    393:     <input type=hidden name="CAPAID" value="$capaid">
                    394:     <input type=hidden name="SETID" value="$setid">
                    395:     <input type=hidden name="PSETID" value="$psetid">
                    396:     <input type=hidden name="PROBNUM" value="$probnum">
                    397:     <input type=hidden name="FILE" value="$file">
                    398:     <input type=submit value="Hide Message">
                    399:     </form>
                    400:   </font>
                    401: HideButtonHTML2
                    402: }    
                    403: 
                    404: sub UnHideButtonHTML {
                    405: return <<UnHideButtonHTML2;
                    406:   <font size=1>
                    407:   <form method=post action="$cgidirurl/$discussurl">
                    408:     <input type=hidden name="ACTION" value="unhidemsgpre">
                    409:     <input type=hidden name="CLASS" value="$class">
                    410:     <input type=hidden name="SNUM" value="$snum">
                    411:     <input type=hidden name="CAPAID" value="$capaid">
                    412:     <input type=hidden name="SETID" value="$setid">
                    413:     <input type=hidden name="PSETID" value="$psetid">
                    414:     <input type=hidden name="PROBNUM" value="$probnum">
                    415:     <input type=hidden name="FILE" value="$file">
                    416:     <input type=submit value="Unhide Message">
                    417:     </form>
                    418:   </font>
                    419: UnHideButtonHTML2
                    420: }    
                    421: 
                    422: sub TopButtonHTML {
                    423: return <<TopButtonHTML2;
                    424:   <font size=1>
                    425:   <form method=post action="$cgidirurl/$discussurl">
                    426:     <input type=hidden name="ACTION" value="topmsg">
                    427:     <input type=hidden name="CLASS" value="$class">
                    428:     <input type=hidden name="SNUM" value="$snum">
                    429:     <input type=hidden name="CAPAID" value="$capaid">
                    430:     <input type=hidden name="SETID" value="$setid">
                    431:     <input type=hidden name="PSETID" value="$psetid">
                    432:     <input type=hidden name="PROBNUM" value="$probnum">
                    433:     <input type=hidden name="FILE" value="$file">
                    434:     <input type=submit value="Top Message">
                    435:     </form>
                    436:   </font>
                    437: TopButtonHTML2
                    438: }
                    439: 
                    440: sub UnTopButtonHTML {
                    441: return <<UnTopButtonHTML2;
                    442:   <font size=1>
                    443:   <form method=post action="$cgidirurl/$discussurl">
                    444:     <input type=hidden name="ACTION" value="untopmsg">
                    445:     <input type=hidden name="CLASS" value="$class">
                    446:     <input type=hidden name="SNUM" value="$snum">
                    447:     <input type=hidden name="CAPAID" value="$capaid">
                    448:     <input type=hidden name="SETID" value="$setid">
                    449:     <input type=hidden name="PSETID" value="$psetid">
                    450:     <input type=hidden name="PROBNUM" value="$probnum">
                    451:     <input type=hidden name="FILE" value="$file">
                    452:     <input type=submit value="UnTop Message">
                    453:     </form>
                    454:   </font>
                    455: UnTopButtonHTML2
                    456: }
                    457: 
                    458: sub InfoButtonHTML {
                    459: return <<InfoButtonHTML2;
                    460:   <td>
                    461:     <form method=post action="$cgidirurl/$discussurl">
                    462:     <input type=hidden name="ACTION" value="viewinfofile">
                    463:     <input type=hidden name="CLASS" value="$class">
                    464:     <input type=hidden name="SNUM" value="$snum">
                    465:     <input type=hidden name="CAPAID" value="$capaid">
                    466:     <input type=hidden name="SETID" value="$setid">
                    467:     <input type=hidden name="PSETID" value="$psetid">
                    468:     <input type=hidden name="PROBNUM" value="$probnum">
                    469:     <input type=hidden name="FILE" value="$infofile">
                    470:     <input type=hidden name="BACKFUNCTION" value="$backfunction">
                    471:     <input type=submit value="$infodesc">
                    472:     </form>
                    473:   </td>
                    474: InfoButtonHTML2
                    475: }
                    476: 
                    477: sub InfoBackButtonHTML {
                    478: print <<InfoBackButtonHTML2;
                    479:     <form method=post action="$cgidirurl/$discussurl">
                    480:     <input type=hidden name="ACTION" value="$backfunction">
                    481:     <input type=hidden name="CLASS" value="$class">
                    482:     <input type=hidden name="SNUM" value="$snum">
                    483:     <input type=hidden name="CAPAID" value="$capaid">
                    484:     <input type=hidden name="SETID" value="$setid">
                    485:     <input type=hidden name="PSETID" value="$psetid">
                    486:     <input type=hidden name="PROBNUM" value="$probnum">
                    487:     <input type=submit value="<-- Back">
                    488:     </form>
                    489: InfoBackButtonHTML2
                    490: }
                    491: 
                    492: sub PostHTML {
                    493: print <<PostHTML2;
                    494: <html>
                    495: <head>
                    496:   <title></title>
                    497: </head>
                    498: <body bgcolor="#FFFFFF">
                    499: <table><tr><td bgcolor="#000000">
                    500: <table width="100%" border=0 cellspacing=2 cellpadding=4>
                    501:   <tr bgcolor="#FFFFFF">
                    502:     <td bgcolor="#FFFFFF">Class: <b>$class</b></td>
                    503:     <td bgcolor="#FFFFFF">Set: <b>$setid</td>
                    504:     <td bgcolor="#FFFFFF">Problem: <b>$probnum</td>
                    505:   </tr>
                    506: </table>
                    507: </td></tr></table>
                    508: <table width=500 border=0 cellspacing=0 cellpadding=0><tr>
                    509:   <td>
                    510:   <h1>Post $PostType</h1>
                    511:   </td>
                    512:   <td align=right>
                    513:   <form method=post action="$cgidirurl/$discussurl">
                    514:   <input type=hidden name="ACTION" value="viewproblem">
                    515:   <input type=hidden name="CLASS" value="$class">
                    516:   <input type=hidden name="SETID" value="$setid">
                    517:   <input type=hidden name="PSETID" value="$psetid">
                    518:   <input type=hidden name="SNUM" value="$snum">
                    519:   <input type=hidden name="CAPAID" value="$capaid">
                    520:   <input type=hidden name="PROBNUM" value="$probnum">
                    521:   <input type=submit value="Cancel">
                    522:   </form>
                    523:   </td>
                    524: </tr></table>
                    525: <form method=post action="$cgidirurl/$discussurl">
                    526: <input type=hidden name="ACTION" value="postsubmit">
                    527: <input type=hidden name="CLASS" value="$class">
                    528: <input type=hidden name="SETID" value="$setid">
                    529: <input type=hidden name="PSETID" value="$psetid">
                    530: <input type=hidden name="SNUM" value="$snum">
                    531: <input type=hidden name="CAPAID" value="$capaid">
                    532: <input type=hidden name="PROBNUM" value="$probnum">
                    533: <input type=hidden name="REPLYNUM" value="$replynum">
                    534: <table width=500><tr><td bgcolor="#000000">
                    535: <table width="100%" border=0 cellspacing=1 cellpadding=4>
                    536:   <tr bgcolor="#92D1D0">
                    537:   <td colspan=2>
                    538:   <table width="100%">
                    539:   <tr>
                    540:     <td align=left>
                    541:     Click here <input type=checkbox name="ANONYMOUS" value="yes">
                    542:     to post anonymously<font size=-1>*</font>
                    543:     </td>
                    544:     <td align=right>
                    545:     <input type=submit value="Post">
                    546:     </td>
                    547:   </tr></table>
                    548:   </td>
                    549:   </tr>
                    550:   <tr bgcolor="#92D1D0">
                    551:   <td>
                    552:   <b>Subject</b>
                    553:   </td>
                    554:   <td>
                    555:   <input type=text name="subject" size=51>
                    556:   </td>
                    557:   </tr>
                    558:   <tr bgcolor="#FFFFFF">
                    559:   <td valign=top>
                    560:   <b>Message</b>
                    561:   </td>
                    562:   <td>
                    563:   <textarea cols=50 rows=12 name=message wrap=virtual></textarea>
                    564:   </td>
                    565:   </tr>
                    566:   <tr bgcolor="#FFFFFF">
                    567:   <td colspan=2>
                    568:   <font size=-1>
                    569:   *Name not displayed to other students
                    570:   </td>
                    571:   </tr>
                    572: </table>
                    573: </td></tr></table>
                    574: </form>
                    575: $inreplyto
                    576: PostHTML2
                    577: }
                    578: 
                    579: sub InReplyToHTML {
                    580: return <<InReplyToHTML2;
                    581:   <b>In reply to:
                    582:   <table width=500><tr><td bgcolor="#000000">
                    583:   <table width="100%" border=0 cellspacing=1 cellpadding=4>
                    584:     <tr bgcolor="#92D1D0">
                    585:     <td>
                    586:     <font size=+1>
                    587:     $subject
                    588:     </font>
                    589:     </td>
                    590:     <td width="54%">
                    591:     <font size=-1>
                    592:     Posted by <a href="mailto:$email">$poster</a> on $date at $time
                    593:     </font>
                    594:     </td>
                    595:     </tr>
                    596:     <tr bgcolor="#FFFFFF">
                    597:     <td colspan=2>
                    598:     $message
                    599:     </td>
                    600:     </tr>
                    601:   </table>
                    602:   </td></tr></table>
                    603:   </body>
                    604:   </html>
                    605: InReplyToHTML2
                    606: }
                    607: 
                    608: sub PostDoneHTML {
                    609: print <<PostDoneHTML2;
                    610: <html>
                    611: <head>
                    612:   <title></title>
                    613: </head>
                    614: <body bgcolor="#FFFFFF">
                    615: <br>
                    616: <center>
                    617: <table width=400><tr><td bgcolor="#000000">
                    618: <table width="100%" border=0 cellspacing=1 cellpadding=4>
                    619:   <tr align=center bgcolor="#FFFFFF">
                    620:   <td>
                    621:   Your message has been successfully posted!
                    622:   </td>
                    623:   </tr>
                    624:   <tr align=center bgcolor="#DEDFDF">
                    625:   <td>
                    626:   <form method=post action="$cgidirurl/$discussurl">
                    627:   <input type=hidden name="ACTION" value="viewproblem">
                    628:   <input type=hidden name="CLASS" value="$class">
                    629:   <input type=hidden name="SETID" value="$setid">
                    630:   <input type=hidden name="PSETID" value="$psetid">
                    631:   <input type=hidden name="SNUM" value="$snum">
                    632:   <input type=hidden name="CAPAID" value="$capaid">
                    633:   <input type=hidden name="PROBNUM" value="$probnum">
                    634:   <input type=submit value="Back to Problem $probnum">
                    635:   </form>
                    636:   </td>
                    637:   </tr>
                    638: </table>
                    639: </td></tr></table>
                    640: </center>
                    641: </body>
                    642: </html>
                    643: PostDoneHTML2
                    644: }
                    645: 
                    646: sub DelMsgPreHTML {
                    647: print <<DelMsgPreHTML2;
                    648: <html>
                    649: <head>
                    650:   <title></title>
                    651: </head>
                    652: <body bgcolor="#FFFFFF">
                    653: <center>
                    654: <table width="95%"><tr><td bgcolor="#000000">
                    655: <table width="100%" border=0 cellspacing=1 cellpadding=4>
                    656:   <tr bgcolor="#FFFFFF">
                    657:     <td>
                    658:     <font size=+1>$subject
                    659:     </td>
                    660:   </tr>
                    661:   <tr bgcolor="#DEDFDF">
                    662:     <td>
                    663:     <font size=-1>
                    664:     Posted by <a href="mailto:$email">$poster</a> on $date at $time
                    665:     </font>
                    666:     </td>
                    667:   </tr>
                    668:   <tr bgcolor="#FFFFFF">
                    669:     <td>
                    670:     $message
                    671:     </td>
                    672:   </tr>
                    673: </table>
                    674: </td></tr></table>
                    675: </center>
                    676: <center>
                    677: <table><tr><td bgcolor="#000000">
                    678: <table border=0 cellspacing=1 cellpadding=3><tr bgcolor="#FFFFFF">
                    679:   <td colspan=2 align=center bgcolor="#DEDFDF">
                    680:   Delete this message?
                    681:   </td>
                    682: </tr>
                    683: <tr bgcolor="#FFFFFF">
                    684:   <td align=center>
                    685:   <form method=post action="$cgidirurl/$discussurl">
                    686:   <input type=hidden name="ACTION" value="delmsg">
                    687:   <input type=hidden name="CLASS" value="$class">
                    688:   <input type=hidden name="SETID" value="$setid">
                    689:   <input type=hidden name="PSETID" value="$psetid">
                    690:   <input type=hidden name="SNUM" value="$snum">
                    691:   <input type=hidden name="CAPAID" value="$capaid">
                    692:   <input type=hidden name="FILE" value="$file">
                    693:   <input type=hidden name="PROBNUM" value="$probnum">
                    694:   <input type=submit value="Yes">
                    695:   </form>
                    696:   </td>
                    697:   <td align=center>
                    698:   <form method=post action="$cgidirurl/$discussurl">
                    699:   <input type=hidden name="ACTION" value="viewproblem">
                    700:   <input type=hidden name="CLASS" value="$class">
                    701:   <input type=hidden name="SETID" value="$setid">
                    702:   <input type=hidden name="PSETID" value="$psetid">
                    703:   <input type=hidden name="SNUM" value="$snum">
                    704:   <input type=hidden name="CAPAID" value="$capaid">
                    705:   <input type=hidden name="PROBNUM" value="$probnum">
                    706:   <input type=submit value="No">
                    707:   </form>
                    708:   </td>
                    709: </tr></table>
                    710: </td></tr></table>
                    711: </body>
                    712: </html>
                    713: DelMsgPreHTML2
                    714: }
                    715: 
                    716: sub DelMsgDoneHTML {
                    717: print <<DelMsgDoneHTML2;
                    718: <html>
                    719: <head>
                    720:   <title>
                    721:   </title>
                    722: </head>
                    723: <body bgcolor="#FFFFFF">
                    724: <center>
                    725: <table><tr><td bgcolor="#000000">
                    726: <table width="100%" border=0 cellspacing=1 cellpadding=4>
                    727:   <tr bgcolor="#FFFFFF">
                    728:   <td>
                    729:   The selected message has been successfully deleted
                    730:   </td>
                    731:   </tr>
                    732:   <tr bgcolor="#DEDFDF">
                    733:   <td align=center>
                    734:   <form method=post action="$cgidirurl/$discussurl">
                    735:   <input type=hidden name="ACTION" value="viewproblem">
                    736:   <input type=hidden name="CLASS" value="$class">
                    737:   <input type=hidden name="SETID" value="$setid">
                    738:   <input type=hidden name="PSETID" value="$psetid">
                    739:   <input type=hidden name="SNUM" value="$snum">
                    740:   <input type=hidden name="CAPAID" value="$capaid">
                    741:   <input type=hidden name="PROBNUM" value="$probnum">
                    742:   <input type=submit value="Back to Message List">
                    743:   </form>
                    744:   </td>
                    745: </tr></table>
                    746: </td></tr></table>
                    747: </body>
                    748: DelMsgDoneHTML2
                    749: }
                    750: 
                    751: 
                    752: sub HideMsgPreHTML {
                    753: print <<HideMsgPreHTML2;
                    754: <html>
                    755: <head>
                    756:   <title></title>
                    757: </head>
                    758: <body bgcolor="#FFFFFF">
                    759: <center>
                    760: <table width="95%"><tr><td bgcolor="#000000">
                    761: <table width="100%" border=0 cellspacing=1 cellpadding=4>
                    762:   <tr bgcolor="#FFFFFF">
                    763:     <td>
                    764:     <font size=+1>$subject
                    765:     </td>
                    766:   </tr>
                    767:   <tr bgcolor="#DEDFDF">
                    768:     <td>
                    769:     <font size=-1>
                    770:     Posted by <a href="mailto:$email">$poster</a> on $date at $time
                    771:     </font>
                    772:     </td>
                    773:   </tr>
                    774:   <tr bgcolor="#FFFFFF">
                    775:     <td>
                    776:     $message
                    777:     </td>
                    778:   </tr>
                    779: </table>
                    780: </td></tr></table>
                    781: </center>
                    782: <center>
                    783: <table><tr><td bgcolor="#000000">
                    784: <table border=0 cellspacing=1 cellpadding=3><tr bgcolor="#FFFFFF">
                    785:   <td colspan=2 align=center bgcolor="#DEDFDF">
                    786:   Hide this message?
                    787:   </td>
                    788: </tr>
                    789: <tr bgcolor="#FFFFFF">
                    790:   <td align=center>
                    791:   <form method=post action="$cgidirurl/$discussurl">
                    792:   <input type=hidden name="ACTION" value="hidemsg">
                    793:   <input type=hidden name="CLASS" value="$class">
                    794:   <input type=hidden name="SETID" value="$setid">
                    795:   <input type=hidden name="PSETID" value="$psetid">
                    796:   <input type=hidden name="SNUM" value="$snum">
                    797:   <input type=hidden name="CAPAID" value="$capaid">
                    798:   <input type=hidden name="FILE" value="$file">
                    799:   <input type=hidden name="PROBNUM" value="$probnum">
                    800:   <input type=submit value="Yes">
                    801:   </form>
                    802:   </td>
                    803:   <td align=center>
                    804:   <form method=post action="$cgidirurl/$discussurl">
                    805:   <input type=hidden name="ACTION" value="viewproblem">
                    806:   <input type=hidden name="CLASS" value="$class">
                    807:   <input type=hidden name="SETID" value="$setid">
                    808:   <input type=hidden name="SNUM" value="$snum">
                    809:   <input type=hidden name="CAPAID" value="$capaid">
                    810:   <input type=hidden name="PROBNUM" value="$probnum">
                    811:   <input type=submit value="No">
                    812:   </form>
                    813:   </td>
                    814: </tr></table>
                    815: </td></tr></table>
                    816: <br>
                    817: <table width="40%" border=0 cellspacing=0 cellpadding=0>
                    818:   <tr><td bgcolor="#000000">
                    819:   <table width="100%" border=0 cellspacing=1 cellpadding=0>
                    820:     <tr><td bgcolor="#FFFFFF">
                    821:        <font size=2>
                    822:         Hiding this message will make it visible to users with
                    823:         administrator access only.
                    824:     </td></tr>
                    825:   </table>
                    826: </td></tr></table>
                    827: </body>
                    828: </html>
                    829: HideMsgPreHTML2
                    830: }
                    831: 
                    832: sub HideMsgDoneHTML {
                    833: print <<HideMsgDoneHTML2;
                    834: <html>
                    835: <head>
                    836:   <title>
                    837:   </title>
                    838: </head>
                    839: <body bgcolor="#FFFFFF">
                    840: <center>
                    841: <table><tr><td bgcolor="#000000">
                    842: <table width="100%" border=0 cellspacing=1 cellpadding=4>
                    843:   <tr bgcolor="#FFFFFF">
                    844:   <td>
                    845:   The selected message has been successfully hidden
                    846:   </td>
                    847:   </tr>
                    848:   <tr bgcolor="#DEDFDF">
                    849:   <td align=center>
                    850:   <form method=post action="$cgidirurl/$discussurl">
                    851:   <input type=hidden name="ACTION" value="viewproblem">
                    852:   <input type=hidden name="CLASS" value="$class">
                    853:   <input type=hidden name="SETID" value="$setid">
                    854:   <input type=hidden name="PSETID" value="$psetid">
                    855:   <input type=hidden name="SNUM" value="$snum">
                    856:   <input type=hidden name="CAPAID" value="$capaid">
                    857:   <input type=hidden name="PROBNUM" value="$probnum">
                    858:   <input type=submit value="Back to Message List">
                    859:   </form>
                    860:   </td>
                    861: </tr></table>
                    862: </td></tr></table>
                    863: </body>
                    864: 
                    865: HideMsgDoneHTML2
                    866: }
                    867: 
                    868: 
                    869: sub UnHideMsgPreHTML {
                    870: print <<UnHideMsgPreHTML2;
                    871: <html>
                    872: <head>
                    873:   <title></title>
                    874: </head>
                    875: <body bgcolor="#FFFFFF">
                    876: <center>
                    877: <table width="95%"><tr><td bgcolor="#000000">
                    878: <table width="100%" border=0 cellspacing=1 cellpadding=4>
                    879:   <tr bgcolor="#FFFFFF">
                    880:     <td>
                    881:     <font size=+1>$subject
                    882:     </td>
                    883:   </tr>
                    884:   <tr bgcolor="#DEDFDF">
                    885:     <td>
                    886:     <font size=-1>
                    887:     Posted by <a href="mailto:$email">$poster</a> on $date at $time
                    888:     </font>
                    889:     </td>
                    890:   </tr>
                    891:   <tr bgcolor="#FFFFFF">
                    892:     <td>
                    893:     $message
                    894:     </td>
                    895:   </tr>
                    896: </table>
                    897: </td></tr></table>
                    898: </center>
                    899: <center>
                    900: <table><tr><td bgcolor="#000000">
                    901: <table border=0 cellspacing=1 cellpadding=3><tr bgcolor="#FFFFFF">
                    902:   <td colspan=2 align=center bgcolor="#DEDFDF">
                    903:   Unhide this message?
                    904:   </td>
                    905: </tr>
                    906: <tr bgcolor="#FFFFFF">
                    907:   <td align=center>
                    908:   <form method=post action="$cgidirurl/$discussurl">
                    909:   <input type=hidden name="ACTION" value="unhidemsg">
                    910:   <input type=hidden name="CLASS" value="$class">
                    911:   <input type=hidden name="SETID" value="$setid">
                    912:   <input type=hidden name="SNUM" value="$snum">
                    913:   <input type=hidden name="CAPAID" value="$capaid">
                    914:   <input type=hidden name="FILE" value="$file">
                    915:   <input type=hidden name="PROBNUM" value="$probnum">
                    916:   <input type=submit value="Yes">
                    917:   </form>
                    918:   </td>
                    919:   <td align=center>
                    920:   <form method=post action="$cgidirurl/$discussurl">
                    921:   <input type=hidden name="ACTION" value="viewproblem">
                    922:   <input type=hidden name="CLASS" value="$class">
                    923:   <input type=hidden name="SETID" value="$setid">
                    924:   <input type=hidden name="PSETID" value="$psetid">
                    925:   <input type=hidden name="SNUM" value="$snum">
                    926:   <input type=hidden name="CAPAID" value="$capaid">
                    927:   <input type=hidden name="PROBNUM" value="$probnum">
                    928:   <input type=submit value="No">
                    929:   </form>
                    930:   </td>
                    931: </tr></table>
                    932: </td></tr></table>
                    933: </body>
                    934: </html>
                    935: UnHideMsgPreHTML2
                    936: }
                    937: 
                    938: 
                    939: sub UnHideMsgDoneHTML {
                    940: print <<UnHideMsgDoneHTML2;
                    941: <html>
                    942: <head>
                    943:   <title>
                    944:   </title>
                    945: </head>
                    946: <body bgcolor="#FFFFFF">
                    947: <center>
                    948: <table><tr><td bgcolor="#000000">
                    949: <table width="100%" border=0 cellspacing=1 cellpadding=4>
                    950:   <tr bgcolor="#FFFFFF">
                    951:   <td>
                    952:   The selected message has been successfully unhidden
                    953:   </td>
                    954:   </tr>
                    955:   <tr bgcolor="#DEDFDF">
                    956:   <td align=center>
                    957:   <form method=post action="$cgidirurl/$discussurl">
                    958:   <input type=hidden name="ACTION" value="viewproblem">
                    959:   <input type=hidden name="CLASS" value="$class">
                    960:   <input type=hidden name="SETID" value="$setid">
                    961:   <input type=hidden name="PSETID" value="$psetid">
                    962:   <input type=hidden name="SNUM" value="$snum">
                    963:   <input type=hidden name="CAPAID" value="$capaid">
                    964:   <input type=hidden name="PROBNUM" value="$probnum">
                    965:   <input type=submit value="Back to Message List">
                    966:   </form>
                    967:   </td>
                    968: </tr></table>
                    969: </td></tr></table>
                    970: </body>
                    971: UnHideMsgDoneHTML2
                    972: }
                    973: 
                    974: sub TopMsgDoneHTML {
                    975: print <<TopMsgDoneHTML2;
                    976: <html>
                    977: <head>
                    978:   <title>
                    979:   </title>
                    980: </head>
                    981: <body bgcolor="#FFFFFF">
                    982: <center>
                    983: <table><tr><td bgcolor="#000000">
                    984: <table width="100%" border=0 cellspacing=1 cellpadding=4>
                    985:   <tr bgcolor="#FFFFFF">
                    986:   <td>
                    987:   The selected message has been successfully $function
                    988:   </td>
                    989:   </tr>
                    990:   <tr bgcolor="#DEDFDF">
                    991:   <td align=center>
                    992:   <form method=post action="$cgidirurl/$discussurl">
                    993:   <input type=hidden name="ACTION" value="viewproblem">
                    994:   <input type=hidden name="CLASS" value="$class">
                    995:   <input type=hidden name="SETID" value="$setid">
                    996:   <input type=hidden name="PSETID" value="$psetid">
                    997:   <input type=hidden name="SNUM" value="$snum">
                    998:   <input type=hidden name="CAPAID" value="$capaid">
                    999:   <input type=hidden name="PROBNUM" value="$probnum">
                   1000:   <input type=submit value="Back to Message List">
                   1001:   </form>
                   1002:   </td>
                   1003: </tr></table>
                   1004: </td></tr></table>
                   1005: </body>
                   1006: TopMsgDoneHTML2
                   1007: }
                   1008: 
                   1009: ## Admin HTML Subroutines
                   1010: 
                   1011: sub AdminMainHTML {
                   1012: print <<AdminMainHTML2;
                   1013: <html>
                   1014: <head>
                   1015:   <title></title>
                   1016: </head>
                   1017: <body bgcolor="#ffffff" text="#000000">
                   1018: <table width="400" border=0 cellspacing=0 cellpadding=0>
                   1019:   <tr><td bgcolor="#000000">
                   1020:   <table width="100%" border=0 cellspacing=1 cellpadding=0>
                   1021:     <tr>
                   1022:       <td bgcolor="blue" align=center>
                   1023:       <font size=2 color="#ffffff"><b>Administrator Functions</font>
                   1024:       </td>
                   1025:     </tr>
                   1026:     <tr>
                   1027:     <td bgcolor="#ffffff">
                   1028:       <form method=post action="$cgidirurl/$discussurl">
                   1029:       <input type=hidden name="ACTION" value="adminusersearch">
                   1030:       <input type=hidden name="CLASS" value="$class">
                   1031:       <input type=hidden name="SETID" value="$setid">
                   1032:       <input type=hidden name="PSETID" value="$psetid">
                   1033:       <input type=hidden name="SNUM" value="$snum">
                   1034:       <input type=hidden name="CAPAID" value="$capaid">
                   1035:       <input type=hidden name="PROBNUM" value="$probnum">
                   1036:       <input type=submit value="User Search">
                   1037:       </form>
                   1038:     </td>
                   1039:     </tr>
                   1040:     <tr>
                   1041:       <td bgcolor="blue" align=right>
                   1042:         <form method=post action="$cgidirurl/$discussurl">
                   1043:         <input type=hidden name="ACTION"   value="$viewset">
                   1044:         <input type=hidden name="CLASS"    value="$class">
                   1045:         <input type=hidden name="SETID"    value="$setid">
                   1046:         <input type=hidden name="PSETID" value="$psetid">
                   1047:         <input type=hidden name="SNUM"     value="$snum">
                   1048:         <input type=hidden name="CAPAID"   value="$capaid">
                   1049:         <input type=submit value="Exit">
                   1050:         </form>
                   1051:       </td>
                   1052:       </tr>
                   1053:   </table>
                   1054:   </td></tr></table>
                   1055:   </body>
                   1056:   </html>
                   1057: AdminMainHTML2
                   1058: }
                   1059: 
                   1060: 
                   1061: sub AdminUserSearchHTML {
                   1062: print <<AdminUserSearchHTML2;
                   1063: <html>
                   1064:   <head>
                   1065:     <title></title>
                   1066:   </head>
                   1067:   <body bgcolor="#ffffff" text="#000000">
                   1068:   <form method=post action="$cgidirurl/$discussurl">
                   1069:   <input type=hidden name="ACTION" value="admin">
                   1070:   <input type=hidden name="CLASS" value="$class">
                   1071:   <input type=hidden name="SNUM" value="$snum">
                   1072:   <input type=hidden name="CAPAID" value="$capaid">
                   1073:   <input type=hidden name="SETID" value="$setid">
                   1074:   <input type=hidden name="PSETID" value="$psetid">
                   1075:   <input type=hidden name="PROBNUM" value="$probnum">
                   1076:   <input type=submit value="<--Back">
                   1077:   </form>
                   1078: 
                   1079:   <form method=post action="$cgidirurl/$discussurl">
                   1080:   <input type=hidden name="ACTION" value="adminusersearchsubmit">
                   1081:   <input type=hidden name="CLASS" value="$class">
                   1082:   <input type=hidden name="SETID" value="$setid">
                   1083:   <input type=hidden name="PSETID" value="$psetid">
                   1084:   <input type=hidden name="SNUM" value="$snum">
                   1085:   <input type=hidden name="CAPAID" value="$capaid">
                   1086:   <input type=hidden name="PROBNUM" value="$probnum">
                   1087:   <table width="400" border=0 cellspacing=0 cellpadding=0>
                   1088:     <tr><td bgcolor="#000000">
                   1089:     <table width="100%" border=0 cellspacing=1 cellpadding=0>
                   1090:       <tr><td bgcolor="blue" colspan=2>
                   1091:         <font size=2 color="#ffffff"><b>User Search</b>
                   1092:         </td>
                   1093:         </tr>
                   1094:       <tr><td bgcolor="#ffffff" colspan=2>
                   1095:         <font size=2>Username: <input type=text size=45 name="usersearch">
                   1096:         </td>
                   1097:         </tr>
                   1098:       <tr><td bgcolor="#ffffff">
                   1099:         <font size=1>User searching allows administrators to search the
                   1100:         message bases for a specified username and display summary
                   1101:         information.
                   1102:         </td>
                   1103:         <td bgcolor="#FFFFFF"><input type=submit value="Search!"></form></td>
                   1104:         </tr>
                   1105:       </table>
                   1106:     </td></tr>
                   1107:   </table>
                   1108:   </body>
                   1109:   </html>
                   1110: AdminUserSearchHTML2
                   1111: }
                   1112: 
                   1113: sub MFNewPostHTML {
                   1114: print <<MFNewPostHTML2;
                   1115: <html>
                   1116: <head>
                   1117:   <title></title>
                   1118: </head>
                   1119: <body bgcolor="#FFFFFF">
                   1120: You have not filled in all of the appropriate message information.  Please
                   1121: go back and fill in the <b>subject</b> and <b>message</b> fields.
                   1122: <br><br>
                   1123: <center>
                   1124: <form method=post action="$cgidirurl/$discussurl">
                   1125: <input type=hidden name="ACTION" value="post">
                   1126: <input type=hidden name="CLASS" value="$class">
                   1127: <input type=hidden name="SETID" value="$setid">
                   1128: <input type=hidden name="PSETID" value="$psetid">
                   1129: <input type=hidden name="SNUM" value="$snum">
                   1130: <input type=hidden name="CAPAID" value="$capaid">
                   1131: <input type=hidden name="PROBNUM" value="$probnum">
                   1132: <input type=submit value="<-- Back">
                   1133: </form>
                   1134: </center>
                   1135: </body>
                   1136: </html>
                   1137: MFNewPostHTML2
                   1138: exit;
                   1139: }
                   1140: 
                   1141: sub MFPostReplyHTML {
                   1142: print <<MFPostReplyHTML2;
                   1143: <html>
                   1144: <head>
                   1145:   <title></title>
                   1146: </head>
                   1147: <body bgcolor="#FFFFFF">
                   1148: You have not filled in all of the appropriate message information.  Please
                   1149: go back and fill in the <b>subject</b> and <b>message</b> fields.
                   1150: <br><br>
                   1151: <center>
                   1152: <form method=post action="$cgidirurl/$discussurl">
                   1153: <input type=hidden name="ACTION" value="post">
                   1154: <input type=hidden name="CLASS" value="$class">
                   1155: <input type=hidden name="SETID" value="$setid">
                   1156: <input type=hidden name="PSETID" value="$psetid">
                   1157: <input type=hidden name="SNUM" value="$snum">
                   1158: <input type=hidden name="CAPAID" value="$capaid">
                   1159: <input type=hidden name="PROBNUM" value="$probnum">
                   1160: <input type=hidden name="REPLYNUM" value="$replynum">
                   1161: <input type=submit value="<-- Back">
                   1162: </form>
                   1163: </center>
                   1164: </body>
                   1165: </html>
                   1166: MFPostReplyHTML2
                   1167: exit;
                   1168: }
                   1169: 
                   1170: 
                   1171: sub InvalidVarsHTML {
                   1172: print <<InvalidVarsHTML2;
                   1173: <html>
                   1174: <head>
                   1175:   <title></title>
                   1176: </head>
                   1177: <body bgcolor="#FFFFFF">
                   1178: you have entered one or more invalid variables.
                   1179: </body>
                   1180: </html>
                   1181: InvalidVarsHTML2
                   1182: exit;
                   1183: }
                   1184: 
1.3     ! albertel 1185: sub BannedMessageHTML {
        !          1186: print <<BannedMessageHTML2;
        !          1187: <html>
        !          1188: <head>
        !          1189:   <title> Access Denied</title>
        !          1190: </head>
        !          1191: <body bgcolor="#FFFFFF">
        !          1192: Your access to the forum has been disabled. Please contact your instructor.
        !          1193: </body>
        !          1194: </html>
        !          1195: BannedMessageHTML2
        !          1196: exit;
        !          1197: }
        !          1198: 
1.1       albertel 1199: sub BadPassHTML {
                   1200: print <<BadPassHTML2;
                   1201: <html>
                   1202: <head>
                   1203: </head>
                   1204: <body bgcolor="#FFFFFF">
                   1205: You have entered an <b>incorrect</b> CAPA ID for this set
                   1206: </body>
                   1207: </html>
                   1208: BadPassHTML2
                   1209: exit;
                   1210: }
                   1211: 
                   1212: sub NotAdminHTML {
                   1213: print <<NotAdminHTML2;
                   1214: <html>
                   1215: <head>
                   1216: </head>
                   1217: <body bgcolor="#FFFFFF">
                   1218: You are not an administrator
                   1219: <br>
                   1220: This operation is not available
                   1221: </body>
                   1222: </html>
                   1223: NotAdminHTML2
                   1224: exit;
                   1225: }
                   1226: 
                   1227: 1;

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>