add.asp

来自「OA最新破解2008版全新破解希望大家用着舒服」· ASP 代码 · 共 93 行

ASP

93 行

<%
if instr(session("flag"),"72")=0 then
   response.redirect "../login.asp"
   response.end
end if
%>
<!--#include file="conn.asp"-->
<HTML>
<HEAD>
<META http-equiv="Content-Type" content="text/html; charset=gb2312">
<LINK rel="stylesheet" type="text/css" href="../style.css">
</HEAD>
<BODY bgcolor="#FFFFFF" marginheight=0 marginwidth=0 leftmargin=0>
<script LANGUAGE="JavaScript">
function check()
{
  if (document.Form1.title.value=="")
     {
      alert("请输入信息标题！")
      document.Form1.title.focus()
      document.Form1.title.select()
      return
     }
  if (document.Form1.typeid.value=="")
     {
      alert("请选择信息分类！")
      document.Form1.typeid.focus()
      document.Form1.typeid.select()
      return
     }
  if (document.Form1.content.value=="")
     {
      alert("请填写信息内容！")
      document.Form1.content.focus()
      document.Form1.content.select()		
      return
     }
     document.Form1.submit()
}
</SCRIPT>
<FORM  method="POST" action="savenews.asp" name="Form1">
<CENTER>
<TABLE border="0" cellspacing="0" width="625" cellpadding="4">
  <TR height=30>
    <TD colspan=2 bgcolor="#e8f4ff"><b>商务服务数据录入</b></TD>
  </TR>
  <tr><TD height=20></TD></TR>
  <tr>
    <TD width=40%>标题：</TD>
    <TD><INPUT name="title" type="TEXT" size=60></TD>
  </TR>
  <TR> 
    <TD>分类：</td>
    <TD> 
    <select name="typeid">
    <option value="" selected>--选择类别--</option>
    <%dim rs,sql,sel
      set rs=server.createobject("adodb.recordset")
      sql="select * from type"
      rs.open sql,conn,1,1
      do while not rs.eof
      if typeid=cstr(rs("typeid")) then
         sel="selected"
      else
         sel=""
      end if
      response.write "<option " & sel & " value='"+CStr(rs("typeID"))+"' name=typeid>"+rs("type")+"</option>"+chr(13)+chr(10)
      rs.movenext
      loop
      rs.close
    %> 
    </select>
    </TD>
  </TR>
  <TR> 
    <TD>内容：</TD>
    <TD><textarea rows="10" name="content" cols="70"></textarea></TD>
  </TR>
  <TR> 
    <TD>摘自或发布人：</TD>
    <TD><INPUT name="nform" type="text" size=20></TD>
  </TR>
  <TR>
    <TD colspan=2 align="center" bgcolor="#e8f4ff" height=30>
    <input type="button" value="添&nbsp;&nbsp;加" onclick=check()>&nbsp;&nbsp; &nbsp; &nbsp;  
    <input type="button" value="返&nbsp;&nbsp;回" onclick=history.go(-1) >
    </TD>
  </TR>
</TABLE>
</form>
</body>
</html>

add.asp - 源码说明

本页面展示了「OA最新破解2008版全新破解希望大家用着舒服」中的 add.asp 源码文件，采用 ASP 编程语言编写，共 93 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫下载站收录了大量与2008相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

复制代码Ctrl + C

搜索代码Ctrl + F

全屏模式F11

增大字号Ctrl + =

减小字号Ctrl + -

显示快捷键?