📄 setlistframe.asp
字号:
<!-- #include file = "../include/asphead.asp" -->
<!-- #include file = "../include/function.asp" -->
<%CheckUser()%>
<link href="../include/main.css" rel="stylesheet" type="text/css">
<script src="../include/function.js" type="text/javascript"></script>
<script ID="clientEventHandlersJS" LANGUAGE="javascript">
<!--
function Save()
{
WorkArea.Save();
}
function HasChange()
{
WorkArea.HasChanged=true;
}
function Cancel()
{
if(WorkArea.HasChanged==true)
{
discard=confirm("您已经修改了某些信息，但尚未保存。放弃您所作的修改吗？");
if(discard==true)
{
window.parent.close();
}
}
else
{
window.parent.close();
}
}
function Close()
{
parent.window.close();
}
//-->
</script>
<%
dim WExcel
set WExcel=server.CreateObject("WExcel.Sheet")
dim SheetID
SheetID=Request.Cookies("Temp")("SheetID")
dim Exist
Exist=WExcel.SheetExist(cint(UserID),cint(SheetID))
CheckErr
if Exist=false then
Response.Redirect "/hcgis/notfound.asp?Name=数据表&Depth=2"
end if
dim ViewID,ViewCaption,PublicView,PageSize
ViewID=Request.Cookies("Sheet")("ViewSelect" & SheetID)
if IsEmpty(ViewID) then
ViewID="-1" '表示未指定缺省视图，也未指定任何公共、私有视图
end if
if cint(ViewID)>0 then
Exist=WExcel.ViewExist(cint(UserID),cint(SheetID),cint(ViewID))
CheckErr
if Exist=false then
Response.Redirect "/hcgis/notfound.asp?Name=视图&Depth=2"
end if
end if
WExcel.GetViewInfo cint(UserID),cint(SheetID),cstr(Admin),cint(ViewID),ViewCaption,PublicView,MayManagePublic,PageSize
CheckErr
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>
<%if PublicView="1" and MayManagePublic<>"1" then%>
<BODY>
<table align=center width="80%" border=0 CELLSPACING="1" CELLPADDING="0">
<tr height=200 valign=center>
<td>
当前视图是公用视图，您没有设置、修改公用视图的权限，只有系统管理员、数据表管理员才可设置。您可以将当前视图更换为缺省视图或私有视图，然后再设置。
</td>
</tr>
<tr>
<td>
<input id="btnClose" type="button" value="关闭" name="btnClose" style="CURSOR: hand; HEIGHT: 24px; WIDTH: 65px" LANGUAGE="javascript" onclick="return Close()">
</td>
</tr>
</table>
</BODY>
<%else%>
<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<table width="100%" border=0 align="center">
<tr height="35">
<td>
<%if ViewID=0 then%>
<b>新增视图</b>
<%else%>
<b>修改视图</b>
<%end if%>
</td>
</tr>
<tr height=30>
<td colspan=2>
可选择您希望列出的字段、宽度、左右顺序，以及底行的数值汇总方式。
</td>
</tr>
<tr>
<td>
<table width="95%" border=0>
<tr>
<td width="12%">
<p align="left">名称<FONT color=red>*</FONT></p>
</td>
<td width=26%>
<p align="left">
<input TYPE="input" NAME="ViewCaption" value="<%=server.HTMLEncode(ViewCaption)%>" style="width:93px;" maxLength=20 LANGUAGE="javascript" onchange="return HasChange()">
</p>
</td>
<td width="17%">
<INPUT id=PublicView name=PublicView value='0' type=radio <%if PublicView<>"1" then%> checked <%end if%> <%if MayManagePublic<>"1" then%> disabled <%end if%> LANGUAGE=javascript onchange="return HasChange()">私有
<td>
<td width="17%">
<INPUT id=PublicView name=PublicView value='1' type=radio <%if PublicView="1" then%> checked <%end if%> <%if MayManagePublic<>"1" then%> disabled <%end if%> LANGUAGE=javascript onchange="return HasChange()">公用
<td>
<td width=11%>每页</td>
<td width=1%><INPUT name=PageSize type=text size=3 value="<%=PageSize%>" maxLength=3 LANGUAGE=javascript onchange="return HasChange()"></td>
<td width=14%>条记录</td>
</tr>
</table>
</td>
</tr>
<tr>
<td>
<table width=95% cellspacing=1 bgcolor=999999>
<tr>
<td width="9%" bgcolor=white><b>选择</b></td>
<td width="28%" bgcolor=white><b>名称</b></td>
<td width="20%" bgcolor=white><b>数据类型</b></td>
<td width="14%" bgcolor=white><b>宽度(%)</b></td>
<td width="9%" bgcolor=white><b>顺序</b></td>
<td width="20%" bgcolor=white><b>汇总方式</b></td>
</tr>
</table>
</td>
</tr>
<tr height=245>
<td>
<iframe id="WorkArea" name="WorkArea" style="visibility:visible" width="100%" height="100%" frameborder="0" src="setlist.asp">
</iframe>
</td>
</tr>
<tr>
<td>
<table width=95% cellspacing=1 bgcolor=999999>
<tr>
<td width="9%" bgcolor=white><b>合计</b>
</td>
<td width="21%" bgcolor=white><b><p id=Count></p></b>
</td>
<td width="28%" bgcolor=white><b>总宽度(应为100%)</b>
</td>
<td width="14%" bgcolor=white><b><p id=WidthAmount></p></b>
</td>
<td width="28%" bgcolor=white>
</td>
</tr>
</table>
</td>
</tr>
<tr height=40 valign="bottom">
<td>
<table width="100%">
<tr>
<td width="20%"></td>
<td width="20%"><input id="btnSave" type="button" disabled value="确定" name="btnSave" style="cursor:hand; WIDTH: 50px; HEIGHT: 24px" LANGUAGE="javascript" onclick="return Save()"></td>
<td width="20%"></td>
<td width="20%"><input id="btnCancel" type="button" disabled value="取消" name="btnCancel" style="cursor:hand; WIDTH: 50px; HEIGHT: 24px" LANGUAGE="javascript" onclick="return Cancel()"></td>
<td width="20%"></td>
</tr>
</table>
</td>
</tr>
</table>
</body>
<%end if%>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -