' If $Bulletin.Tops
| Latest Article(s) | [Post an Article]
[Search] |
' Set $r = $Bulletin.Articles.WhatsNew $Bulletin.Tops
' For Each $a in $r
' $Icon = browse.gif
' If $a.Files
' $Icon = browse_file.gif
' EndIf
' $t = $a.TimeStamp
$a.Subject | ( $t.hour:$t.Minute00 $t.AMPM, $t.Day $t.month - in $a.Board.Name by $a.Name ) |
' Next
|
| Bulletin Board List |
' Else
Bulletin Board List -
[Post an Article]
[Search] |
' EndIf
' For Each $Board in $Bulletin.Boards
' If ! $Board.Private
' $t = $Board.TimeStamp
$Board.Name | ( $t.hour:$t.Minute00 $t.AMPM, $t.Day $t.month - Last Updated ) |
' Elif $Login
' $GID = $Board.GID
' $Contains = $Groups.$GID.Users.Contains $Login.ID
' If $Contains
' $t = $Board.TimeStamp
$Board.Name (Exclusive to $Groups.$GID.Name) | ( $t.hour:$t.Minute00 $t.AMPM, $t.Day $t.month - Last Updated ) |
' EndIf
' EndIf
' Next
' If ! $Login
| [Display the Group-Exclusive Bulletin Board] |
' EndIf