大学生社团管理系统论文.docx
《大学生社团管理系统论文.docx》由会员分享，可在线阅读，更多相关《大学生社团管理系统论文.docx（31页珍藏版）》请在冰豆网上搜索。
大学生社团管理系统论文
课题的研究背景及意义
大学生社团是由高校学生依据兴趣爱好自愿组成，按照章程自主开展活动的学生组织。
“高校学生社团活动是实施素质教育的重要途径和有效方式，在加强校园文化建设、提高学生综合素质、引导学生适应社会、促进学生成才就业等方面发挥着重要作用，是新形势下有效凝聚学生、开展思想政治教育的重要组织动员方式，是以班级年级为主开展学生思想政治教育的重要补充”。
学生社团作为繁荣校园文化、促进学生全面发展的有效载体，锻炼了学生的社会能力，培养了他们乐群互助的合作精神，其地位和作用越来越受到人们的普遍重视。
并且随着我国社会主义市场经济和高等教育的发展，特别是高校大规模扩招，高校学生社团的种类、数量越来越多，作用也越来越大。
学生社团已经成为高校校园文化的一道亮丽的风景线。
但当前我国高校学生社团发展中也存在不少问题，如“数量少”、“活动方式单一”、“资金短缺，物质条件较差”、“管理不规范”等一系列问题。
如何更好地利用大学生社团的组织和活动，将其建设成为进行思想教育的有利阵地、学术探讨思想交流的第二课堂，是高校学生工作的一个重要课题。
正如《中共中央国务院关于进一步加强和改进大学生思想政治教育的意见》所指出，“要加强对社团的领导和管理，帮助大学生社团选聘指导老师，支持和引导大学生社团自主开展活动”。
同时，美国是世界高等教育最发达的国家之一，大学已经成为美国科研的主要基地，承担了全国60%以上的基础研究任务。
而且，美国是一个崇尚组织社团的国家，其社团组织形成可追溯到殖民地时期。
在这些因素的影响下，美国高校的学生社团种类、数量、活动方式等明显多于其他国家高校，其学生社团管理体系也较为健全，形成了一套独特的管理和辅导模式。
美国大学对学生社团一般都积极地予以鼓励与支援。
如美国最有影响力的哈佛大学就拥有600多个学生社团。
美国大学培养出众多的政界、商界、科技界、文艺界领军人物，其中大多数曾是学生社团活动的积极分子，如尼克松、卡特、肯尼迪等都曾是学校社团活动的风云人物。
而且由于中美两国在社会制度和意识形态上的本质区别，使得两国高校的学生社团也有着各自本质的特点。
而通过比较研究，尽可能在厘清各自历史发展沿革、现有发展状状、宏观管理政策、微观运营方面的区别，从而将各自内在的结构性优势与不足进一步明朗化，从而有助于我们借鉴美国高校学生社团的成功经验和运作模式，加强我国高校学生社团的管理，进一步推动学生社团的良性发展。
开发的可行性研究
可行性研究的目的，就是用最小的代价在尽可能短的时间内确定问题是否能够解决。
要达到这个目的，必须分析几种主要的可能解法的利弊，从而判断原定的系统规模和目标是否现实，系统完成后所能带来的效益是否大到值得投资开发这个系统的程度。
因此，可行性研究实质上是要进行一次大大压缩简化了的系统分析和设计的过程，也就是在较高层次上以较抽象的方式进行的系统分析和设计的过程。
系统的可行性分析主要包括技术可行性、经济可行性、操作可行性和法律可行性。
本系统的可行性分析如下：
技术可行性
本系统开发工具使用delphi7.0，使用的语言pascal加上SQL查询语句。
Pascal语言语法严格，结构严密，非常适合我们学生使用。
本系统所使用数据库为access2003，该数据库结构体小，操作简单，易于编程。
此外，本系统没有使用delphi7.0自带的rave报表，因为rave报表一般只能用来制作简单的静态报表，而且在报表格式上设置比较麻烦，用程序来控制尤为困难，而且容易出错，故而本人使用控件导出至EXCEL模板，形成报表，易于格式设置及编辑排版。
由上可以看出利用开发这个系统在技术上是可行的。
经济可行性
从本平台开发的角度出发，平台开发所需资金甚少，在人力方面只需一人大约花三四个月的时间进行设计与实现，而在软硬件方面只需一台计算机（硬件：
CPU＋内存：
512MB＋硬盘：
80G）和相关的软件（WindowsXP+access2003＋0ffice2003）即可。
相对实现这个系统后学校和学生带来的方便和好处，这些经济的投入是可行并值得的。
开发本系统需要一台个人电脑和相应的软件即可，并且开发的时间不是很长。
综上所述，开发该系统在经济上是可以实现的。
操作可行性：
在系统设计和实现前三个星期主要是以看书以及收集有关系统方面的资料为主，接下来就是对系统的分析，做数据库，界面，以及中间的连接。
该系统面向全校师生，用户无需进行培训，只要具备一定的计算机基础知识即可，适用范围比较广，由此可认为该系统在操作性上是可行的。
法律可行性：
这个大学生社团管理系统由本人设计和开发而成，在法律上并未侵害他人权利，无须承担任何法律责任，所以在法律方面开发此系统是完全可行的。
课题需求分析
大学生社团以“繁荣校园文化，打造社团品牌，推进素质拓展，服务广大同学”为宗旨，以实现大学学生社团的自我管理、自我监督、自我发展为目标，通过多层面组织引导学生社团活动，进行能力培养，提高大学生思想觉悟，增强大学生的综合素质。
大学生社团的基本任务（职能）：
1、贯彻、执行校团委关于学生社团活动的任务、方针和措施，并积极主动开展有利于社团发展的工作；
2、处理学生社团的日常事务，巩固、监督、评议社团及社团活动；
3、倡导、组织、监督各社团多层次开展健康向上、丰富多彩的校园文化和社会实践活动，使社团切实丰富同学们的第二课堂生活，提高校园科技文化气氛，形成校园特色文化服务；
4、代表本校所有社团的正当、合法的利益和意志，表达和维护各社团利益，协调学校与社团之间、社团与社团之间、社团与社会之间的关系，为社团活动的开展创造良好的环境。
5、代表本校与其他地区（高校）学生社团进行交流合作。
现在本校有如下社团组织：
音乐坊、吉他协会、心理协会、计算机协会、跆拳道协会、轮滑协会、蓝马协会、读书协会、求是学社、法律援助中心、篮球协会、羽毛球协会、健美操协会、网球协会、书画社、奕仙棋社、极限社团、乒乓球协会、武术协会、舞影随行、英语协会、韩语协会、国防协会、天文社、悠悠球协会等社团。
根据以上情况，该系统总体目标如下:
（1）以真实、准确数据为基础，以先进、有效、合理的管理方法为核心，以现代计算机技术为手段，建设大学生社团管理系统。
（2）提高园内办事效率，社团协会负责人及会员能及时、准确地掌握各种信息，为决策提供有效的依据。
（3）实现内部管理电脑化，实现信息共享。
大学生社团管理系统是一款用于学校社团管理的应用软件，内有简单易用用户界面、功能强大的数据库操作和查询操作，可以直接在上面登记社团资料，包括社团档案登记、社团活动登记，社团会员登记、社团部门登记、社团会费申请、审批等功能。
可以直接在上面查询各种资料，可以按照指定的字段进行查询功能，此外由于delphi的rave报表在制作动态报表上有所欠缺，故而本人导出查询数据到EXCEL指定的模板从而进行打印。
并具有用户权限管理等基本的权限功能。
本软件通用性增强，操作简单，操作工作量小。
数据存储量大，分类清楚，使工作更轻松。
5、数据库的设计
本系统是单机版的系统，使用的是access2003数据库。
数据库中共有用户表、社团部表、会员表、活动表、申请经费表、经费审批表、社团部基本情况表。
1、用户表
字段名称
数据类型
字段长度
允许空否
备注
用户名
文本
10
NO
主键，用户登录名称
口令
文本
6
NO
即密码
权限
文本
1
NO
权限用以限制用户使用软件功能
2、社团部表
字段名称
数据类型
字段长度
允许空否
备注
社团全称
文本
20
NO
主键
社团负责人
文本
8
NO
中文名称最长为4个，英文8个
社团创始人
文本
8
NO
主管单位
文本
20
NO
由学校哪个部门负责监管
成立日期
日期/时间
NO
成立协会日期
社团性质
文本
20
YES
社团经费
货币
NO
供以后协会活动开支
社团简介
文本
20
NO
社团特征码
文本
6
NO
会费申请、查看时来确认。
备注
文本
20
YES
3、会员表
字段名称
数据类型
字段长度
允许空否
备注
会员编号
文本
3
NO
主键
姓名
文本
8
NO
性别
文本
2
NO
系别
文本
10
NO
班级
文本
10
NO
宿舍
文本
20
YES
电话
文本
11
YES
社团部
文本
20
NO
职位
文本
10
YES
会费
货币
货币
NO
加入日期
日期/时间
日期/时间
NO
4、活动表
字段名称
数据类型
字段长度
允许空否
备注
活动名称
文本
20
NO
所属社团
文本
20
NO
相关内容
文本
50
YES
发起人
文本
8
NO
发起时间
日期/时间
NO
备注
文本
50
YES
5、申请经费表
字段名称
数据类型
字段长度
允许空否
备注
申请社团
文本
20
NO
尚有金额
货币
NO
申请金额
货币
NO
申请理由
文本
50
YES
申请日期
日期/时间
NO
6、经费审批表
字段名称
数据类型
字段长度
允许空否
备注
申请部门
文本
20
NO
申请金额
货币
NO
申请原因
文本
50
NO
审批方案
文本
6
NO
审批人
文本
8
NO
审批日期
日期/时间
NO
审批理由
文本
50
YES
7、社团部基本情况表
字段名称
数据类型
字段长度
允许空否
备注
共有协会个数
数字
NO
共有会员个数
数字
NO
共有社团经费
货币
NO
备注
文本
50
YES
系统设计
系统总体功能结构
本课题经过实际的需求分析，采用delphi7.0+access2003技术进行实现，整个系统服务于普通用户、系统管理员两类用户，从操作简便、界面美观、灵活实用的用户要求出发，设计整个系统的功能模块如下图：
大学生社团管理系统
系统模块框图
系统设置
帮助
会员相关
退出系统
注销
修改用户密码
关于
主程序窗体设计
（1）实现目标
程序启动后，在“系统登录”界面验证操作员密码后，将进入主程序界面。
主程序界面主要实现如下功能：
（1）可通过菜单和工具栏快速选取项目，调用相就子程序。
（2）显示系统日期和时间。
（3）在窗口显示前，根据登录界面中的权限代码来设置不同用户可以使用不同的功能模块。
主程序界面如下图所示：
（2）实现过程。
添加新窗体，设置窗体name属性为main，设置窗体Caption属性为“校职工档案管理系统”，保存窗体为mainform.pas。
主要程序代码如下：
计数器的代码：
procedureTfrmmain.Timer1Timer（Sender:
TObject）;
begin
StatusBar1.Panels[0].Text:
='欢迎使用大学生社团管理系统';
statusbar1.Panels[1].Text:
=formatdatetime（'yyyy''年''m''月''d''日''dddd'+'hh:
mm:
ssAM/PM',now）;
end;
功能：
状态栏的第一格显示“欢迎使用大学生社团管理系统”，第二格显示当前系统的日期时间。
显示窗体时执行的代码：
procedureTfrmmain.FormShow（Sender:
TObject）;
begin
ifqx='1'then
begin
frmmain.StatusBar1.Panels[2].Text:
='您为系统管理员，可以使用软件所有功能！
';
end
else
frmmain.StatusBar1.Panels[2].Text:
='您为一般用户，你只可以使用基本功能！
';
ifqx='2'then
begin
frmmain.N5.Enabled:
=false;
frmmain.N9.Enabled:
=false;
frmmain.N10.Enabled:
=false;
frmmain.N13.Enabled:
=false;
frmmain.n22.Enabled:
=false;
end
end;
功能：
当qx这个全局变量值为1时，表示刚才登录的时候是使用了系统管理员，可以使用所有的功能，值为2时，表示刚才是一般用户，只能使用部分功能。
（一）系统设置功能设计
系统设置模块对使用本系统的用户进行用户名、密码、用户身份的验证，确保了系统的安全性。
本模块具有三项功能：
（1）输入用户名和密码登录后，系统统根据用户身份让用户进入不同的界面进行具有权限的用户操作。
分为guest用户，和admin用户，guest只有查看功能，admin具有所有功能。
（2）用户注销，退出用户界面返回登录界面；
（3）系统管理员可以进入设置用户密码界面，可以设置用户表中所有记录的口令和密码字段。
该系统只设置了两个用户，一个超级管理员，一个guest用户。
原因就在于，本系统可能会有很多会员使用，如果用户表中添加很多用户，管理起来不方便。
而且没有这个必要，本系统除了超级管理员可以使用所有功能之外，其它用户只能使用查询功能，所以建太多用户和一个用户几乎没有区别。
所以本系统中没有添加用户这一功能。
1、登录功能实现如下：
模块功能：
输入用户名之后，在用户表中搜索是否有该用户名存在，如果有该用户名存在，则验证密码正确与否，如果密码正确则将其对应的权限赋值给一个变量。
然后显示主界面，隐藏用户登录界面。
主要代码如下：
procedureTfrmlogin.Button1Click（Sender:
TObject）;
begin
try
adoconnection1.Connected:
=true;
adotable1.Filter:
='用户名='''+edit1.Text+'''';
adotable1.Filtered:
=true;
adotable1.Open;
except
application.Terminate;
end;
ifadotable1.RecordCount=1then
begin
passwd:
=trim（adotable1['口令']）;
qx:
=trim（adotable1['权限']）;
ifpasswd=edit2.Textthen
begin
frmmain.show;
edit1.Text:
='';
edit2.Text:
='';
frmlogin.hide;
exit;
end
else
application.messagebox（'请确认密码，注意大小写！
','密码不匹配',mb_ok）;
edit1.SetFocus;
edit2.Text:
='';
end
else
application.MessageBox（'请重新输入用户名！
','用户名不正确！
',mb_OK）;
edit1.SetFocus;
edit1.Text:
='';
edit2.text:
='';
end;
2、修改密码功能实现如下：
模块功能：
输入用户名，系统检查该用户名是否存在，若是存在的话，则验证原密码是否正确，假如正确，则输入新的密码并再次确认，如果两次密码相同，则密码修改成功。
界面包括控件adoconnection和adoquery，连接数据表用户表。
“确定”按钮代码如下：
varusername,pwd:
string;
begin
username:
=edit1.Text;
adoquery1.Close;
adoquery1.SQL.clear;
adoquery1.SQL.Add（'select用户名,口令from用户表'）;
adoquery1.SQL.Add（'where用户名='''+username+''''）;
adoquery1.Open;
if（adoquery1.RecordCount=0）or（edit2.Text<>trim（adoquery1.FieldValues['口令']））
then
begin
showmessage（'该用户不存在或原口令不正确！
'）;
edit1.Text:
='';
edit2.Text:
='';
edit3.Text:
='';
edit4.Text:
='';
edit1.SetFocus;
exit;
end;
if（edit3.Text=''）or（edit3.Text<>edit4.Text）then
begin
showmessage（'密码不能为空或两次密码不一致，请检查！
'）;
edit1.Text:
='';
edit2.Text:
='';
edit3.Text:
='';
edit4.Text:
='';
edit1.SetFocus;
exit;
end;
pwd:
=trim（edit3.Text）;
adoquery1.close;
adoquery1.SQL.Clear;
adoquery1.SQL.Add（'update用户表set口令='''+pwd+''''）;
adoquery1.SQL.Add（'where用户名='''+edit1.text+''''）;
adoquery1.ExecSQL;
showmessage（'更改密码成功！
'）;
edit1.Text:
='';
edit2.Text:
='';
edit3.Text:
='';
edit4.Text:
='';
edit1.SetFocus;
exit;
end;
3、注销功能
该功能比较简单，就是显示出隐藏的登录窗口，关闭主窗体。
4、退出系统
使用application.Terminate，它表示中断程序，退出总系统。
它和close不同，close是关闭指定的窗体。
（二）、社团相关模块
1、社团部基本情况
窗体如下：
该窗体使用控件，adoconnect，adoquery，adotable，label，memo，button，ExcelApplication1，ExcelWorkbook1，ExcelWorksheet1，控件属性设置见程序表单。
该窗体的主要实现思想：
窗体载入时，使用count语句统计出“社团部表”的所有记录数，即协会个数；使用循环累加，得出所有协会费用之和；使用count语句统计出“会员表”中会员个数；读出社团部基本情况表中备注的内容到memo中。
详细代码如下：
vari:
integer;
begin
memo1.Text:
=adotable1.fieldbyname（'备注'）.AsString;//把备注写入到memo中。
adoquery1.close;
adoquery1.SQL.Clear;
adoquery1.SQL.Add（'selectcount（*）as记录数from社团部表'）;
adoquery1.Open;
i:
=adoquery1.fieldbyname（'记录数'）.AsInteger;
adoquery1.close;
adoquery1.sql.clear;
adoquery1.SQL.add（'selectsum（社团经费）as经费from社团部表'）;
adoquery1.open;
label3.Caption:
=inttostr（i）;//读协会个数赋值给label3的caption属性。
label7.Caption:
=inttostr（adoquery1.fieldbyname（'经费'）.AsInteger）;
adoquery1.close;
adoquery1.sql.clear;
adoquery1.SQL.add（'selectcount（*）as人数from会员表'）;
adoquery1.open;
label5.Caption:
=inttostr（adoquery1.fieldbyname（'人数'）.AsInteger）;
close;
end;
此外，本表单还使用到了打印功能，所以在这个表单中就存在报表。
本报表没有使用自带的rave报表，rave报表在格式设置及生成查询报表这一块功能比较弱，所以我使用ExcelApplication控件，把查询结果导出到指定名称的excel表中。
当然在导出之前，是参照excel模板，这样导出的excel文件，部分格式是已经设置好的，还可以自己设置效果然后打印。
实现代码如下：
var
ExcelApp:
TExcelApplication;//用来连接Excel应用程序
ExcelWkbook:
TExcelWorkbook;//工作薄
ExcelWksheet:
TExcelWorksheet;//Excel数据表
i,j:
integer;
begin
adoquery1.close;
adoquery1.SQL.clear;
adoquery1.SQL.Add（'select*from社团部表'）;
adoquery1.open;
ExcelApp:
=TExcelApplication.Create（Application）;//创建Excel应用
ExcelWkbook:
=TExcelWorkbook.Create（Application）;//创建工作薄
ExcelWksheet:
=TExcelWorksheet.Create（Application）;//创建工作表
ExcelApp.Connect;//连接Excel应用程序
excelapp.Visible[0]:
=true;
ExcelApp.WorkBooks.Open（'D:
\大学生社团管理系统\社团部详细表模板.xls',EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,
EmptyParam,EmptyParam,EmptyParam,
EmptyParam,EmptyParam,EmptyParam,
EmptyParam,EmptyParam,EmptyParam,0）;//打开模板文件
ExcelApp.ActiveWorkbook;//设置活动工作簿
Excelapp.ActiveSheet;//设置活动工作表
ExcelWkbook.ConnectTo（ExcelApp.Workbooks[1]）;/
升级会员 