📄 edit.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>
<%
dim AttachOnlyImage,AttachMaxSize
dim WExcel1
set WExcel1=server.CreateObject("WExcel.Sheet")
WExcel1.GetAttachLimit AttachOnlyImage,AttachMaxSize
dim WExcel
set WExcel=server.CreateObject("WExcel.System")
dim SheetID,NewRecord
NewRecord="0"
SheetID=Request.Cookies("System")("TableSheetID")
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 RowID,strCaption,strTableType,strTableFile,strDescription,Success
RowID=Request.QueryString("RowID")
Success=WExcel.GetTableEditPage(cint(UserID),cint(SheetID),cint(RowID),strCaption,strTableType,strTableFile,strDescription)
dim TableType,TableTypeChk(2)
TableTypeChk(0)=""
TableTypeChk(1)=""
TableType=1 '缺省选中页式模板。TableType的定义，未填或者1：页式表单；2：行式表单
if strTableType<>"" then
if isNumeric(strTableType) then
TableType=cint(strTableType)
end if
end if
if TableType>2 or TableType<1 then
TableType=1
end if
TableTypeChk(TableType-1)=" checked "
%>
<script ID="clientEventHandlersJS" LANGUAGE="javascript">
<!--
var HasChanged;
function OpenSample(file) {
try
{
window.open (file,'Sample')
}
catch(e)
{
alert('打开示例失败。\n请检查当前浏览器版本，建议使用IE6.0以上版本。')
}
}
function ChangeFile()
{
if(frmData.chkChange.status==true)
frmData.TableFile.disabled =false;
else
frmData.TableFile.disabled =true;
HasChanged=true
}
function AttachLimitPrompt()
{
Prompt.innerText ="注意：模板文件的大小不得超出 " + frmData.AttachMaxSize.value + "K 字节，否则系统拒绝接收。"
}
function LocalDC()
{
if (JTrim(document.frmData.Caption.value)=="")
{
alert("模板名称未填写，请填写。")
return false;
}
if(frmData.chkChange.status==true)
{
var TableFile,ExtName;
TableFile=JTrim(frmData.TableFile.value);
if(TableFile=="")
{
alert("请选择模板文件。");
return(false);
}
else
{
ExtName=TableFile.substr(TableFile.lastIndexOf('.'));
ExtName=ExtName.toLowerCase();
if(ExtName!='.xls' && ExtName!='.doc')
{
alert("文件类型不符合要求，模板文件只能选择 Excel 文件(.xls)或 Word 文件(.doc)。");
return(false);
}
}
}
return true;
}
function Save(target) {
if(LocalDC())
{
SavePrompt();
parent.window.returnValue = true;
document.frmData.target ="SaveArea";
document.frmData.action=target;
document.frmData.submit();
}
}
function SavePrompt()
{
Prompt.innerText ="正在保存......此过程需要花费一点时间，请稍候。"
frmData.btnSave.disabled =true;
frmData.btnCancel.disabled =true;
}
function EnableButton()
{
Prompt.innerText="";
frmData.btnSave.disabled =false;
frmData.btnCancel.disabled =false;
}
function Cancel()
{
if(HasChanged==true)
{
discard=confirm("您已经输入了一些信息，但尚未保存。放弃您所作的输入吗？");
if(discard==true)
{
parent.window.returnValue = false;
parent.window.close();
}
}
else
{
parent.window.returnValue = false;
parent.window.close();
}
}
function HasChange()
{
HasChanged=true;
}
//-->
</script>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>
<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0" style="overflow-x: hidden" onload="return AttachLimitPrompt()">
<form METHOD="post" name="frmData" ENCTYPE="multipart/form-data">
<table width="100%" border=0 CELLSPACING=0 CELLPADDING="0">
<tr height="35">
<td colspan=5>
<b>
修改表单模板
</b>
</td>
</tr>
<tr height=100 valign="top">
<td colspan=5>
<table width="95%" border=0 CELLSPACING="1" CELLPADDING="0">
<tr>
<td bgcolor="#e0e0e0" width="17%">
<p align="left">模板号</p>
</td>
<td width="27%">
<p align="left"><%=RowID%></p>
</td>
<td width="2%">
</td>
<td width="17%">
</td>
<td width="32%">
</td>
</tr>
<tr>
<td bgcolor="#e0e0e0" width="17%">
<p align="left">模板名称<FONT color=red>*</FONT></p>
</td>
<td width="32%">
<p align="left"><input TYPE="input" NAME=Caption style="WIDTH: 162px" value='<%=strCaption%>' maxLength=20 LANGUAGE=javascript onchange="return HasChange()"></p>
</td>
<td width="2%">
</td>
<td bgcolor="#e0e0e0" width="17%">
<p align="left">说明</p>
</td>
<td width="32%">
<p align="left"><input TYPE="input" NAME=Description style="WIDTH: 162px" value='<%=strDescription%>' maxLength=100 LANGUAGE=javascript onchange="return HasChange()"></p>
</td>
</tr>
<tr>
<td bgcolor="#e0e0e0" width="17%">
<p align="left">模板类型</p>
</td>
<td colspan=4>
<table width="100%" border=0 cellPadding=0 cellSpacing=0>
<tr>
<td width="92%">
<p align=left>
<INPUT id=TableType name=TableType value='1' <%=TableTypeChk(0)%> type ="radio">页式模板，用于单条记录，生成页式文档，如：缺陷报告单。
</p>
</td>
<td style="CURSOR: hand;" onclick="javascript:OpenSample('/hcgis/sheet/table20050807.xls')">
<U>示例</U>
</td>
</tr>
<tr>
<td>
<p align=left>
<INPUT id=TableType name=TableType value='2' <%=TableTypeChk(1)%> type ="radio">行式模板，用于导出多条记录，生成行式清单，如：客户名单。
</p>
</td>
<td style="CURSOR: hand;" onclick="javascript:OpenSample('/hcgis/imexport/ExportToTemplate.xls')">
<U>示例</U>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td bgcolor="#e0e0e0" width="17%">
<p align="left">模板文件</p>
</td>
<td width="32%">
<p align="left"><%=strTableFile%></p>
</td>
<td width="2%">
</td>
<td bgcolor="#e0e0e0" width="17%">
<p align="left"></p>
</td>
<td width="32%">
<p align="left">
<INPUT name=chkChange ID=chkChange type=checkbox onclick='return ChangeFile()'>更换模板文件
</p>
</td>
</tr>
<tr>
<td bgcolor="#e0e0e0" width="17%">
<p align="left">新模板文件</p>
</td>
<td colspan=4>
<p align="left">
<input name=TableFile type=file disabled style="width:422px" onclick="window.temp=this.value" onBlur="if (window.temp != this.value) {HasChange();}">
</p>
</td>
</tr>
</table>
</td>
</tr>
<tr height=30 valign=center>
<td colspan=5><p id=Prompt align=center> </p></td>
</tr>
<tr height=40 valign=bottom>
<td colspan="5">
<table width="100%">
<tr>
<td width="20%"></td>
<td width="30%"><input id="btnSave" type="button" value="确定" name="btnSave" style="cursor:hand; WIDTH: 50px; HEIGHT: 24px" LANGUAGE="javascript" onclick="return Save('save.asp')"></td>
<td width="30%"><input id="btnCancel" type="button" 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>
<input TYPE="hidden" NAME="NewRecord" value="<%=NewRecord%>">
<input TYPE="hidden" NAME="RowID" value="<%=RowID%>">
<input TYPE="hidden" NAME="AttachMaxSize" value="<%=AttachMaxSize%>">
<iframe id="SaveArea" name="SaveArea" style="visibility:hidden" width="0" height="0" frameborder="0" src="">
</iframe>
</form>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -