' $WorkSpace.AccessManage
' Init $WID = $WorkSpace.ID
<!--#include file="LibraryCommon.html"-->
' Call cmHtmlHead
<!--#include file="LibrarySettingMenu.html"-->
' Call cmLoadStyleSheet "setting"
' $CaptionTitle = "運用管理"
' Call cmHead $CaptionTitle 1
</head>
<body>
' Call cmHeaderView 1 $CaptionTitle
<p>
<table width="99%" border="0" cellspacing="0" cellpadding="4">
<tr><td class="active" width="10%" valign="top">
<table width="100%" border="0" cellspacing="0" cellpadding="4">
' If $ID
<tr><td nowrap>
<span class="manageadmin-menu">\\
'  Call cmLink "全般" "mailspace32.png" "$Server?page=ManageAdmin&wid=$WID"
</span>
' Else
<!--#include file="LibraryManageAdminWorkSpace.html"-->
<tr class="selected"><td nowrap>
<span class="manageadmin-menu">\\
'  Call cmImage "mailspace32.png"
全般</span>
' EndIf
</td></tr>
' For Each $ms in $WorkSpace.Mails
'  If $ms.IconType = "URL"
'   $Image = $ms.IconURL
'  Elif $ms.Icon
'   $System.SetParameter Image "$IMG_PATH/icon_mail$ms.Icon$_32.png"
'  Else
'   $System.SetParameter Image "$IMG_PATH/icon_mail1_32.png"
'  EndIf
'  If $ID = $ms.ID
<!--#include file="LibraryManageAdminMail.html"-->
<tr class="selected"><td nowrap>
<span class="manageadmin-menu">\\
<img src="$Image"\\
'   If $Env.IsMSIE
 align="absmiddle"\\
'   EndIf
 width="32" height="32"><b>$ms.Name</b></span>
'  Else
<tr><td nowrap>
<span class="manageadmin-menu">\\
<a href="$Server?page=$Page&wid=$WID&id=$ms.ID"><img src="$Image" border="0"\\
'   If $Env.IsMSIE
 align="absmiddle"\\
'   EndIf
 width="32" height="32">$ms.Name</a></span>
'  EndIf
</td></tr>
' Next
' For Each $fs in $WorkSpace.Forms
'  If $fs.Disable
'   Continue
'  EndIf
'  If $fs.Icon
'   $Image = $fs.Icon
'  Else
'   $Image = "icon_contact32.png"
'  EndIf
'  If $ID = $fs.ID
<!--#include file="LibraryManageAdminForm.html"-->
<tr class="selected"><td nowrap>
<span class="manageadmin-menu">\\
'   Call cmImage $Image
<b>$fs.Name</b></span>
'  Else
<tr><td nowrap>
<span class="manageadmin-menu">\\
'   Call cmLink $fs.Name $Image "$Server?page=$Page&wid=$WID&id=$fs.ID"
</span>
'  EndIf
</td></tr>
' Next
' If ! $WorkSpace.Customer.Disable
'  If $ID = -2
<!--#include file="LibraryManageAdminCustomer.html"-->
<tr class="selected"><td nowrap>
<span class="manageadmin-menu">\\
'   Call cmImage "icon_address32.png"
<b>$WorkSpace.Customer.Name</b></span>
'  Else
<tr><td nowrap>
<span class="manageadmin-menu">\\
'   Call cmLink $WorkSpace.Customer.Name "icon_address32.png" "$Server?page=$Page&wid=$WID&id=-2"
</span>
'  EndIf
</td></tr>
' EndIf
</table>
</td><td width="90%" valign="top" bgcolor="#f8f8f8">
' Call viewMenu $ID
</td></tr>
</table>
</p>
' Call cmChildFooter
</body>
</html>