asp毕业设计——基于asp+access的科研项目网上申报管理系统设计与实现(毕业论文+程序源码)——项目网上申报管理系统

基于asp+access的科研项目网上申报管理系统设计与实现(毕业论文+程序源码)

大家好,今天给大家介绍基于asp+access的科研项目网上申报管理系统设计与实现,文章末尾附有本毕业设计的论文和源码下载地址哦。需要下载开题报告PPT模板及论文答辩PPT模板等的小伙伴,可以进入我的博客主页查看左侧最下面栏目中的自助下载方法哦

文章目录:

1、项目简介

  1. 随着社会信息化的发展,社会上很多事务的管理也跟着相应发生了根本的变化,科研项目申报管理也跟着发生了变化,以前的管理是一种各地信息分散然后再集中到中央,信息的传送途径是通过简单人工传送,这样使办事效率低。此外,各个分散机构的项目申报在办理后不能及时集中到中央数据中心,不利于管理层的信息统计与决策。基于以上现状,采用先进的信息化管理系统可以解决这些问题。这样就方便了管理层的统一管理和决策,同时提供了工作效率。本系统用于对辖区内单位科研项目申报立项流程的管理,传统模式的管理花费很多的精力,采用信息新技术优化管理手段,强化申报流程,加强项目监管,提高工作效率。各模块对应的功能不同:个人申报模块提供的是面向个人的项目申报与管理功能;推荐单位模块提供的是管理个人申报项目与向卫生厅推荐合适项目的功能;管理中心模块提供的是对各推荐单位推荐上来的项目进行管理并分配专家进行评审,最后根据评审专家对该项目的意见与打分,决定是否对该项目进行立项的功能;评审专家模块提供专家对分配到的项目进行打分与提供专家意见的功能。


2、资源详情

项目难度:中等难度
适用场景:相关题目的毕业设计
配套论文字数:8517个字56页
包含内容:全套源码+配整论文
开题报告、论文答辩、课题报告等ppt模板推荐下载方式:
在这里插入图片描述


3、关键词

Dreamweaver; ACCESS; ASP

4、毕设简介

提示:以下为毕业论文的简略介绍,项目完整源码及完整毕业论文下载地址见文末。

第1章 ASP简介
1.1 Active Server Pages简介
Microsoft Active Server Pages (ASP) 是服务器端的脚本编写环境,通过这种环境用户可用它来创建动态 Web 页或生成功能强大的 Web 应用程序。ASP 页是包括 HTML 标记、文本和脚本命令的文件。ASP 页可调用 ActiveX 组件来执行任务,例如连接到数据库或进行商务计算。通过 ASP,可为用户的 Web 页添加交互内容或用 HTML 页构成整个 Web 应用程序,这些应用程序使用 HTML 页作为用户的客户的界面。
省略

1.2 ASP 的新功能
省略

1.3 ASP页面的结构
ASP的程序代码简单、通用,文件名由.asp结尾,ASP文件通常由四部分构成:
 标准的HTML标记:所有的HTML标记均可使用。
 ASP语法命令:位于<% %>标签内的ASP代码。
 服务器端的include语句:可用#include语句调入其他ASP代码,增强了编成的灵活性。
 脚本语言:ASP自带JaverScript和VBScript两种脚本语言,增加了ASP的编程功能,用户也可安装其他脚本语言,如 Perl、Rexx等。

1.5 ASP 内建对象
Active Server Pages 提供内建对象,这些对象使用户更容易收集通过浏览器请求发送的信息、响应浏览器以及存储用户信息(如用户首选项)。
Application 对象: 可以使用 Application 对象使给定应用程序的所有用户共享信息。
Request 对象: 可以使用 Request 对象访问任何用 HTTP 请求传递的信息,包括从 HTML 表格用 POST 方法或 GET 方法传递的参数、cookie 和用户认证。Request 对象使您能够访问发送给服务器的二进制数据,如上载的文件。
Response 对象: 可以使用 Response 对象控制发送给用户的信息。包括直接发送信息给浏览器、重定向浏览器到另一个 URL 或设置 cookie 的值。
Server 对象: Server 对象提供对服务器上的方法和属性进行的访问。最常用的方法是创建 ActiveX 组件的实例 (Server.CreateObject)。其他方法用于将 URL 或 HTML 编码成字符串,将虚拟路径映射到物理路径以及设置脚本的超时期限。
Session 对象: 可以使用 Session 对象存储特定的用户会话所需的信息。当用户在应用程序的页之间跳转时,存储在 Session 对象中的变量不会清除;而用户在应用程序中访问页时,这些变量始终存在。也可以使用 Session 方法显式地结束一个会话和设置空闲会话的超时期限。
ObjectConection 对象: 可以使用 ObjectConection 对象提交或撤消由 ASP 脚本初始化的事务。

1.6 ASP的主要内置组件
Ad Rotator组件:可用来安指定计划在同一页上自动轮换显示广告,用于WWW上日益重要的广告服务。
Browser Capabilities组件:确定访问WEB站点的用户浏览器的功能数据,包括类型、性能、版本等。
Database Access组件:提供ADO(ActiveX Data Objects)来访问支持ODBC的数据库。
File Access组件:提供对服务器端文件的读写功能。
Content Linking组件:生成WEB页内容列表,并将各页顺序连接,用于制作导航条。
此外,还可安装Myinfo、Counters、Content Rotator、Page Count等组件,用户也可自行编制Active组件,以提高系统的实用性。

1.7 Database Access组件ADO
WWW上很重要的应用是访问WEB数据库,用ASP访问WEB数据库时,必须使用ADO组件,ADO是ASP内置的ActiveX服务器组件(ActiveX Server Component),通过在WEB服务器上设置 ODBC和OLEDB可连接多种数据库:如 SYBASE、ORACLE、INFORMIX、SQL SERVER、ACCESS、VFP等,是对目前微软所支持的数据库进行操作的最有效和最简单直接的方法。
ADO组件主要提供了以下七个对象和四个集合来访问数据库。
Connection对象:建立与后台数据库的连接。
Command对象:执行SQL指令,访问数据库。
Parameters对象和Parameters集合:为Command对象提供数据和参数。
RecordSet对象:存放访问数据库后的数据信息,是最经常使用的对象。
Field对象和Field集合:提供对RecordSet中当前纪录的各个字段进行访问的功能。
Property对象和Properties集合:提供有关信息,供Connection、Command、RecordSet、Field对象使用。
Error对象和Errors集合:提供访问数据库时的错误信息。

1.8 ASP的脚本语言
脚本语言是一种介于HTML和VB、JAVA等高级语言之间的一种语言,它可以和HTML语言混在一起使用,可以用来在浏览器客户端进行程序编制,从而控制浏览器等对象操作。ASP本身不是一种脚本语言,但他却为嵌入HTML的脚本语言提供了运行环境。ASP中常用的脚本语言有VBScript和JavaScript,系统默认语言是VBScript,在系统中,两种脚本语言都有使用。
省略

第二章 运行环境及系统性能需求分析
省略

第三章 科研项目网上申报管理系统的设计
3.1、系统详细功能分析
一、模块划分
系统登陆界面设计
该系统基于互联网b/s模式设计。总体结构图如下图:
在这里插入图片描述

各模块结构设计图如下:
个人申报模块:
在这里插入图片描述

推荐单位模块:
在这里插入图片描述

管理中心模块:
在这里插入图片描述

各模块对应的功能不同:个人申报模块提供的是面向个人的项目申报与管理功能;推荐单位模块提供的是管理个人申报项目与向卫生厅推荐合适项目的功能;管理中心模块提供的是对各推荐单位推荐上来的项目进行管理并分配专家进行评审,最后根据评审专家对该项目的意见与打分,决定是否对该项目进行立项的功能;评审专家模块提供专家对分配到的项目进行打分与提供专家意见的功能。

由于各模块功能设置不一样,为了避免系统权限分配混乱,我们采取的方法是:个人通过网页注册获得进入个人申报模块的用户名与密码(系统通过个人注册时填写的个人身份证号码进行辨别,保证用户的唯一性),进入个人申报模块后的个人将获得申报项目等权限。而管理中心的管理员用户名与密码将由我们直接在系统中进行设置,并提供给卫生厅科教处。确定该管理员人员名单后,将由该管理员在管理中心设置推荐单位与评审专家的用户帐号与密码并提供给相应的负责人。
系统流程图如下:
在这里插入图片描述

3.2、数据库设计与实现
数据库名: 数据库 k.mdb
用户: 项目申报 用户信息修改 退出登陆
管理员 项目管理 项目查询打印 用户信息管理 退出登陆
表 user username password type mingcheng sfz dizi youbian dianhua
表 xiangmu mingcheng xueke shengbaoren jinfei zhuangtai
在这里插入图片描述
在这里插入图片描述
在这里插入图片描述

第四章 科研项目网上申报管理系统的实现
4.1、数据库的连接<%
dim db
set db=server.createobject(“ADODB.connection”)
db.open “dbq=”&server.mappath(“data/k.mdb”)&“;driver={microsoft access driver (*.mdb)};”
4.2、登录界面设计
在这里插入图片描述

<%Response.Buffer=True%>

<style type="text/css">
<!--
.z {
font-size: 12px;
color: #000000;
}
-->
</style>
</head>

<body marginheight="0"  marginwidth="0" topmargin="0" bottommargin="0" >
<table width="700" height="500" border="0" align="center" cellpadding="0" cellspacing="0" class="z">
  <tr>
    <td width="700" align="center" valign="middle">
<%
dim db,strsql,rs
set db=server.createobject("ADODB.connection")
db.open "dbq="&server.mappath("data/k.mdb")&";driver={microsoft access driver (*.mdb)};"
strSql="Select username,password,type From user"
strSql=strSql & " Where username='" & Request.Form("username") & "' And password='" & Request.Form("password") & "'"
Set rs=db.Execute(strSql)
If not rs.eof and not rs.bof Then
Session("username")=rs("username")
session("type")=rs("type")
Session("password")=rs("password")
select case Session("type")
case "管理员" 
      Response.Redirect "admin.asp"
case "个人"
      Response.Redirect "user.asp"
case "所属单位"
      Response.Redirect "user.asp"
case else
      Response.Redirect "index.asp"
end select  

Else
Response.Write "对不起,用户名或密码有误,且不能为空,请<a href='index.asp'>返回</a>重新登录"
End If
%></td>
  </tr>
</table>
<%="VBSCRIPT" CODEPAGE="936"%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>科研项目网上申报管理系统</title>
<style type="text/css">
<!--
.x {
font-size: 12px;
color: #000000;
text-decoration: none;
}
body {
background-image: url(img/bg1.gif);
}
-->
</style>
</head>

<body marginheight="0"  marginwidth="0" topmargin="0" bottommargin="0" >
<table width="760" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td><img src="img/1.jpg" width="760" height="160"></td>
  </tr>
</table>
<table width="760" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
  <tr>
    <td align="center" valign="top"><form name="form1" method="post" action="login.asp">
      <table width="400" border="0" align="center" cellpadding="0" cellspacing="0" class="x">
        <tr>
          <td height="30" colspan="2" align="center" valign="middle">用户登陆</td>
        </tr>
        <tr>
          <td width="40%" align="center" valign="bottom">类型:</td>
          <td align="left" valign="middle"><label>
            <select name="select">
              <option value="管理员">管理员</option>
              <option value="个人" selected>个人</option>
              <option value="所属单位">所属单位</option>
            </select>
          </label></td>
        </tr>
        <tr>
          <td align="center" valign="bottom">账户:</td>
          <td align="left" valign="bottom"><input name="username" type="text" id="username"></td>
        </tr>
        <tr>
          <td align="center" valign="bottom">密码:</td>
          <td align="left" valign="bottom"><input name="password" type="text" id="password"></td>
        </tr>
        <tr>
          <td align="center" valign="bottom"><label></label></td>
          <td height="20" align="left" valign="bottom"><input type="submit" name="Submit" value="用户登陆"> 
            <a href="reg.asp" target="_blank">用户注册</a></td>
        </tr>
      </table>
        </form>
    </td>
  </tr>
</table>
<!--#include file="foot.htm"-->
</body>
</html>

4.3、系统用户注册管理模块
在这里插入图片描述

省略

4.4、项目申报模块
在这里插入图片描述

省略

4.5、用户信息修改模块包括
在这里插入图片描述

省略

4.6项目申报管理及评审模块包括
在这里插入图片描述

 <%="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="Connections/conn.asp" -->
<%
Dim Recordset1
Dim Recordset1_cmd
Dim Recordset1_numRows

Set Recordset1_cmd = Server.CreateObject ("ADODB.Command")
Recordset1_cmd.ActiveConnection = MM_conn_STRING
Recordset1_cmd.CommandText = "SELECT * FROM xiangmu" 
Recordset1_cmd.Prepared = true

Set Recordset1 = Recordset1_cmd.Execute
Recordset1_numRows = 0
%>
<%
Dim MM_paramName 
%>
<%
' *** Go To Record and Move To Record: create strings for maintaining URL and Form parameters

Dim MM_keepNone
Dim MM_keepURL
Dim MM_keepForm
Dim MM_keepBoth

Dim MM_removeList
Dim MM_item
Dim MM_nextItem

' create the list of parameters which should not be maintained
MM_removeList = "&index="
If (MM_paramName <> "") Then
  MM_removeList = MM_removeList & "&" & MM_paramName & "="
End If

MM_keepURL=""
MM_keepForm=""
MM_keepBoth=""
MM_keepNone=""

' add the URL parameters to the MM_keepURL string
For Each MM_item In Request.QueryString
  MM_nextItem = "&" & MM_item & "="
  If (InStr(1,MM_removeList,MM_nextItem,1) = 0) Then
    MM_keepURL = MM_keepURL & MM_nextItem & Server.URLencode(Request.QueryString(MM_item))
  End If
