⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 addnew.asp

📁 图书管理系统是用VC++做的有兴趣的可以来共同研究研究
💻 ASP
字号:
<%@language=vbscript codepage=936 %>
<!-- #include file="inc/checkru.asp" -->
<!-- #include file="zylf_Function.asp"--> 
<%
'========================================================================================
' 文 件 名: addnew.asp
' 版    本: 自由岭锋行业专用留言系统1.78 ( LF Message SyStem 1.78 )
' 说    明: 留言发布文件 | 请勿自行修改该处文件,以确保程序正确的执行
' 文件日期: 2005-12-24
' 设 计 者: 疾风之狼
'========================================================================================
' Copyright (C) 2001--2005 自由岭锋. All rights reserved.
' 网    站: http://lingfengnet.com,
' 电子邮件: wfr@zknu.edu.cn
' 联系QQ: 85112407
'========================================================================================

randomize timer
s=1+int(rnd*10000)
man="add"
%>
<!-- #include file="inc/setup.asp" -->
<!-- #include file="inc/sub_inc.asp" -->
<!-- #include file="inc/ip_purview.asp" -->
<html>
<head>
<title><%= lingfengnet_ms_language_title_addnew %></title>
<%  
  call htmlmeta() 
%>
<link rel="stylesheet" href="style/css/<%=lingfengnet_ms_web_css%>.css" type="text/css">
</head>
<body>
<%
call htmltop()
%>
<br>
<%
if lingfengnet_ms_messadmin=0 then
call htmltopg()
%>
<br>
<%
end if
%>
<script language="JavaScript1.2">
<!--
clckcnt = 0;
var maxword = <%=lingfengnet_ms_maxword%>;
function validate(theform) {
	if (theform.username.value==""|| theform.post.value=="" || theform.email.value==""   || theform.reg.value=="" || theform.content.value=="") {
		alert("<%= lingfengnet_ms_language_Warning_addnew_1 %>");
		clckcnt=0;
		return false; }
	if (maxword != 0) {
		if (theform.content.value.length > <%=lingfengnet_ms_maxword%>) {
			alert("<%= lingfengnet_ms_language_Warning_addnew_2 %>"+<%=lingfengnet_ms_maxword%>+" <%= lingfengnet_ms_language_Warning_addnew_3 %>"+theform.content.value.length+"<%= lingfengnet_ms_language_Warning_addnew_5 %>");
			clckcnt=0;
			return false; }
		else { document.form.submit.disabled = true; return true; }
	} else { 
document.form.submit.disabled = true; return true; }
}
function checklength(theform) {
	if (maxword != 0) { message = "<%= lingfengnet_ms_language_Warning_addnew_4 %> "+<%=lingfengnet_ms_maxword%>+" <%= lingfengnet_ms_language_Warning_addnew_5 %>"; }
	else { message = ""; }
	alert("<%= lingfengnet_ms_language_Warning_addnew_6 %> "+theform.content.value.length+" <%= lingfengnet_ms_language_Warning_addnew_5 %>"+message);
}
-->
</script>
<table width="<%=lingfengnet_ms_web_w%>" border="0" cellspacing="0" cellpadding="0" align="center">
  <tr>
    <td class="bgc2"><table width="100%" border="0" cellspacing="1" cellpadding="3">
        <form name="form" method="post" action="save.asp" onsubmit="return validate(this)">
          <tr class="bgc">
            <td width="23%" height="30" align="center"> *<%= lingfengnet_ms_language_addnew_username %></td>
            <td colspan="2" height="30"><input type="text" name="username" maxlength="25" size="25" class="input">
              <%if lingfengnet_ms_messchina=0 then%>
              <%= lingfengnet_ms_language_addnew_username_mes_1 %>
              <%if lingfengnet_ms_ss=0 then%>
              <%= lingfengnet_ms_language_addnew_username_mes_2 %>
              <%end if%>
              <%end if%>
            </td>
          </tr>
          <%if lingfengnet_ms_web_bs=0 then%>
          <tr class="bgc">
            <td width="23%" height="30" align="center"><%= lingfengnet_ms_language_addnew_username_photo %></td>
            <td colspan="2" height="30"><select name=face size=1 onChange="document.images['face'].src='face/' + options[selectedIndex].value;" style="BACKGROUND-COLOR: #ffffff; BORDER-BOTTOM: #000000 1px solid; BORDER-LEFT: #000000 1px solid; BORDER-RIGHT: #000000 1px solid; BORDER-TOP: #000000 1px solid; COLOR: black" >
                <%if lingfengnet_ms_web_bs_lx=0 then%>
                <%for i=1 to 104%>
                <option value="Business/zylf_mess_pho_b_<%=i%>.jpg">头像<%=i%> </option>
                <%next%>
                <%end if%>
                <%if lingfengnet_ms_web_bs_lx=1 then%>
                <%for i=1 to 30%>
                <option value="Individual/zylf_mess_pho_i_<%=i%>.jpg">头像<%=i%> </option>
                <%next%>
                <%end if%>
              </select>
			    <%if lingfengnet_ms_web_bs_lx=0 then%>
                <img src="face/Business/zylf_mess_pho_b_1.jpg" alt=个人形象代表 width="40" height="40" id=face>
				<%= lingfengnet_ms_language_addnew_username_photo_1 %>
                <%end if%>
                <%if lingfengnet_ms_web_bs_lx=1 then%>
                <img src="face/Individual/zylf_mess_pho_i_1.jpg" alt=个人形象代表 width="40" height="40" id=face>
				<%= lingfengnet_ms_language_addnew_username_photo_2 %>
                <%end if%>
			  </td>
          </tr>
          <%end if%>
          <tr class="bgc">
            <td width="23%" height="30" align="center" class="bgc"> *<%= lingfengnet_ms_language_addnew_post %></td>
            <td colspan="2" height="30"><input type="text" name="post" size="25" maxlength="25" class="input">
              <%= lingfengnet_ms_language_addnew_post_mes %></td>
          </tr>
          <tr class="bgc">
            <td width="23%" height="30" align="center">&nbsp;<%= lingfengnet_ms_language_addnew_tel %></td>
            <td class="bgc" colspan="2" height="30"><input type="text" name="tel" size="25" maxlength="25" class="input">
              <%= lingfengnet_ms_language_addnew_tel_mes_1 %>
              <%if lingfengnet_ms_ss=0 then%>
              <%end if%>
              )</td>
          </tr>
          <tr class="bgc">
            <td width="23%" height="30" align="center"> *<%= lingfengnet_ms_language_addnew_email %></td>
            <td class="bgc" colspan="2" height="30"><input type="text" name="email" size="25" maxlength="25" class="input">
            </td>
          </tr>
          <tr class="bgc">
            <td height="30" rowspan="2" align="center">&nbsp;<%= lingfengnet_ms_language_addnew_mess %></td>
            <td width="15%" height="30"><div align="center"><%= lingfengnet_ms_language_addnew_mess_mes_1 %></div></td>
            <td width="62%" height="30"><input type="radio" name="mes_s" value="qq">
              <%= lingfengnet_ms_language_addnew_mess_mes_3 %>
              <input type="radio" name="mes_s" value="msn">
              <%= lingfengnet_ms_language_addnew_mess_mes_4 %>
              <input type="radio" name="mes_s" value="pp">
              <%= lingfengnet_ms_language_addnew_mess_mes_5 %>
              <input type="radio" name="mes_s" value="uc">
              <%= lingfengnet_ms_language_addnew_mess_mes_6 %>
              <input type="radio" name="mes_s" value="yahoo">
              <%= lingfengnet_ms_language_addnew_mess_mes_7 %>
              <input type="radio" name="mes_s" value="no" checked>
              <%= lingfengnet_ms_language_addnew_mess_mes_8 %></td>
          </tr>
          <tr class="bgc">
            <td width="15%" height="30"><div align="center"><%= lingfengnet_ms_language_addnew_mess_mes_2 %></div></td>
            <td width="62%" height="30"><input type="text" name="mess" size="25" maxlength="100" class="input">
            </td>
          </tr>
          <%if lingfengnet_ms_messreg<>0 then%>
          <tr class="bgc">
            <td width="23%" height="30" align="center"> *<%= lingfengnet_ms_language_addnew_att %></td>
            <td colspan="2" height="30"><input type="text" name="reg" size="25" maxlength="25" class="input">
              <%= lingfengnet_ms_language_addnew_att_mes_1 %>
              <%if lingfengnet_ms_messreg=1 then%>&nbsp;<font face="Arial, Helvetica, sans-serif"><b><%=s%></b></font>
              <input name=reg1 type=hidden id="reg1" value="<%=s%>"><%end if%><%if lingfengnet_ms_messreg=2 then%>&nbsp;<%Call GetSafeCode%><%end if%>
            </td>
          </tr>
          <%end if%>
          <tr class="bgc">
            <td height="30" align="center">*<%= lingfengnet_ms_language_addnew_content %></td>
            <td height="30" colspan="2"><textarea name="content" cols="50" rows="6" class="textarea" ></textarea>
&nbsp;[<a href="javascript:checklength(document.form);"><%= lingfengnet_ms_language_addnew_content_mes_1 %></a>]</td>
          </tr>
          <tr align="center" class="bgc">
            <td height="46" colspan="3"><input type="submit" name="Submit" value="<%= lingfengnet_ms_language_addnew_submit %>" class="button" onclick="return clckcntr();">
&nbsp;&nbsp;&nbsp;&nbsp;
              <input type="reset" name="Submit" value="<%= lingfengnet_ms_language_addnew_reset %>" class="button">
            </td>
          </tr>
          <tr class="bgc" valign="middle">
            <td colspan="3" height="45"><div align="center"><%= lingfengnet_ms_language_addnew_mes_con %></div></td>
          </tr>
        </form>
      </table></td>
  </tr>
</table>
<br>
</body>
</html>
<%
call htmlend()
%>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -