📄 signatureeditfrm.asp
字号:
<%
'功能：
%>
<!--#include file="../inc/Secure.asp"-->
<!--#include file="../inc/conn.asp"-->
<!--#include file="../inc/Const.asp"-->
<%
'------------------------------------------------设置参数
LoginID=trim(session("LoginID")) : if LoginID="" then LoginID=0 '当前用户ID
'------------------------------------------------
%>
<html>
<head>
<title>iWebOffice2003——私章管理</title>
<link rel='stylesheet' type='text/css' href='../css/main.css'>
<script src="../js/user_select.js"></script>
<script language=javascript>
function Check(theForm){
if (theForm.MarkName.value == ""){
alert("请输入印签名.");
theForm.MarkName.focus();
return (false);
}
if (theForm.UserID.value == ""){
alert("请选择使用人.");
return (false);
}
return (true);
}
function ConfirmDel(FileUrl){
if (confirm('是否确定删除该印签！')){
location.href=FileUrl;
}
}
function selectmanager(form){
userid=SelectUser()
if (userid) {
form.UserID.value=userid.split("_")[0]
form.UserName.value=userid.split("_")[1]
}
}
</Script>
</head>
<body bgcolor="#ffffff">
<%
Dim mSignatureID
mSignatureID = CInt(Request("SignatureID"))
mSql="select * From tbioaOffice_Signature where SignatureID = " & mSignatureID
Set Rs = Server.CreateObject("ADODB.RecordSet")
Rs.Open mSql,oConn,1,1
If Not Rs.Eof then
%>
<form name="webform" method="post" enctype="multipart/form-data" action="SignatureEdit.asp" onsubmit="return Check(this)">
<input type="hidden" name="SignatureID" value="<%=Rs("SignatureID")%>">
<table border=0 cellspacing='1' cellpadding='2' width=100% align=center class=tab>
<tr>
<td colspan=2 nowrap class="tdtop2"><img src="../images/icon_title.gif" align=left>修改印章</td>
</tr>
<tr>
<td nowrap align=center class="td2" width=64>印签名称</td>
<td class="td1" width="90%"><input type="text" name="MarkName" size="50" maxlength="32" class="input" value="<%=RS("MarkName")%>"></td>
</tr>
<tr>
<td nowrap align=center class="td2" width=64>印签文件</td>
<td class="td1"><input type="file" name="MarkFile" size="50" maxlength="60" class="input"></td>
</tr>
<tr>
<td nowrap align=center class="td2" width=64>使用密码</td>
<td class="td1" width="90%"><input type="PassWord" name="PassWord" size="50" maxlength="32" class="input" value="<%=RS("PassWord")%>"></td>
</tr>
<%if returnqx(0620) then%>
<tr>
<td nowrap align=center class="td2" width=64>使用人</td>
<td class="td1">
<input type=hidden name="UserID" value="<%=RS("UserID")%>">
<input type=text name="UserName" value="<%=GetUsername(RS("UserID"))%>" class=input disabled>
<input TYPE="button" class="button0" value="选择" name="select" onclick="selectmanager(webform)" onmouseout=className="button0" onmouseover=className="button1">
</td>
</tr>
<%else%>
<input type=hidden name="UserID" value="<%=RS("UserID")%>">
<%end if%>
<tr>
<td colspan=2 class="tdBottom" nowrap>
<input type="submit" name="Edit" value="修 改" class="button0" onmouseout=className="button0" onmouseover=className="button1">
<input type="button" name="Del" value="删 除" onclick="javascript:ConfirmDel('SignatureDel.asp?SignatureID=<%=Rs("SignatureID")%>');" class="button0" onmouseout=className="button0" onmouseover=className="button1">
<input type="reset" name="Reset" value="重 填" class="button0" onmouseout=className="button0" onmouseover=className="button1">
<input type="button" name="Return" value="返 回" onclick="javascript:history.back();" class="button0" onmouseout=className="button0" onmouseover=className="button1">
</td>
</tr>
</table>
</form>
<%
Else
Response.Write "数据库中不存在该标签。<input type='button' value='返 回' onclick='javascript:history.back();'"
End If
Rs.Close
Set Rs=Nothing
%>
</body>
</html>
<%'释放对象变量
<!--#include file="../inc/conn_close.asp"-->
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -