📄 ff_editsharefolder.asp
字号:
<!--#include file="passinc.asp" -->
<%
username = trim(request("username"))
foldername = trim(request("foldername"))
dim userweb
set userweb = server.createobject("easymail.UserWeb")
userweb.Load Session("wem")
if trim(request("save")) = "1" and Request.ServerVariables("REQUEST_METHOD") = "POST" then
pw1 = trim(request("pw1"))
if Session("wem") <> username then
userweb.SetPassword username, foldername, pw1
userweb.Save
set userweb = nothing
Response.Redirect "ff_showall.asp?" & getGRSN()
else
set userweb = nothing
Response.Redirect "err.asp?gourl=ff_showall.asp&" & getGRSN()
end if
end if
%>
<HTML>
<HEAD>
<title>Corp.Email</title>
<LINK href="images\hwem.css" rel=stylesheet>
</HEAD>
<body>
<form name="f1" method="post" action="ff_editsharefolder.asp">
<input type="hidden" name="username" value="<%=username %>">
<input type="hidden" name="foldername" value="<%=foldername %>">
<input type="hidden" name="save" value="1">
<br><br><br>
<table width="80%" border="0" align="center" cellspacing="0" bgcolor="#EFF7FF">
<tr bgcolor="#dbeaf5">
<td colspan="2" height="30" style="border-left:1px #8CA5B5 solid; border-top:1px #8CA5B5 solid; border-right:1px #8CA5B5 solid; border-bottom:1px #8CA5B5 solid;"><p align="center"><font class="s" color="#104A7B"><b>Modify Password of Shared Folder (<%
response.write server.htmlencode(username) & "\"
if foldername <> "att" then
response.write server.htmlencode(foldername)
else
response.write "Network Storage"
end if
%>)</b></font></td>
</tr>
<tr bgcolor="#EFF7FF">
<td width="20%" height="28" style="border-bottom:1px #8CA5B5 solid;"><p align="right">Password: </td>
<td style="border-bottom:1px #8CA5B5 solid;">
<input type="password" name="pw1" maxlength="32" class="textbox" size="50"></td>
</tr>
<tr><td colspan="2" bgcolor="#ffffff" align="right"><br>
<input type="submit" value=" Save " class="Bsbttn">
<input type="button" value="Return" class="Bsbttn" onclick="javascript:history.back();">
</td></tr>
</table>
</form>
</BODY>
</HTML>
<%
set userweb = nothing
%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -