VB495 VB虹越公司办公网络邮件收发系统

在经济全球化和信息技术飞速发展的今天，通过邮件收发进行信息传递已经成为主流。目前，基于B/S（Browser/Server）模式的MIS（Management information system）日益成熟，Web已从静态的HTML到动态的网页，使系统的开发、管理和维护变得非常方便。因此，本系统研究并开发了虹越公司办公网络邮件收发程序系统。
《虹越公司办公网络邮件收发系统的设计与开发》是一个综合性的程序设计，涉及到界面、系统、数据库、协议、编码等多个方面的内容。本设计前台采用VB技术,后台数据库采用SQL Server 2000，语言采用VB6.0，主要讲述了邮件系统的注册、登陆、管理、发送和接收邮件等基本功能及设计方法。在系统分析中先后用系统的结构图分析了邮件系统，包括功能流程和功能分析，数据库表格。在整个系统的设计中，详细的展现了用户系统的各个功能模块，菜单的设计等。同时在系统的实现中，给出了实现表单中相应的后台数据库服务，前台功能控件的事件及代码以及界面实现的方法。最后，对系统设计的各个功能做了相应测试，并给出了相关设计页面截面的直观图。 copyright think58

任何区域，只要他在网内就可以进行转发，而不受任何时间的限制。利用电子邮件还可以实现文件的传输、电子杂志的订阅，进行学术讨论，举行电子会议或者查询信息。这是目前最普及也是最方便的通信工具。很多应用程序都附带有电子邮件的发送和接收功能，因此，电子邮件和接受程序的编程变的十分重要。
《虹越公司办公网络邮件收发系统的设计与开发》是采用VB6.0开发的综合性的程序设计。它包括邮件用户的注册、登陆、管理以及邮件的收发。现在，这种电子邮件系统已成为人们生活中不可缺少的重要工具，也是许多商家和组织机构的生命血脉。用户可以通过电子邮件的讨论会进行项目管理，并且有时要根据快速，或洲际的电子邮件信息交换进行重要的决策行动。
1.1 开发概述
 电子邮件(Electronic Mail，E-mail)是利用计算机网络传递的电子媒体信件，它是随着计算机网络出现的，依靠网络的通信手段实现普通邮件信息的传输。虽然电子邮件是在70年代发明的，它却是在80年才得以兴起。70年代的沉寂主要是由于当时使用Arpanet网络的人太少，网络的速度也仅为目前56Kbps标准速度的二十分之一。受网络速度的限制，那时的用户只能发送些简短的信息，根本别想象现在那样发送大量照片；到80年代中期，个人电脑兴起，电子邮件开始在电脑迷以及大学生中广泛传播开来；到90年代中期，互联网浏览器诞生，全球网民人数激增，电子邮件被广为使用。 内容来自think58 [资料来源：THINK58.com]
现在使用电子邮件已经成为日常工作、生活中不可缺少的一部分，关于电子邮件发生的最大变化是基于互联网的电子邮件的兴起。人们可以通过任何联网的计算机在邮件网站上维护他们的邮件帐号，而不是只能在他们家中或公司的联网电脑上使用邮件。因此，需要对已有的传输文件程序以及信息程序进行研究，研制出一套新程序，它可通过电脑网络发送和接收信息，再也没有了以前的种种限制。
随着网络的不间断发展，依靠网络的通信手段实现普通邮件信息的传输，取代了传统的纸上书写、信箱投寄、邮局传送的邮寄方式。运用最为快捷，简洁，方便的电子邮件已成为许多商家和组织机构的生命血脉。
1.2 对电子邮件的现状分析
自从1987年9月，CANET在北京计算机应用技术研究所内正式建成中国第一个国际互联网电子邮件节点，并于9月14日发出了中国第一封电子邮件："Across the Great Wall we can reach every corner in the world.（越过长城，走向世界）"以来，电子邮件服务在我国得到了飞速的发展。至2005年7月，依据中国互联网络信息中心颁布的《第十六次中国互联网络发展状况统计报告》的结果显示，我国网民人数已达1.03亿人，平均拥有1.6个E-mail，平均每周收到5.2封电子邮件（不包括垃圾邮件），发出3.7封电子邮件。同时，这次统计报告还显示，电子邮件服务依旧是除万维网之外，应用最为广泛的一种服务，我国网民对电子邮件的使用率已经达到了91.3%。随着电子商务近几年的飞速发展，现在使用电子邮件已经成为了主流，用户可以随时随地方便的使用它来传送信息，并且电子邮件作为一种新兴的商务手段，也得到了广泛的应用。虽然在电子商务不断发展的同时，还逐渐出现了许多应用技术，如：IP电话、网络会议、留言版、论坛等等。然而电子邮件以其普及适用性、稳定性、易用性、传输内容多样性、相对保密性成为了众多电子商务应用技术中最为普遍和重要的一种应用方式，并受到越来越多的人的青睐。可是，电子邮件作为一种计算机的数字化技术，其方便性和快捷性则非常重要，对设计和开发的邮件收发程序的要求也越来越高，我们都向着这个方向努力着。 copyright think58 [资料来源：www.THINK58.com]
1.3 电子邮件的发展前景
电子邮件系统经过几十年的发展，已经形成了完善的技术体系。邮件服务器系统在保留了电子邮件系统最初的收发邮件、邮件存储等基本功能的同时，融入了最新的计算机与网络技术，使电子邮件系统有了全新的改观 。电子邮件系统应该具备无限的扩展能力，Internet网络的一个特性是变化无常，我们需要应对随时而来的应用尖峰。因此，我们需要电子邮件系统具有无限的可扩展能力，这个能力主要体现在邮件的处理能力和邮件的存储能力上。为了能够使邮件的处理能力可以无限扩展，就需要引入集群和负载均衡技术，使应用平台可以在需要的时候无限扩充，满足长期或临时的业务需要。为了便于邮件存储，需要高性能的邮件存储解决方案。
总之，电子邮件是一项系统工程，需要网络、数据存储、数据库、操作系统等技术的支持；它现在已经演变成为一个更加复杂并丰富得多的系统，可以传送声音、图片、图象、文档等多媒体信息，以至于如数据库或帐目报告等更 think58好，好think58 [来源：http://www.think58.com]

一个计算机系统。系统的硬件是一个高性能、大容量的计算机。硬盘作为信箱的存储介质,在硬盘上为用户分一定的存储空间作为用户的“信箱”，每位用户都有属于自己的—个电子信箱。并确定—个用户名和用户可以自己随意修改的口令。存储空间包含存放所收信件、编辑信件以及信件存盘三部分空间,用户使用口令开启自己的信箱,并进行发信、读信、编辑、转发、存档等各种操作。系统功能主要由软件实现。
3) 电子邮件的通信是在信箱之间进行的。用户首先开启自己的信箱，然后通过键入命令的方式将需要发送的邮件发到对方的信箱中。邮件在信箱之间进行传递和交换,也可以与另—个邮件系统进行传递和交换。收方在取信时，使用特定账号从信箱提取。
3 系统设计
3.1 模块的划分与功能设计
通过对用户需求调研并进行了分析，确定邮件收发系统的功能模块主要划分为三部分：用户管理、邮件管理、邮件收发。
各模块的具体功能设计如下：
1）用户管理：
包括用户注册，用户修改密码，对注册用户进行权限设定，对注册用户的添加和删除等，对于一个完善的电子邮件系统来说，用户管理是很重要的，通过它可以对文件、信件、用户资料等加以保密。
2）邮件管理：
包括对邮件的移动，邮件修改，邮件删除等。这个是电子邮件最基本应该具有的功能，使用户很方便的使用和管理自己的邮件，同时也节省了很多空间，如今，网络上垃圾邮件非常多，控制和删除便显得由为重要了。 本文来自think58

3）邮件的发送：
用户运行该程序后，可以设置：收件人地址、寄件人地址、发送邮件的标题，发送邮件的正文、附件。
4）电子邮件的接收：
运行电子邮件接收程序后，就能够很轻松的查看邮件。邮件中将显示发件人、主题、内容和发送时间以及相关的附件等等。此外，该应用程序还能够顺利的浏览多封电子邮件。
接收和发送邮件则是邮件系统最为重要的一个功能模块了，也是人们使用他的真正目的，它很容易的让人们进行通信。
）地址簿（通讯录）管理
系统功能模块设置：
1) 用户注册：未注册用户需注册后才能进入系统。
 操作对象：所有未注册用户。
 浏览对象：所有未注册用户。
 具体操作：注册用户在需填写用户名和密码才能注册。
2) 用户登录：对注册用户和管理员的基本信息进行操作。
 操作对象：系统管理员
 浏览对象：系统管理员
 具体操作：用户使用注册成功的帐户名和密码登陆。
3) 用户管理：合法用户可以查看库存所有用户的信息资料。
 操作对象：注册用户、管理员
 浏览对象：注册用户、管理员

本文来自think58

[资料来源：THINK58.com]

代码如下：
Private Sub Command1_Click()
On Error Resume Next
    Set cnn1 = New ADODB.Connection
    cnn1.ConnectionString = "driver={SQL Server};server=(local);uid=admin;pwd=admin;database=yjDB"
    cnn1.ConnectionTimeout = 30
    cnn1.Open
    rst.Open "select * From youjian where 收信人 ='" + Trim(GetName) + "'", cnn1, adOpenKeyset, adLockOptimistic
        If rst.RecordCount = 0 Then
            Exit Sub
            rst.Close
            cnn1.Close
        End If
        List2.Clear
        List6.Clear
        rst.MoveFirst
        For i = 0 To rst.RecordCount - 1

本文来自think58 [来源：http://www.think58.com]

            List6.AddItem rst.Fields("发信人")
            List2.AddItem rst.Fields(0)
            rst.MoveNext
        Next i
    rst.Close
    cnn1.Close
End Sub
Private Sub Command10_Click()
If List7.Text = "" Then Exit Sub
On Error Resume Next
i = MsgBox("是否确定要删除该邮件？", VBYesNo, "提示")
If i = VBYes Then
 Set cnn1 = New ADODB.Connection
    cnn1.ConnectionString = "driver={SQL Server};server=(local);uid=admin;pwd=admin;database=yjDB"
    cnn1.ConnectionTimeout = 30
    cnn1.Open
    rst.Open "select * From youjian where 邮件编号 ='" + Trim(List7.Text) + "'ORDER BY '发送日期'", cnn1, adOpenKeyset, adLockOptimistic
            rst.Delete think58好，好think58 [版权所有：http://think58.com]
        MsgBox "删除成功！", , "提示"
    rst.Close
    cnn1.Close
Else
Exit Sub
End If
End Sub
3.10 通讯录
通讯录管理包括联系人的新增、删除、取消及联系人的姓名、邮箱、联系电话、备注等详细信息，然后再将新的数据写入数据库。
 
图10 用户管理功能图
代码如下：
                  
3.11 系统功能界面演示
3.11.1用户注册功能界面演示
未注册用户在登录界面中点击“注册”，然后系统跳转到注册界面，在注册界面中未注册用户在“用户名”栏中填入“yy”,点击“检测该用户名是否可用”按钮，系统显示该“用户名可以使用”，说明这个用户与系统用户名没有重复，可以使用。然后输入密码“123”与确认密码“123”，最后按“注册新用户”，这时候在系统中就生成了一个名为“yy”的用户。
 
图11 用户注册界面图 copyright think58 [来源：http://www.think58.com]

接着进入登录界面，输入注册的用户名，密码，如图： think58

图12 登录界面图 [资料来源：http://THINK58.com]

3．11.2邮件管理功能界面演示
在通过注册、登陆后进入到主界面，可进行管理。这里可以很清楚的看到各个已发送邮件的信息情况，当中可以对邮件进行管理，包括邮件删除，邮件转移等。在运行到上个界面时点击“邮件管理”进入到如下界面： 内容来自think58

结    论 内容来自think58 [版权所有：http://think58.com]

通过查找资料，老师的指导，和同学的帮助，最后终于完成了一个比较简单的程序。通过本次毕业设计，体验到了软件开发过程中所有需要完成的工作。并切身的体验了一下把理论知识应用到实践的过程。
但是由于毕业设计时间较短，所以该系统存在许多不尽如人意的地方，比如界面设计与风格不太美观，性能不够完善，对毕业设计（论文）具体步骤相关信息考察不够等多方面问题，这些都有待进一步改善。
在系统开发的过程中，遇到了很多问题，有语法的也有逻辑的，通过请教老师和同学，问题都得到了解决，同时也让我深刻体会自己在这方面的不足。我深深地明白了软件设计的重要性，由于软件开发前期设计的不规范，导致在代码编写时走了许多弯路，为了符合系统功能的要求，对数据库改动了许多次。作者有了这次宝贵的经验，在今后的工作和学习中对系统中未能解决的问题将做进一步的完善，深入对VB6.0和数据库的学习。
通过本次实践，懂得实践的重要性，要把平时积累的知识应用到实际的编程中，以后将改善自身在学习上不足，多参加实践，为以后的学习和工作打下良好基础。 [来源：http://think58.com]

参考文献 think58 [资料来源：http://think58.com]

[1] Simon Robinson, K.Scott Allen等.VB6.0高级编程[J].北京：清华大学出版社,2002。
[2] Tom Archer.VB6.0技术内幕[M].北京：清华大学出版社,2002。
[3] 沉舟.Microsoft.NET编程语言VB6.0[M].北京：希望电子出版社,2001。
[4] 罗军舟,黎波涛,杨明等.TCP/IP 协议及网络编程技术[M].北京: 清华大学出版,2004。
[5] Tim Parker.TCP/IP 协议及网络编程技术[M].北京: 机械工业出版社,2004。
[6] 周存杰.Visual VB6.0.NET网络核心编程[M].北京：清华大学出版社,2002。
[7]李佳生.VB6.0编程技巧典型案例解析[M].北京：中国电力出版社,2005。
[8]云颠工作室Visual VB6.0中文版全面剖析[M].北京：中国水利水电出版社,2003。 think58.com