大学生社团管理系统.docx

《大学生社团管理系统.docx》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、.皖西学院社团管理系统学生姓名：汤长江周子坤薛伟彭年专业班级：信息与计算科学1001班学院名称：金融与数学学院指导老师：范祥林.绪论大学生社团以“繁荣校园文化，打造社团品牌，推进素质拓展，服务广大同学”为宗旨，以实现大学学生社团的自我管理、自我监督、自我发展为目标，通过多层面组织引导学生社团活动，进行能力培养，提高大学生思想觉悟，增强大学生的综合素质。数据库的设计本系统是单机版的系统，使用的是SQLserver2008数据库。数据库中共有成员表、活动表、用户表、社团表、社团基本情况表。数据库名：皖西学院社团管理系统表名：活动表表名：成员表序号列名数据类型长度小数位标识主键外键允许默认值说明

2、1xhvarchar500是空否2xmvarchar500是3xbvarchar500是4pswvarchar500是5stmcvarchar500是6zwvarchar500是7lxdhvarchar500是序号列名数据类型长度小数位标识主键外键允许默认值说明空1hdmcvarchar200是否2ssstvarchar200是3xgnrvarchar500是4hdsjvarchar200是表名：社团表表名：社团基本情况表表名：用户表序号列名数据类型长度小数位标识主键外键允许默认值说明空1uidvarchar500是否2idvarchar500是3mkvarchar500是4pswvarc

3、har500是序号列名数据类型长度小数位标识主键外键允许默认值说明空1stmcvarchar200是否2stcsrvarchar200是3stfzrvarchar200是4clrqvarchar200是序号列名数据类型长度小数位标识主键外键允许默认值说明1stgsvarcharMAX0空是2hyfsvarcharMAX0是系统总体功能结构皖西学院社团管理系系社成活统团员动设相相相置关关关社退社社社成成活活团出团团团员员动动部系部信信信信信信基统基息息息息息息本本设查设查设查情况情况置询置询置询主程序窗体设计（1）实现目标程序启动后，在“系统登录”界面验证操作员密码后，将进入主程序界面。主程

4、序界面主要实现如下功能：（1）可通过菜单和工具栏快速选取项目，调用相应子程序。（2）在窗口显示前，根据登录界面中的权限代码来设置不同用户可以使用不同的功能模块。主程序界面如下：.登陆界面如下：主要代码如下：stringname,psw,check_ddlb_1intli_nname=trim(sle_1.text)psw=trim(sle_2.text)check_ddlb_1=trim(ddlb_1.text)ifname=""orpsw=""then..elsemessagebox("错误提示","用户或密码不能为空")choosecasecheck_ddlb_1case"管理员"s

5、electcount(*)into:li_nfromloginwheremk='管理员'andid=:nameandpsw=:psw;ifli_n=1thenelseopen(w_demo1)w_demo1.changemenu(m_main)close(parent)messagebox("错误提示","无此管理员"+string(li_n))endifcase"成员"selectcount(*)into:li_nfromloginwheremk='成员'andid=:nameandpsw=:psw;ifli_n=1thenelseopen(w_demo1)w_demo1.chang

6、emenu(m_main2)close(parent)messagebox("错误提示","无此成员")endchooseendifendif修改密码界面如下：..主要代码如下：stringls_xh,ls_mm,ls_a,ls_bintli_nls_xh=trim(sle_1.text)ls_mm=trim(sle_2.text)ls_a=trim(sle_3.text)ls_b=trim(sle_4.text)ifls_xh=""orls_mm=""thenmessagebox("提示","用户名和密码不能为空")elseselectcount(*)into:li_nfromadmi

7、nwhereid=:ls_xhandpsw=:ls_mm;ifli_n=0thenmessagebox("警告","用户或密码错误")elseifls_a<>ls_bthenmessagebox('提示','新密码不一致，请重新输入')elseifli_n<>0andls_a=ls_bthenmessagebox("提示","修改成功")updateloginsetpsw=:ls_bwhereid=:ls_xh;comm