' If $Guest and ($Mode != modify) ' $System.Access Write Bulletin ' Else ' $System.Access Post Bulletin ' $Guest = 0 ' EndIf ' If $System.IsPost ' $Command.Bulletin.Post ' $System.Redirect $Server?page=$BPage&bid=$BID ' Exit ' EndIf $Office.Name - Posting an Article ' If $AID and $Mode ' Set $Fw = $Bulletin.Articles.$AID ' EndIf
' If $Fw.Board ' Else ' EndIf ' If $Guest ' Else ' EndIf ' If $Mode = follow ' Elif $Mode = modify ' $Find = $System.StrFind $Fw.Subject "(Modified)" ' If ! $Find ' $Caption = "(Modified)" ' EndIf ' Else ' EndIf ' $Files = $Bulletin.Files ' If ! $Files and ($Files != 0) ' $Files = 1 ' EndIf ' $Header = Attachment ' For $i = 1 to $Files ' $Header = "" ' Next
Bulletin Board $Fw.Board.Name (Required)
Bulletin Board (Required)
Postded by
Email
Postded by$Login.Name $_Login.Mail.MailTo   
Title
Message
Title
Message
Title
Message
$HeaderFile $i ' If $Env.IsMac ' EndIf

' If $Mode ' Elif $BID ' Elif $BPage = index ' Else ' EndIf
[Back to Article][Article List][Top Page][Latest Article List][Top Page] [Help]