📄 nb_add.asp

📁 蓝芒3.0A最新所有功能完整破解版

💻 ASP

字号:

<!--#include file="passinc.asp" -->

<%
issave = trim(Request("issave"))
mode = trim(Request("mode"))

if issave = "1" and Request.ServerVariables("REQUEST_METHOD") = "POST" then
	dim nb
	set nb = server.createobject("easymail.NoteBooksManager")
	nb.Load Session("wem")

	if trim(Request("name")) <> "" then
		nb.Add trim(Request("name")), Request("message")
		nb.Save
	end if

	set nb = nothing

	if mode = "saveadd" then
		response.redirect "nb_add.asp?" & getGRSN()
	else
		response.redirect "nb_brow.asp?" & getGRSN()
	end if
end if
%>

<html>

<head>
<title>Corp.Email</title>
<LINK href="images\hwem.css" rel=stylesheet>
</head>

<SCRIPT LANGUAGE=javascript>
<!--
function save_onclick() {
	if (f1.name.value == "")
	{
		alert("Please enter Title.");
		f1.name.focus();
	}
	else
	{
		f1.mode.value = "save"

		if (f1.message.value.length > 10000)
			f1.message.value = f1.message.value.substring(0, 10000);

		f1.submit();
	}
}

function saveadd_onclick() {
	if (f1.name.value == "")
	{
		alert("Please enter Title.");
		f1.name.focus();
	}
	else
	{
		f1.mode.value = "saveadd"

		if (f1.message.value.length > 10000)
			f1.message.value = f1.message.value.substring(0, 10000);

		f1.submit();
	}
}

function back_onclick() {
	location.href = "nb_brow.asp?<%=getGRSN() %>";
}

//-->
</SCRIPT>


<body>
<br>
<br>
<form method="post" action="nb_add.asp" name="f1">
<input type="hidden" name="mode">
<input type="hidden" name="issave" value="1">
<table width="90%" border="0" align="center" cellspacing="0" bgcolor="#EFF7FF" style="border-left:1px #8CA5B5 solid; border-top:1px #8CA5B5 solid;border-right:1px #8CA5B5 solid; border-bottom:1px #8CA5B5 solid;">
  <tr>
    <td colspan=2 style="border-bottom:1px #8CA5B5 solid;" bgcolor="#dbeaf5" height="28"><p align="center"><font class="s" color="#104A7B"><b>Enter</b></font></p></td>
  </tr>
  <tr>
    <td width="16%" height="23" style="border-bottom:1px #8CA5B5 solid; border-right:1px #8CA5B5 solid;"><p align="right">Title&nbsp;:&nbsp;</p></td>
    <td height="23" style="border-bottom:1px #8CA5B5 solid;"><input name="name" size="70" maxlength=124 class="textbox" value=""></td>
  </tr>
  <tr>
    <td style="border-right:1px #8CA5B5 solid;"><p align="right">Content&nbsp;:&nbsp;</p></td>
	<td>
<textarea cols="53" rows="11" wrap="soft" name="message" class="textbox"></textarea>
	</td>
  </tr>
</table>
<P>
<center>
<INPUT id=button1 type=button value=" Save " LANGUAGE=javascript onclick="save_onclick()" class="Bsbttn">
&nbsp;&nbsp;&nbsp;
<INPUT id=button1 type=button value="Append" LANGUAGE=javascript onclick="saveadd_onclick()" class="Bsbttn">
&nbsp;&nbsp;&nbsp;
<INPUT id=button1 type=reset value=" Reset " class="Bsbttn">
&nbsp;&nbsp;&nbsp;
<INPUT id=button2 type=button value="Return" LANGUAGE=javascript onclick="back_onclick()" class="Bsbttn">
</center></P>
</FORM>
<P>&nbsp;</P>
</body>
</html>


<%
	function mReplace(tempstr)
		dim cstr
		cstr = replace(tempstr , """", "'")
		mReplace = replace(cstr , "'", "''")
	end function

	function mmReplace(tempstr)
		mmReplace = replace(tempstr , "'","''")
	end function
%>

💿 文件大小 8676 K

👤 上传用户 MOMO89752118

📂 所属分类 OA系统

🏷️ 相关标签

#3.0 #破解版

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -