基于C#+asp.net+sqlserver仪器设备管理系统设计与实现（毕业论文+程序源码）

大家好，今天给大家介绍基于C#+asp.net+sqlserver仪器设备管理系统设计与实现，文章末尾附有本毕业设计的论文和源码下载地址哦。

文章目录：

1、项目简介

1. 文中以某中小型企业的设备管理为例，对设备管理系统的设计与应用进行研究，旨在通过设备管理系统提高内部设备的利用率及实现其最大的经济效益。文中首先对设备管理的现状及其重要性进行了分析，分析实现设备管理信息系统的必要性与可行性。其次针对所需要设备信息，分析设备管理系统流程，设计并开发一套设备管理系统。最后，文章对系统的设计实现过程进行了阐述。
2. 文中详细阐述了各子模块的功能和实现过程，并对系统的核心技术作了特别讲解。从试运行情况来看，系统加强了对于仪器设备的有效管理，提高了管理的效率和科学性，实现了信息资源的共享，达到了建设一个仪器设备管理系统的预定目标。

---

2、资源详情

项目难度：中等难度
适用场景：相关题目的毕业设计
配套论文字数：7883个字24页
包含内容：整套源码+完整毕业论文
资源文件目录简图如下：

---

3、关键词：

设备管理；仪器设备；管理系统

---

4、毕设简介

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

引言
1.1 课题背景
设备管理是一项非常重要的工作。大多数设备管理办法是设备采购进来以后，将设备的基本情况和相关信息登记存档，然后将档案存档。以后档案基本就没人维护，如设备位置变迁、检修情况、设备当前运行状态等信息根本不会体现在设备台帐上，即设备跟踪信息不能及时体现在设备档案上。管理各项材料信息不仅效率低下，而且容易出错，安全性很差。并且在实际操作中，数据的查找和维护都不容易实现，容易发生差错，导致了管理费用增加，服务质量难以得到保证，从而影响企业的竞争力。使用设备管理系统，个人并能随时查询设备当前情况和历史情况，对设备的可靠性分析有直接作用，设备信息管理和出入库记录的快速高校检索，使操作简单安全，提供工作效率和质量。使管理人员从手工计算、统计工作中解脱出来。

1.2 国内外研究现状
省略

1.3 课题研究的意义
与传统管理方式相比较，基于Web的设备管理系统能更加有效地进行信息管理。基于Web的设备管理系统应用Web数据库，对信息数据以数据库形式表示，更容易更新和管理。传统的管理方式往往以表格的形式进行管理，一旦数据过于庞大，要对这些数据进行管理时，就要花费大量的时间，而且很容易出错。对于基于Web的设备管理系统就不会有这样的问题。它利用计算机来处理信息数据的管理和更新，不仅提高了工作效率，减少了脑力和体力劳动，还大大提高了工作的准确性，不易出错。

除此之外，基于Web的设备管理系统还能够及时传递设备信息。在传统的管理方式上，一旦要了解设备的信息时，由于时间和地域等原因的限制，并且人工操作时，难免会有这样那样的疏忽，这样就不能及时地了解设备信息，导致工作不能顺利地进行，严重的还会带来无可挽回的损失。而基于Web的设备管理系统在设备信息传递上则不太会有这样的问题，只要你有权限，就能够通过网络及时了解设备的详细信息。极大地方便了企业的正常运作。

1.4开发环境
硬件环境：硬件平台是指开发与运行所需要的硬件环境，主要包括计算机机型及硬件配置。由于系统是一个小型的管理系统，因此对计算机硬件的要求不高，现在的计算机基本都能胜任
所用的开发软件、应用软件平台及语言：系统在开发时选用了稳定性较强的Windows 和Visual Studio.NET 平台，开发技术是asp.net技术，数据库选用SQL,由于这些软件产品都是Microsoft公司的产品，因此彼此之间的兼容性较好，开发出的应用系统稳定性较高。选择这些开发平台和开发语言和工具，还因为其自身的特点。

1.4.1 数据库的选择
选择SQL作为数据库的理由主要有以下几点：
SQL之所以能够被用户和业界所接受，并成为国际标准，因为它是一个综合的、功能强大而且简捷易学的语言。SQL语言集数据查询、数据操作、数据定义和数据控制功能于一身，其主要特点如下：
（1）一体化
SQL语言风格统一，可以完成数据库活动中的全部工作，包括创建数据库、定义模式、更改和查询数据以及安全控制和维护数据库等，这为数据库应用系统的开发提供了良好的环境。用户在数据库系统投入使用后，还可以根据需要随时修改模式结构，并且不影响数据库的运行，从而使系统具有良好的可扩展性。
（2）高度非过程化
在使用SQL语言访问数据库时，用户没有必要告诉计算机一步一步地“如何”去实现，而只需要描述清楚要“做什么”，SQL语言就可以将要求交给系统，然后由系统自动完成全部工作。
（3）语言简洁
虽然SQL语言功能很强，但它只有为数不多的几条命令，另外，SQL的语法也比较简洁，它是一种描述性语言，很接近自然语言（英语），因此容易学习、掌握。
（4）以多种方式使用
SQL语言可以直接以命令方式交互使用，也可以嵌入到程序设计语言中使用。现在很多数据库应用开发工具（如.net、java、delphi等），都将SQL语言直接融入到自身的语言当中，使用起来非常方便。这些使用方式为用户提供了灵活的选择余地，而且不管是哪种使用方式，SQL语言的语法基本都是一样的。
(5)微软公司的SQL，SQL具有开放性的接口,可以和任何的第三方软件共享数据,而且其具有灵活的扩充方式,完善的管理手段,是首选的数据库。

1.4.2 .NET环境
对于.NET,Microsoft公司自己都没有一个详细确切的定义。但是我们可以这样认为：.NET是Microsoft公司提供的一系列产品的总称。具体说来，.NET由以下几个部分组成：.NET Framework、.NET企业服务器和.NET开发工具。
.NET Framework 是一个高性能的程序运行环境，他提供了具体的服务和技术，支持统一的类库，如Visual Basic、Visual C++、Visual C#等，方便开发人员建立相应的应用程序。
.NET企业服务器是指SQL Server 之类的由.NET Framework应用程序使用的服务器端产品。它们虽然不是由.NET Framework编写成的，但是他们都支持.NET。

为了能够在.NET Framework上运行程序开发，Microsoft公司把Visual Studio进行了升级，并把升级后的产品命名为Visual Studio.NET。这就是.NET开发工具。

1.4.3 ASP. NET
2001年Microsoft公司推出全心的ASP.NET，它抛弃了前面三个ASP的版本都使用的脚本语言，使用Visual Basic.NET 作为它的默认语言。ASP.NET在结构上与前面的版本大不相同，它几乎完全是基于组建和模块化。Web应用程序的开发人员使用这个开发环境可以实现更加模块化的，功能更强大的应用程序。

在ASP.NET中，所有程序依然保存在服务器端，但由服务器编译执行。当第一次执行一个程序时进行编译，当再次执行这个程序时，就在服务器端直接执行它的已编译好的程序代码，因而ASP.NET程序执行的速度有较大的提高。

ASP.NET有较高的效率，提供了很高的重用性，对于实现同样功能的程序，ASP.NET使用的代码比较小。ASP.NET采用全新的编程环境，代表了技术发展的主流方向。从更深层次说，ASP.NET有优势体现在以下几个方面。
（1）效率
ASP.NET是建立在.NET Framework之上的。它可以使用Visual Basic、C++这样的模块程序设计语言，并且它在第一次执行时进行编译，之后的执行不需要重新编译就可以直接运行，所以速度和效率提高很多。
（2）可重用性
ASP.NET可以实现代码与内容的完全分离，使得维护方便。
（3）代码量
在ASP.NET中，程序员只要预先说明，ASP.NET可以自动实现功能。所以相对来说，要实现同样的功能，就可以少写很多代码。

2 系统分析
2.1可行性分析
在技术实现上，系统采用了基于web的仪器设备管理，web技术已经是当今一门成熟的技术，并且基于web的仪器设备管理的开发和维护不需要太多的人力和物理，开发周期短，可灵活部署在任何符合规范的应用服务器上,减少了投资，解决了系统维护升级复杂的问题。

数据库拟采用微软公司的SQL，SQL具有开放性的接口,可以和任何的第三方软件共享数据,而且其具有灵活的扩充方式,完善的管理手段,是首选的数据库系统。

2.2 功能需求
管理系统主要包括两大功能：
（1）用户模块
a)用户信息：用户可以查看自己的基本信息
b)资料修改：用户的基本信息有时候会变化，比如联系电话等，对于这种情况就可以对资料及时修改更新。
（2）设备管理模块
a)设备一览：查看所有的设备。
b)设备的添加和报废：对添加新增设备以及对报废设备的信息进行处理。
c)设备的维修和调拨：对维修中的设备的详细信息进行管理以及对设备的调拨及其信息管理。
d)设备的查询：根据设备名称查询设备，设备的查询使用模糊查询，以尽可能的把符合用户要求的设备显示给用户。

3 系统设计
3.1系统设计原则
系统设计原则如下：
a)实用性
用户能简单、方便地采集基础数据,实现信息共享与交换
b)稳定性
为使系统稳定运行,应采用先进成熟的技术和工具进行开发
c)开放性
利用Web技术,使各局域网能进行分布数据处理,各子系统能在Internet上进行数据处理和信息查询
d)通用性
系统应适用于其他化纤厂的设备管理,具有一定的推广价值;
e)先进性
采用先进的系统分析与开发工具,建立先进的设备管理信息系统。

3.2 系统功能模块

图1 系统功能模块

3.3 数据库的设计
系统数据库共涉及五个数据表：
 用户信息：记录用户密码和资料。
 设备一览：目前所拥有的设备。
 调度设备：记录设备调度详细信息。
 设备维修：设备维修详细信息。
 设备报废：记录报废的设备。

用户信息：记录用户密码和资料。

4 系统功能模块
4.1 用户登录模块
用户登录模块主要是检查用户名和密码是否匹配，并且可以通过“注册”按钮进入注册页面。如果用户的用户名和密码匹配则进入系统；不匹配则转入登录错误页面。在登录错误页面用户可以选择进入登录页面和注册页面。

系统对用户的登录方式采用的是用户名/密码方式，在用户进入系统的时候要求用户输入用户名和密码，并比较两者和数据库中用户名和密码对应。代码如下：

Dim conn As New System.Data.sqlclient.SqlConnection
        Dim cmd As New System.Data.sqlclient.SqlCommand
        Dim objreader As System.Data.sqlclient.SqlDataReader
        conn.ConnectionString = ("SERVER=(local);USER ID=sa;PWD=;DATABASE=atai")
        conn.Open()
        cmd.Connection = conn
        cmd.CommandText = "select * from userlist where username='" + Textusername.Text + " 'and pwd='" + pwd + "'"
        objreader = cmd.ExecuteReader
If objreader.HasRows Then
            Response.Redirect("index.html")
Else
            Response.Redirect("false.htm")
End If
1
2
3
4
5
6
7
8
9
10
11
12
13

但是，使用明文对用户密码进行存储时，很容易被非法使用者识别。因此，先对密码进行哈希后再写入数据库中，让非法使用者不能识别，用户密码相对更为安全，代码入下：

Public Shared Function MD5(ByVal Sourcein As String) As String
      Dim MD5CSP As System.Security.Cryptography.MD5CryptoServiceProvider = New System.Security.Cryptography.MD5CryptoServiceProvider
        Dim MD5Source() As Byte = System.Text.Encoding.UTF8.GetBytes(Sourcein)
        Dim MD5Out() As Byte = MD5CSP.ComputeHash(MD5Source)
        Return Convert.ToBase64String(MD5Out)
    End Function
1
2
3
4
5
6

实现截图：

图2 用户登录

4.2 用户注册模块
用户在注册模块主要是为新用户提供注册，新用户在次填写详细信息进行注册，在注册的时候自动把权限设为普通用户。
在用户注册的时候首先判断用户名是否存在，代码如下：

cmd.CommandText = "select * from userlist where username='" + Textusername.Text + "'"
        objreader = cmd.ExecuteReader
        If objreader.HasRows Then
            '存在
            args.IsValid = False
            Session("username") = Textusername.Text
        Else
            '不存在
            args.IsValid = True
        End If
        conn.Close()
1
2
3
4
5
6
7
8
9
10
11

在用户注册时，为了防止用户粗心，在输入密码时不小心输入错误，因此在用户输入密码后还需要用户再一次输入，通过判断两次输入是否相同来判断用户是否输入错误，相关代码如下：

If Textuserpwd.Text = Textuserpassword.Text Then
            '匹配
            args.IsValid = True
        Else
            '不匹配
            args.IsValid = False
        End If
1
2
3
4
5
6
7

当所有的条件都满足后才会向数据库中写入注册信息，写入数据库的代码如下：

Dim conn As New System.Data.sqlclient.SqlConnection
        Dim cmd As New System.Data.sqlclient.SqlCommand
        Dim objreader As System.Data.sqlclient.SqlDataReader
        conn.ConnectionString = ("SERVER=(local);USER ID=sa;PWD=;DATABASE=atai")
        conn.Open()
        cmd.Connection = conn
        If Textusername.Text = Session("username") Then
        Else
            If Textuserpwd.Text = Textuserpassword.Text Then
                Dim pwd As String = MD5(Textuserpwd.Text)
                cmd.CommandText = "insert into userlist values('" + Textusername.Text + "','" + pwd + "','" + sexchoose.SelectedValue + "','" + position.SelectedValue + "','" + Texttelephone.Text + "',' 0  ')"
                cmd.ExecuteNonQuery()
                Response.Redirect("useraddsuccess.htm")
            End If
        End If
        conn.Close()
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16

实现截图：

图3 用户注册

4.3 设备一览模块
设备一览模块主要是查看目前所拥有的设备。该模块通过DataList控件来处理从数据源读取的数据。DataList控件的分页显示则是通过先根据当前页号Session(“CurrPage”)、分页大小PageSize来计算要显示的记录号范围，然后将数据集中需显示的记录存放到一个临时表tempbook中，再将该临时表绑定到DataList控件实现的，这样就可以显示指定页号的各记录。另外，为了在页面间传递页号值，使用了Session变量CurrPage，当用户单击“上一页”时，将Session(“CurrPage”)减1；当用户单击“下一页”时，将Session(“Currpage”)加1。在nabledwhatbutton()中编写Session（“CurrPage”）的初值和结束处理。

在设备一览页面，可以通过单击“添加设备”来增加新的设备。
在DataList控件中绑定列中，“设备名称”采用超级连接，用户单击可以查看设备的详细信息，通过单击“修改”进入修改设备详细，在修改设备状态时，如果设备状态是维修则转入维修设备添加页面，如果是报废，则进入添加报废设备页面，在添加的同时更改设备一览中该设备的状态为相应状态；单击“删除”删除该设备的所有的信息。

DataList控件的分页显示是通过先根据当前页号Session(“CurrPage”)、分页大小PageSize来计算要显示的记录号范围

有了当前页号Session(“CurrPage”)和分页大小PageSize就可以计算出显示的记录号范围，然后将数据集中需显示的记录存放到一个临时表tempbook中，再将该临时表棒定到DataList控件来实现，这样就可以显示指定页号的个记录，相关代码如下：

Dim tempequipmentlist As DataTable = equipmentlist.Clone()
        Dim i, j As Integer
        For i = (pageno - 1) * pagesize To pageno * pagesize - 1
            If i < 0 Or i > equipmentlist.Rows.Count - 1 Then Exit For
            Dim row As DataRow = tempequipmentlist.NewRow
            For j = 0 To equipmentlist.Columns.Count - 1
                row(equipmentlist.Columns(j).ColumnName) = equipmentlist.Rows(i).Item(j)
            Next
            tempequipmentlist.Rows.Add(row)
        Next
        DataGridshow.DataSource = tempequipmentlist
        DataGridshow.DataBind()
1
2
3
4
5
6
7
8
9
10
11
12

为了在页面间传递页号值，使用了Session变量CurrPage，当用户单击“上一页”时，将Session(“CurrPage”)减1；当用户单击“下一页”时，将Session(“CurrPage”)加1。判断代码如下：

Sub pagechange(ByVal sender As Object, ByVal e As CommandEventArgs)
        Select Case e.CommandArgument
            Case "firstpage"
                Session("currpage") = 1
            Case "prevpage"
                If Session("currpage") > 1 Then
                    Session("currpage") -= 1
                Else
                    Session("currpage") = 1
                End If
            Case "nextpage"
                Session("currpage") += 1
            Case "lastpage"
                Session("currpage") = Session("totalpage")
        End Select
        enabledwhatbutton()
        bindlist(Session("currpage"))
    End Sub
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18

实现截图：

图4 设备一览

4.4 设备调度模块
设备调度模块主要是查看所有处于调度中的设备，和调度设备的调度信息。该模块通过DataList控件处理从数据源读取的数据。绑定列中，“设备名称”采用超级连接，用户单击可以查看设备的详细调度信息，通过单击“修改”进行调度信息的修改；单击“删除”可以删除该设备的调度信息。修改调度信息代码如下：

cmd.CommandText = "insert into allot values('" + Tname.Text + "', '" + Toldteam.Text + "','" + Tnewteam.Text + "', '" + Tolduse.Text + "', '" + Tnewuse.Text + "','" + Ttime.Text + "','" + Tnotation.Text + "')"
        objreader = cmd.ExecuteReader
        objreader.Close()
        cmd.CommandText = "update equipmentlist  set buyteam =  '" + Tnewteam.Text + "',usepeople  = '" + Tnewuse.Text + "'where name = '" + Tname.Text + "' "
        objreader = cmd.ExecuteReader
        objreader.Close()
        cmd.CommandText = "select * from allot  where newteam = '" + Tnewteam.Text + "' and newuse = '" + Tnewuse.Text + "'"
        objreader = cmd.ExecuteReader
        If objreader.HasRows Then
            seccess.Text = "添加成功"
            Tname.Text = " "
            Toldteam.Text = " "
            Tnewteam.Text = " "
            Tolduse.Text = " "
            Tnewuse.Text = ""
            Ttime.Text = ""
            Tnotation.Text = ""
        Else
            seccess.Text = "添加失败"
        End If
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20

实现截图：

图5 调度信息修改

4.5 设备维修模块
设备维修模块主要是查看所有处于维修中的设备，及其详细信息。该模块同样采用了DataList控件来处理从数据源读取的数据。绑定列中，“设备名称”采用超级连接，用户单击可以查看详细的维修信息。通过单击“修改”可以修改设备的维修信息；单击“删除“按钮可以删除该设备的维修信息。对设备维修信息的修改代码如下：

cmd.Connection = conn
        cmd.CommandText = "update badequipment  set badtime =  '" + Tbadtime.Text + "',notation  = '" + Tnotation.Text + "'where name = '" + Tname.Text + "'"
        cmd.ExecuteNonQuery()
        cmd.CommandText = "select * from badequipment  where name = '" + Tname.Text + "' and badtime = '" + Tbadtime.Text + "'"
        objreader = cmd.ExecuteReader
        If objreader.HasRows Then
            seccess.Text = "修改成功"
        End If
1
2
3
4
5
6
7
8

维修信息的删除代码如下：

Dim cmd As New System.Data.sqlclient.SqlCommand
        cmd.CommandText = "delet * from badequipment where name='" + Tname.Text + "'"
        Response.Redirect("badequipment.aspx")
1
2
3

实现截图：

图6 设备维护信息修改

4.6 设备报废模块
设备报废模块主要是查看所有的报废了的设备，及其详细信息。该模块采用了DataList控件来处理从数据源读取的数据。绑定列中，“设备名称“采用了超级连接，用户单击可以查看详细信息。通过单击”修改“可以修改报废设备的信息；用户单击”删除“按钮可以删除该设备的信息。对报废设备信息的修改代码如下：

cmd.CommandText = "update badequipment  set badtime =  '" + Tbadtime.Text + "',notation  = '" + Tnotation.Text + "'where name = '" + Tname.Text + "'"
        cmd.ExecuteNonQuery()
        cmd.CommandText = "select * from badequipment  where name = '" + Tname.Text + "' and badtime = '" + Tbadtime.Text + "'"
        objreader = cmd.ExecuteReader
        If objreader.HasRows Then
            seccess.Text = "修改成功"
        End If
1
2
3
4
5
6
7

实现截图

图7 报废信息修改

4.7 用户信息模块
用户信息模块主要是用户查看自己的详细资料。用户可能因为各种原因自己的资料有所改变，又忘了自己是不是已经对自己的资料进行了更新修改，用户则可以通过用户信息模块查看自己的信息是否正确。在用户登录的时候就首先把用户的信息进行绑定，代码如下：

cmd.CommandText = "select * from userlist where username='" + Textusername.Text + " ' and pwd='" + pwd + "'"
        objreader = cmd.ExecuteReader
        If objreader.HasRows Then
            Session("name") = Textusername.Text
            objreader.Close()
            cmd.CommandText = "select * from userlist where username ='" + Session("name") + "' "
            Dim objadpt As New System.Data.sqlclient.SqlDataAdapter(cmd)
            Dim ds As New DataSet
            objadpt.Fill(ds, "userlist")
            Dim userlist As DataTable = ds.Tables("userlist")
            Session("sex") = userlist.Rows(0).Item(2)
            Session("position") = userlist.Rows(0).Item(3)
            Session("telephone") = userlist.Rows(0).Item(4)
            Session("power") = userlist.Rows(0).Item(5)
在用户查看自己的信息时，把绑定的用户信息显示出来，代码如下：
usernameshow.Text = Session("name")
        sexshow.Text = Session("sex")
        positionshow.Text = Session("position")
        telephoneshow.Text = Session("telephone")
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19

实现截图：

图8 用户信息
4.8 资料修改模块
资料修改模块主要是用户用来修改自己的资料。用户可能因为工作等原因资料有所改变，需要进行修改，即使更新。资料修改模块为用户提供该功能。在用户修改资料后点击修改后，使用对数据库的更新操作来更新用户信息，代码如下：

If Textpwd.Text = Textpwdagain.Text Then
            cmd.CommandText = "update userlist set pwd='" + Textpwd.Text + "',sex='" + sexchoose.SelectedValue + "',position='" + position.SelectedValue + "',telephone='" + Texttelephone.Text + "' where username='" + Session("name") + "'"
            cmd.ExecuteNonQuery()
            Response.Redirect("main.aspx")
        End If
1
2
3
4
5

实现截图：

总 结
省略

参考文献
[1] 吉根林,崔海源.ASP.NET程序设计教程[M].北京:电子工业出版社,2004.8。
[2] 飞思科技产品研发中心.ASP.NET应用开发指南[M].北京:电子工业出版社,2002。
[3] 陈惠珍,陈俊荣.ASP.NET程序设计[M].北京:中国铁道出版社,2003。
[4] Mattew MacDonald.ASP.NET完全手册[M].北京:清华大学出版社,2003。
[5] 金雪云.ASP.NET简明教程[M].北京:清华大学出版社,2003。
[6] 郝刚,袁永刚,齐艳.ASP.NET服务器控件开发技术与实例[M].北京:人民邮电出版社,2005.1。
[7] 熊松明主.ASP.NET标准教程[M].北京:航空工业出版社,2002。
[8] 求是科技.ASP.NET数据库管理系统开发实例导航[M].北京:人民邮电出版社,2005。

致 谢
省略

---

5、资源下载

本项目源码及完整论文如下，有需要的朋友可以点击进行下载