$Office.Name - $Cabinet.$ID.Name

' $System.Access Login ' If $System.IsPost ' $ID = $Command.Cabinet.FolderOpen ' $System.Redirect $Server?page=CabinetIndex&id=$ID ' Exit ' EndIf $Office.Name - $Cabinet.$ID.Name ' Set $Doc = $Cabinet.Collection.$ID

"$Doc.Subject"

[Modify] [Delete]

Document Property ' If $Doc.Parent = $Cabinet.Root ' Elif $PID ' Else ' EndIf ' $t = $Doc.CTime ' If $Doc.ModifierName ' $t = $Doc.TimeStamp ' EndIf

Document Name $Doc.Subject
Location Under (Root Folder)
Location Under $Doc.Parent.Path Folder
Location Under $Doc.Parent.Path Folder
Created by $Doc.Name $_Doc.Mail.MailTo

Created $t.hour:$t.Minute00 $t.AMPM, $t.Day $t.MONTH, $t.Year ($t.wday)

Last Modified by $Doc.ModifierName $_Doc.ModifierMail.MailTo

Last Modified $t.hour:$t.Minute00 $t.AMPM, $t.Day $t.MONTH, $t.Year ($t.wday)

Keyword ' For Each $Keyword in $Doc.Keywords $Keyword, ' Next

Memo ' If $Doc.Memo ' View $Doc.Memo ' Else
' EndIf

File ' For Each $f in $Doc.Files ' $d = $f.Date ' $t = $f.TimeStamp ' If $f.Type and ($f.SubType != richtext) and ($f.SubType != octet-stream) ' Else ' $MIME.FileName = $f.FileName ' If $MIME.Type ' Else ' EndIf ' EndIf ' Next
$f.FileName ($f.Type/$f.SubType)
$f.FileName ($MIME.Type/$MIME.SubType)
$f.FileName
$t.hour:$t.Minute00 $t.AMPM, $t.Day $t.MONTH, $t.Year

' If ! $Doc.Files.Count
' EndIf

' Sub Footer

' EndSub ' $Footer

' $LogCount = $Doc.Logs.Count ' Inc $LogCount Update History ' For Each $Log in $Doc.Logs ' $t = $Log.TimeStamp ' Next

Date/Time Updated by Activity Log
$t.hour:$t.Minute00 $t.AMPM, $t.Day $t.MONTH, $t.Year $Log.Name
$Log.Text

Date/Time	Updated by	Activity Log
$t.hour:$t.Minute00 $t.AMPM, $t.Day $t.MONTH, $t.Year	$Log.Name	$Log.Text

' $Footer