Next

' add the Form variables to the MM_keepForm string
For Each MM_item In Request.Form
  MM_nextItem = "&" & MM_item & "="
  If (InStr(1,MM_removeList,MM_nextItem,1) = 0) Then
    MM_keepForm = MM_keepForm & MM_nextItem & Server.URLencode(Request.Form(MM_item))
  End If
Next

' create the Form + URL string and remove the intial '&' from each of the strings
MM_keepBoth = MM_keepURL & MM_keepForm
If (MM_keepBoth <> "") Then 
  MM_keepBoth = Right(MM_keepBoth, Len(MM_keepBoth) - 1)
End If
If (MM_keepURL <> "")  Then
  MM_keepURL  = Right(MM_keepURL, Len(MM_keepURL) - 1)
End If
If (MM_keepForm <> "") Then
  MM_keepForm = Right(MM_keepForm, Len(MM_keepForm) - 1)
End If

' a utility function used for adding additional parameters to these strings
Function MM_joinChar(firstItem)
  If (firstItem <> "") Then
    MM_joinChar = "&"
  Else
    MM_joinChar = ""
  End If
End Function
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>管理员后台</title>
<link href="img/x.css" rel="stylesheet" type="text/css">
</head>

<body marginheight="0"  marginwidth="0" topmargin="0" bottommargin="0" >
<!--#include file="top.htm"-->
<table width="760" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
  <tr>
    <td align="center" valign="top"><table width="760" border="0" align="center" cellpadding="0" cellspacing="0" class="x">
      <tr>
        <td height="25" colspan="7" align="center" valign="middle">项目管理及评审</td>
        </tr>
      <tr align="center" valign="bottom">
        <td width="15%">项目名称</td>
        <td width="15%">所属学科</td>
        <td width="15%">申报单位/个人名称</td>
        <td width="15%">申请金费</td>
        <td width="15%">申报状态</td>
        <td width="10%">评审</td>
        <td width="10%">删除</td>
      </tr>
      <tr align="center" valign="bottom">
        <td><%=(Recordset1.Fields.Item("mingcheng").Value)%></td>
        <td><%=(Recordset1.Fields.Item("xueke").Value)%></td>
        <td><%=(Recordset1.Fields.Item("shengbaoren").Value)%></td>
        <td><%=(Recordset1.Fields.Item("jinfei").Value)%></td>
        <td><%=(Recordset1.Fields.Item("zhuangtai").Value)%></td>
        <td><A HREF="agai.asp?<%= Server.HTMLEncode(MM_keepURL) & MM_joinChar(MM_keepURL) & "id=" & Recordset1.Fields.Item("id").Value %>">评审</A></td>
        <td><A HREF="adel.asp?<%= Server.HTMLEncode(MM_keepURL) & MM_joinChar(MM_keepURL) & "id=" & Recordset1.Fields.Item("id").Value %>">删除</A></td>
      </tr>

    </table></td>
  </tr>
</table>
<!--#include file="foot.htm"-->
</body>
</html>
<%
Recordset1.Close()
Set Recordset1 = Nothing
%>

4.7、项目查询打印模块
在这里插入图片描述

省略

4.8用户信息管理模块

在这里插入图片描述

致 谢
省略

参考文献
1、尚俊杰 《网络程序设计-ASP(第2版)》 清华大学出版社、北方交通大学出版社,2004年2月
2、徐军、吴玉新 《网站ASP后台解决方案》 人民邮电出版社,2001年1月
3、吴振峰 《网站建设与管理》 高等教育出版社,2005年1月
4、白以恩 《计算机网络基础及应用》 哈尔滨工业大学出版社,2000年1月
5、吴林华 《网站建设与维护》 电子工业出版社,2004年6月
6、丽萍,张后杨,柯新生 《网页编程技术》 清华大学出版社,2004年1月
7、川、徐梅 《ASP动态网页设计实战》 机械工业出版社,2000年11月


5、资源下载

本项目源码及完整论文如下,有需要的朋友可以点击进行下载。如果链接失效可点击下方卡片扫码自助下载。

序号毕业设计全套资源(点击下载)
本项目源码基于asp+access的科研项目网上申报管理系统设计与实现(源码+文档)_asp_BS架构_科研项目网上申报管理系统.zip
  • 0
    点赞
  • 1
    收藏
    觉得还不错? 一键收藏
  • 打赏
    打赏
  • 0
    评论

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包

打赏作者

毕业设计方案专家

你的鼓励将是我创作的最大动力

¥1 ¥2 ¥4 ¥6 ¥10 ¥20
扫码支付:¥1
获取中
扫码支付

您的余额不足,请更换扫码支付或充值

打赏作者

实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值