toolbar.asp

功能齐全的oa系统

<!-- #include virtual="SubRoles/SubRoleRight.asp" -->
<%
Dim Title,List,Parameter, Flag1, Flag2

Title		= "公文归档 "
List = ToolBarList   '"110100"
Parameter	= ""
BaseDir		= "OA/Work/Commessage/PackDocument/"

HasNewMenu = 1
Dim NewMenuNames(6,2)
NewMenuNames(1,1) = "全部显示"
NewMenuNames(1,2) = "显示所有记录"
NewMenuNames(2,1) = "查看"
NewMenuNames(2,2) = "查看选中的记录"
NewMenuNames(3,1) = "新增"
NewMenuNames(3,2) = "新增一条记录"
NewMenuNames(4,1) = "归档"
NewMenuNames(4,2) = "归档"
NewMenuNames(5,1) = "删除"
NewMenuNames(5,2) = "删除选中的记录"
NewMenuNames(6,1) = "查询"
NewMenuNames(6,2) = "查询"
%>
<!-- #include virtual="Templet/Toolbar.asp" -->