第一篇:MIS战略规划的作用和内容
1.MIS战略规划的作用和内容
作用(1)合理利用信息资源,节省MIS投资;(2)明确MIS的任务;(3)为将来的评估工作提供依据。内容(1)MIS的目标、约束及总体结构;(2)组织的现状;(3)业务流程现状、存在的问题、流程重组;(4)对影响规划的IT发展的预测。
2.MIS战略规划的组织其要点包含成立领导小组、人员培训、规定规划的进度等三个方面。3制定战略规划一般包括以下九个步骤:
(1)确定规划的性质 ; ⑵ 收集相关信息 ;
⑶ 战略分析;⑷ 定义约束条件⑸ 明确战略目标 ; ⑹ 提出总体结构 ;⑺ 选择开发方案 ;⑻ 确定实施进度 ;⑼ 形成文档,并讨论、批准和生效。
4企业系统规划法(BSP)作用确定未来信息系统的总体结构,明确系统的子系统组成和开发子系统的先后顺序;对数据进行统一规划、管理和控制,明确各子系统之间的数据交换关系,保证信息的一致性。5BSP法的优点能保证信息系统独立于企业的组织机构,即使将来企业的组织机构或管理体制发生变化,信息系统的结构体系不会受到太大的冲击。
6BSP法的步骤准备工作 ; 调研 ;定义业务过程 ;业务过程重组 ;定义数据类 ; 定义MIS的总体结构 ;确定子系统开发的先后顺序 ;形成文档、建议书以及开发计划
7U/C矩阵法的六个步骤⑴ 填入“数据类”; ⑵ 填入“功能”;⑶ 标以“U”(Use)或“C”(Create);⑷ 按逻辑关系及发生的顺序,重排各功能;(5)重排数据类,使所有“C”尽可能靠近对角线; ⑹ 分组(如下图所示),结果不唯一。
8关键成功因素法的步骤了解组织目标;识别关键成功因素;识别性能指标和标准;识别测量性能的数据。
9企业流程重组的步骤对现有业务流程进行分析,找出现有流程存在的问题及产生问题的原因;分析每一项活动的必要性;根据企业的战略目标,采用关键成功因素法等,去发现正确的业务流程 9系统开发条件领导重视良好的科学管理基础人员培训技术与装备条件经济条件
10面向对象的开发方法系统调查和需求分析分析问题的性质和求解问题整理问题程序实现
结构化方法SSA&D整体性和全局性
第二篇:人力资源战略规划内容
人力资源战略规划的内容:
从内容上讲,企业人力资源战略规划可分为战略计划和策略规划。战略规划阐述了人力资源管理的原则和目标;策略计划则重点强调了具体每项工作的实施计划和操作步骤。一个完整的人力资源战略规划应包括以下几个方面:
1.总规划
人力资源总规划阐述了人力资源规划的总原则、总方针和总目标。
2.职位(务)编制规划
职务编制规划阐述了企业的组织结构、职位(务)设置、职位(务)描述、职位(务)资格要求等内容。
3.人员配置规划
人员配置规划阐述了企业每个职务的人员数量,人员的职务变动,职务人员空缺数量等。
4.人员需求规划
通过总规划、职位(务)编制规划、人员配置规划,可得出人员需求规划。需求计划中应阐明需求的职位(务)名称、人员数量、希望到岗时间等。
5.人员招聘(供给)规划
人员供给规划是人员需求计划的对策性规划。主要阐述了人员供给的方式(外部招聘、内部招聘等)、人员内部流动政策、人员外部流动政策、人员获取途径和获取实施计划等。
6.培训开发规划
包括了培训开发需求、培训开发内容、形式、考核、管理等内容。
7.人力资源管理政策调整规划
明确规划期内的人力资源政策的调整原因、调整步骤和调整范围等。
8.投资预算
上述各项规划的费用预算。
第三篇:MIS课程设计报告
西安郵電學院
MIS课程设计报告书
(学生学籍管理系统分析设计)
系部名称 : 信息与管理工程系 学生姓名 : 王 鸣
专业名称 : 信息管理与信息系统 班
级 : 信管0402班
时间 :
2006 年 12 月11 日 至
2006
年12 月 22 日
目 录:
一.可行性分析„„„„„„„„„„„„„„„„„„„„„„„„„ 4
二.系统分析部分„„„„„„„„„„„„„„„„„„„„„„„„ 4 1.业务流程图„„„„„„„„„„„„„„„„„„„„„„„„ 5 2.数据流程图„„„„„„„„„„„„„„„„„„„„„„„„ 5 3.功能分析图„„„„„„„„„„„„„„„„„„„„„„„„ 6 4.数据字典„„„„„„„„„„„„„„„„„„„„„„„„„ 7 5.数据加工处理的描述„„„„„„„„„„„„„„„„„„„„ 8 6.管理信息系统流程设想图„„„„„„„„„„„„„„„„„„ 9
三.系统设计部分
1.功能结构图设计„„„„„„„„„„„„„„„„„„„„„„ 9 2.新系统信息处理流程设计„„„„„„„„„„„„„„„„„„ 9 3.输出设计(主要指打印输出设计)„„„„„„„„„„„„„„„ 9 4.存储文件格式设计(数据库结构设计)„„„„„„„„„„„„„ 9 5.输入设计(主要指数据录入卡设计)„„„„„„„„„„„„„„ 12 6.代码设计(职工证号和部门代号等)„„„„„„„„„„„„„„ 14 7.程序设计说明书„„„„„„„„„„„„„„„„„„„„„„ 14
四.系统实施部分
1.程序框图„„„„„„„„„„„„„„„„„„„„„„„„„ 14 2.源程序„„„„„„„„„„„„„„„„„„„„„„„„„„ 18 3.模拟运行数据„„„„„„„„„„„„„„„„„„„„„„„ 71 4.打印报表„„„„„„„„„„„„„„„„„„„„„„„„„ 72 5.系统使用说明书„„„„„„„„„„„„„„„„„„„„„„ 72
五.附录或参考资料设计任务书
信管专业
2004级MIS课程设计任务书
一、设计目的:
通过本次设计,要求同学们能够将所学到的信息系统分析方法与软件设计技术及方法综合运用到实际信息系统的分析与设计中,提高同学们对软件的综合分析与设计能力,主要包括对数据的分析、组织能力,数据的提取、处理能力;软件结构的分析设计,复杂界面与输入输出设计能力;学习常用软件开发工具的使用。
二、设计内容: 学生学籍管理系统:
1、系统需求:
本系统主要是用于学生基本信息的管理。该系统可以完成对学生信息添加、班级管理、查找等操作,能够对学生信息进行方便有效的科学管理。
2、主要功能描述 1)权限管理
主要是用户的等级和权限的划分。分3级管理员,超级用户、只读用户、普通用户,权限可以自定义添加和删除。2)班级管理
添加班级、浏览班级、查询班级。3)学生档案管理
浏览档案、添加档案、查询档案。
4)课程设置:基本课程设置和班级课程设置。
5)成绩管理:考试类型设置、成绩添加浏览和查询。
6)打印报表:可以打印学生的档案和成绩等相关的信息报表。
三、设计要求
结合所学习的系统分析与设计的具体方法,应用程序设计的基本知识和数据库知识进行详细的系统分析设计。具体要求如下:
1、学习进行相对复杂数据的分析与设计,建立合理的数据模型。
2、学习使用VB的数据环境设计器和数据报表设计器进行报表输出设计。
3、学习使用visio工具进行常用软件图形的绘制。
4、进一步熟练进行软件系统的界面设计,深入掌握界面设计元素。
5、提供相应的软件设计报告。报告要求有系统的需求分析、系统流程图、数据流程图、软件结构图、数据库设计说明和软件说明书。
6、提供与设计报告相一致的软件系统。
7、每四人为一个课题组,自由组合,检查相应的小组讨论,讨论结果计入平时成绩。
8、报告书写规范见附件。
四、时间安排(共两周10天)
1、第一周的周一、周二(2天):查阅资料、进行系统的需求分析,要求画出 系统的业务流程图及数据流程图,并设计各类报表的格式。(图书馆)
2、第一周的周三到周五(3天):并进行详细的数据分析,建立数据字典,并进行数据库及数据查询设计。(机房)
3、第二周的周一周二(2天):进行软件结构设计,包括软件功能的划分、输入输出界面的设计。(机房)
4、第二周的周三:(1天):进行输出报表的设计。(机房)
5、第二周的周四:(1天):全面进行系统调试。(机房)
6、第二周的周五:(1天):作业检查,提交报告及设计好的软件。(机房)
五、考查方式
1、考勤20%
2、文档40%
3、程序40%
六、地点
信管系机房正文:(1)可行性分析
计算机管理学生信息的意义:
在各大中小学校,用计算机管理学校的信息已经越来越普遍了。用计算机不但可以提高工作效率,而且还节省了许多人力物力,增强了学校资料的安全性。提高了学校的管理能力,为此,用计算机来管理学校的信息,是非常必要的。我作为一个计算机应用的大学生,希望能有所贡献。用我三年的所学编制了一个实用的程序来帮助桂阳一中进行更有效的学籍档案管理。
可行性研究:
目的:可行性研究的目的是用最小的代价在尽可能的时间内确定问题是否能够解决。
经济上可行性:
现在,计算机的价格已经十分低廉,性能却有了长足的进步。而本系统的开发,为学校的工作效率带来了一个质的飞跃,为此主要表现有以下几个方面: 第一,本系统的运行可以代替人工进行许多繁杂的劳动; 第二,本系统的运行可以节省许多资源;
第三,本系统的运行可以大大的提高学校的工作效率; 第四,本系统可以使敏感文档更加安全,等等。所以,本系统在经济上是可行的。技术上可行性:
本系统的开发我利用Microsoft SQL Server2000作为本系统的数据库,它是一个支持多用户的新型数据库,适用于大中规模的数据量需求。学校校园网的建设也为新系统服务器/客户端的结构提供了硬件的支持。
使用Visual Basic6.0作为系统开发的开发环境,它作为一种现代的编程语言,提供完善的指令控制语句、类与对象的支持及丰富的数据类型,给开发高性能系统提供的保障为开发满足客户要求的系统,保证了代码的模块化要求,而代码模块化的提高,非常有利于以后对新系统的扩展与修改。综上所述,本系统的设计与开发在技术上和硬件设备上的条件都是满足的,因此,它在技术上是可行的。
运行上可行性:
本系统为一个小型的学生信息管理系统,所耗费的资源非常的小,学校的电脑无论是硬件还是软件都能够满足条件,因此,本系统在运行上是可行的。法律可行性:
本系统纯为私人设计,在开发过程中没有涉及合同、责任等与法律相抵触的方面。因此,本系统在法律上是可行的。
(2)系统分析部分 1)业务流程图
用户学生名单基本信息管理学生情况统计查询浏览表操作人员学生学生登记表学生学籍学生学籍管理 各专业教学计划教务管理学生成绩学生成绩管理学生成绩单教师教学计划排课课表学生
2)数据流程图
用户学生名单学生学生登记表学生信息管理学生学籍查询浏览表查询浏览表操作人员学生学籍管理各系部教学计划教务管理学生成绩学生成绩管理学生成绩单教师教学计划排课课表打印课表学生
3)功能分析图
学生信息管理系统用户信息管理班级信息管理学籍信息管理课程信息管理成绩信息管理奖惩信息管理个人信息查询添加修改删除用户查看所有班级信息添加修改删除班级信息查询学生学籍信息添加修改删除学生学籍信息查询课程信息添加修改删除课程信息查询成绩信息添加修改删除成绩信息查询学生奖惩信息添加修改删除奖惩信息按学号查询个人信息
4)数据字典 数据存储字典
(1)存储文件名:班级和课程
标识符:class_Cour
数据结构:
班级号
class_No
课程名称
course_Name(2)存储文件名:班级信息
标识符:class_Form
数据结构:
班级号
class_No
班级名称
class_Name
导员名称
class_Teacher
备注信息
class_Remarks(3)存储文件名:课程信息
标识符:course_Form
数据结构:
课程名
class_Name
课程列表
class_Rem(4)存储文件名:奖惩信息
标识符:prize_Form
数据结构:
奖惩名
class_Name
奖惩列表
class_Rem(5)存储文件名:奖惩信息
标识符:prize_Stud
数据结构:
奖惩号
prize_No
奖惩学号
prize_Stu
奖惩日期
prize_Data
奖惩名
prize_Name(6)存储文件名:成绩信息
标识符:score_Form
数据结构:
成绩号
score_No
考试期号
score_Per
班级号
score_Cla
学号
score_Stu
科目
score_Cou
成绩
score_Sco(7)存储文件名:个人信息
标识符:student_Form
数据结构:
学号
student_No
姓名
student_Name
性别
student_Sex
出生日期
student_Bir
班级号
student_Cla
电话
student_Tel
入学日期
student_Esd
籍贯
student_Add
备注
student_Rem(8)存储文件名:用户信息
标识符:user_Form
数据结构:
用户名
user_ID
登陆密码
user_PWD
用户日期
user_DATA 5)数据加工处理的描述
处理名:用户名处理
处理过程:登陆学生信息管理系统后,点击“用户信息管理”后出现用户信息管理界面,可以用于添加,修改,删除用户信息。
处理名:班级信息处理
处理过程:登陆学生信息管理系统后,点击“班级信息管理”后出现班级信息管理界面,可以用于查询所有班级信息和添加,修改,删除班级信息。
处理名:学籍信息处理
处理过程:登陆学生信息管理系统后,点击“学籍信息管理”后出现学籍信息管理界面,可以用于查询所有学生学籍信息和添加,修改,删除学生学籍信息。
处理名:课程信息处理
处理过程:登陆学生信息管理系统后,点击“课程信息管理”后出现课程信息管理界面,可以用于查询所有班级课程信息和添加,修改,删除班级课程信息。
处理名:成绩信息处理
处理过程:登陆学生信息管理系统后,点击“成绩信息管理”后出现成绩信息管理界面,可以用于查询所有成绩信息和添加,修改,删除成绩信息。
处理名:奖惩信息处理
处理过程:登陆学生信息管理系统后,点击“奖惩信息管理”后出现奖惩信息管理界面,可以用于查询所有奖惩信息和添加,修改,删除奖惩信息。
处理名:个人信息处理
处理过程:登陆学生信息管理系统后,点击“个人信息管理”后出现个人信息管理界面,可以用于查询个人信息。
6)管理信息系统流程设想图(新系统模型)
(3)系统设计部分
1)功能结构图设计
学生信息管理系统用户信息管理班级信息管理学籍信息管理课程信息管理成绩信息管理奖惩信息管理个人信息查询添加用户信息修改用户信息删除用户信息查询班级信息添加班级信息修改班级信息删除班级信息查询学籍信息添加学籍信息修改学籍信息删除学籍信息查询课程信息添加课程信息删除课程信息添加成绩信息查询成绩信息修改成绩信息删除成绩信息查询奖惩信息添加奖惩信息删除奖惩信息查询个人信息
2)新系统信息处理流程设计
3)输出设计(主要指打印输出设计)
4)存储文件格式设计(数据库结构设计)
5)输入设计(主要指数据录入卡设计)
6)代码设计(职工证号和部门代号等)
7)程序设计说明书
(4)系统实施部分
1)程序框图
2)源程序
学生信息管理图形界面程序设计如下:
Dim i As Long Private Sub Form_Load()
Label1.ForeColor = &H8000000E
Label1.FontSize = 12
Label1.AutoSize = True
i = Image2.Width End Sub
Private Sub Form_Resize()
Image1.Top = 0
Image1.Left = 0
Image1.Height = Me.Height
Image1.Width = Me.Width
Image2.Top = Me.HeightImage2.Width
Label1.Top = Me.Height100 End Sub
Private Sub Timer1_Timer()
i = i + 50
Label1.Left = Me.Width1
.TextMatrix(.Rows1
End With
mrc.Close
OK = False
miCount = 0 End Sub
Private Sub cmdCancel_Click()
OK = False
Me.Hide End Sub
Private Sub cmdOK_Click()
txtSQL = “select * from user_Form where user_ID = '” & txtUserName.Text & “'”
Set mrc = ExecuteSQL(txtSQL, MsgText)
If mrc.EOF = True Then
MsgBox “没有这个用户,请重新输入用户名!”, vbOKOnly + vbExclamation, “警告”
txtUserName.SetFocus
Else
If Trim(mrc.Fields(1))= Trim(txtPassword.Text)Then
OK = True
mrc.Close
Me.Hide
UserName = Trim(txtUserName.Text)
Else
MsgBox “输入密码不正确,请重新输入!”, vbOKOnly + vbExclamation, “警告”
txtPassword.SetFocus
txtPassword.Text = “"
End If
End If
miCount = miCount + 1
If miCount = 3 Then
Me.Hide
End If
Exit Sub End Sub
Private Sub txtPassword_KeyDown(KeyCode As Integer, Shift As Integer)
EnterToTab KeyCode End Sub
Private Sub txtPassword_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
Call cmdOK_Click
End If End Sub
Private Sub txtUserName_Click()
txtPassword.Text = ”“ End Sub
Private Sub txtUserName_KeyDown(KeyCode As Integer, Shift As Integer)
EnterToTab KeyCode End Sub
学生信息管理系统界面程序设计如下: Private Sub claiMenu_Click()
frmclai.Show End Sub
Private Sub couiMenu_Click()
frmcoui.Show End Sub
Private Sub cusiMenu_Click()
frmcusi.Show End Sub
Private Sub MDIForm_Load()
dColor.Show End Sub
Private Sub MDIForm_Resize()
If Me.Height > 1100 Then
dColor.Height = Me.Height180
End If End Sub
Private Sub prpiMenu_Click()
frmprpi.Show End Sub
Private Sub scoiMenu_Click()
frmscoi.Show End Sub
Private Sub stsiMenu_Click()
frmstsi.Show End Sub
Private Sub sumiMenu_Click()
frmsumi.Show End Sub
奖惩信息管理界面程序设计如下: Dim mrc As ADODB.Recordset Dim MsgText As String
Private Sub Command1_Click()
Dim txtSQL As String
If Text1(0)= ”“ Then
MsgBox ” 奖惩名称不能为空!“, vbOKOnly, ”提示“
Text1(0).SetFocus
Exit Sub
End If
txtSQL = ”select * from prize_Form where prize_Name='“ & Trim(Text1(0))& ”'“
Set mrc = ExecuteSQL(txtSQL, MsgText)
If mrc.EOF = False Then
MsgBox ”此奖惩名称已经存在!“, vbOKOnly, ”警告“
Text1(0).SetFocus
Exit Sub
End If
mrc.Close
txtSQL = ”select * from prize_Form“
Set mrc = ExecuteSQL(txtSQL, MsgText)
mrc.AddNew
mrc.Fields(0)= Trim(Text1(0))
mrc.Fields(1)= Trim(Text1(1))
mrc.Update
mrc.Close
Text1(0)= ”“
Text1(1)= ”“
MsgBox ”奖惩信息添加成功!“, vbOKOnly, ”提示“
List1Text End Sub
Private Sub Command2_Click()
If List1.Text <> ”“ Then
txtSQL = ”delete from prize_Form where prize_Name='“ & Trim(List1.Text)& ”'“
Set mrc = ExecuteSQL(txtSQL, MsgText)
MsgBox ”奖惩信息已经删除!“, vbOKOnly, ”提示“
List1Text
End If End Sub
Private Sub Form_Load()
MSFlexGrid1.Cols = 5
MSFlexGrid1.ColWidth(0)= 300
MSFlexGrid1.ColWidth(1)= 0
MSFlexGrid1.ColWidth(2)= 0
MSFlexGrid1.ColWidth(3)= 1200
MSFlexGrid1.ColWidth(4)= 1200
MSFlexGrid1.TextMatrix(0, 3)= ”奖惩日期“
MSFlexGrid1.TextMatrix(0, 4)= ”奖惩名称“
MSFlexGrid1.Rows = 1
Text3(0)= GetRkno
List1Text End Sub
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Label6(0).BackColor = &HC0C0C0
Label6(1).BackColor = &HC0C0C0 End Sub
Private Sub Form_Resize()
dColor.ZOrder 1 End Sub Private Sub List1Text()
Dim txSQL As String
Dim mrcc As ADODB.Recordset
txSQL = ”select * from prize_Form “
Set mrcc = ExecuteSQL(txSQL, MsgText)
List1.Clear
Do While Not mrcc.EOF
List1.AddItem Trim(mrcc!prize_Name)
mrcc.MoveNext
Loop
mrcc.Close End Sub
Private Function GetRkno()As String
GetRkno = Format(Now, ”yymmddhhmmss“)
Randomize
GetRkno = GetRkno & Int((991).Type
Case adDBDate
.TextMatrix(.Rows1)& ”“, ”yyyy-mm-dd“)
Case Else
.TextMatrix(.Rows1)& ”“
End Select
Next i
mrc.MoveNext
Loop
End With
mrc.Close End Sub
Private Sub Text2_Change()
Dim txtSQL As String
txtSQL = ”select * from prize_Stud where prize_Stu='“ & Trim(Text2)& ”'“
Set mrc = ExecuteSQL(txtSQL, MsgText)
ShowData End Sub
成绩信息管理程序设计如下: Dim mrc As ADODB.Recordset Dim MsgText As String
Private Sub Combo1_Click(Index As Integer)
Dim txSQL As String
If Index = 0 Then
txSQL = ”select * from student_Form where student_Cla='“ & Trim(Combo1(0).Text)& ”'“
Set mrc = ExecuteSQL(txSQL, MsgText)
If mrc.EOF = True Then
MsgBox ”请先进行班级设置!“, vbOKOnly, ”提示“
Else
With Combo1(1)
.Clear
Do While Not mrc.EOF
.AddItem Trim(mrc!student_NO)
mrc.MoveNext
Loop
End With
End If
txSQL = ”select * from class_Cour where class_NO='“ & Trim(Combo1(0).Text)& ”'“
Set mrc = ExecuteSQL(txSQL, MsgText)
If mrc.EOF = True Then
MsgBox ”请先进行班级设置!“, vbOKOnly, ”提示“
Else
With Combo1(2)
.Clear
Do While Not mrc.EOF
.AddItem Trim(mrc!course_Name)
mrc.MoveNext
Loop
End With
End If
End If End Sub
Private Sub Combo2_Click(Index As Integer)
Dim txSQL As String
If Index = 0 Then
txSQL = ”select DISTINCT score_Stu from score_Form where score_Cla='“ & Trim(Combo2(0).Text)& ”'“
Set mrc = ExecuteSQL(txSQL, MsgText)
If mrc.EOF = False Then
With Combo2(1)
.Clear
Do While Not mrc.EOF
.AddItem Trim(mrc!score_Stu)
mrc.MoveNext
Loop
End With
End If
txSQL = ”select DISTINCT score_Cou from score_Form where score_Cla='“ & Trim(Combo2(0).Text)& ”'“
Set mrc = ExecuteSQL(txSQL, MsgText)
If mrc.EOF = False Then
With Combo2(2)
.Clear
Do While Not mrc.EOF
.AddItem Trim(mrc!score_Cou)
mrc.MoveNext
Loop
End With
End If
End If End Sub
Private Sub Combo3_Click(Index As Integer)
Dim txSQL As String
If Index = 0 Then
txSQL = ”select * from student_Form where student_Cla='“ & Trim(Combo3(0).Text)& ”'“
Set mrc = ExecuteSQL(txSQL, MsgText)
If mrc.EOF = False Then
With Combo3(1)
.Clear
Do While Not mrc.EOF
If mrc!student_NO <>.Text Then
.AddItem Trim(mrc!student_NO)
End If
mrc.MoveNext
Loop
End With
End If
txSQL = ”select * from class_Cour where class_NO='“ & Trim(Combo3(0).Text)& ”'“
Set mrc = ExecuteSQL(txSQL, MsgText)
If mrc.EOF = False Then
With Combo3(2)
.Clear
Do While Not mrc.EOF
If mrc!course_Name <>.Text Then
.AddItem Trim(mrc!course_Name)
End If
mrc.MoveNext
Loop
End With
End If
End If End Sub
Private Sub Command1_Click()
Dim txtSQL As String
If Text1(1)= ”“ Then
MsgBox ”考试期号不能为空!“, vbOKOnly, ”提示“
Text1(1).SetFocus
Exit Sub
End If
If Combo1(0).Text = ”“ Then
MsgBox ”学生班号不能为空!“, vbOKOnly, ”提示“
Combo1(0).SetFocus
Exit Sub
End If
If Combo1(1).Text = ”“ Then
MsgBox ”学生编号不能为空!“, vbOKOnly, ”提示“
Combo1(1).SetFocus
Exit Sub
End If
If Combo1(2).Text = ”“ Then
MsgBox ”考试课程不能为空!“, vbOKOnly, ”提示“
Combo1(2).SetFocus
Exit Sub
End If
If Text1(2)= ”“ Then
MsgBox ”考试分数不能为空!“, vbOKOnly, ”提示“
Text1(2).SetFocus
Exit Sub
End If
txtSQL = ”select * from score_Form where score_Per='“ & Trim(Text1(1))& ”' and score_Cla='“ & Trim(Combo1(0).Text)& ”' and score_Stu='“ & Trim(Combo1(1).Text)& ”'And score_Cou='“ & Trim(Combo1(2).Text)& ”'“
Set mrc = ExecuteSQL(txtSQL, MsgText)
If mrc.EOF = False Then
MsgBox ”同次同人同科只能添加一次“, vbOKOnly, ”警告“
Text1(2)= ”“
Combo1(0).SetFocus
Exit Sub
End If
txtSQL = ”select * from score_Form“
Set mrc = ExecuteSQL(txtSQL, MsgText)
mrc.AddNew
mrc.Fields(0)= Trim(Text1(0))
mrc.Fields(1)= Trim(Text1(1))
mrc.Fields(2)= Trim(Combo1(0).Text)
mrc.Fields(3)= Trim(Combo1(1).Text)
mrc.Fields(4)= Trim(Combo1(2).Text)
mrc.Fields(5)= Trim(Text1(2))
mrc.Update
mrc.Close
MsgBox ”考试信息添加成功!“, vbOKOnly, ”提示“
With MSFlexGrid1
.Rows =.Rows + 1
.TextMatrix(.Rows1, 1)= Trim(Text1(1))
.TextMatrix(.Rows1, 3)= Trim(Combo1(1).Text)
.TextMatrix(.Rows1, 5)= Trim(Text1(2))
End With
Text1(2)= ”“
Combo1(0).Clear
txtSQL = ”select * from class_Form“
Set mrc = ExecuteSQL(txtSQL, MsgText)
If mrc.EOF = False Then
With Combo1(0)
.Clear
Do While Not mrc.EOF
.AddItem Trim(mrc!class_NO)
mrc.MoveNext
Loop
End With
End If
Combo1(1).Clear
Combo1(2).Clear
Text1(0)= GetRkno
MSFlexGrid1.TopRow = MSFlexGrid1.Rows1
Select Case mrc.Fields(i).Type
Case adDBDate
.TextMatrix(.Rows1, i)= mrc.Fields(i)& ”“
End Select
Next i
mrc.MoveNext
Loop
.Visible = True
End With
Frame1.Visible = False
mrc.Close
Text2(1)= ”“
txSQL = ”select DISTINCT score_Cla from score_Form“
Set mrc = ExecuteSQL(txSQL, MsgText)
If mrc.EOF = False Then
With Combo2(0)
.Clear
Do While Not mrc.EOF
.AddItem Trim(mrc!score_Cla)
mrc.MoveNext
& ”“, 46
Loop
End With
End If
Combo2(1).Clear
Combo2(2).Clear
Text2(2)= ”“ End Sub
Private Sub Command4_Click()
Dim txtSQL As String
Text2(1)= ”“
txtSQL = ”select DISTINCT score_Cla from score_Form“
Set mrc = ExecuteSQL(txtSQL, MsgText)
If mrc.EOF = False Then
With Combo2(0)
.Clear
Do While Not mrc.EOF
.AddItem Trim(mrc!score_Cla)
mrc.MoveNext
Loop
End With
End If
Combo2(1).Clear
Combo2(2).Clear
Text2(2)= ”“ End Sub
Private Sub Command5_Click()
Dim j As Integer
Dim txtSQL As String
If Text3(0)= ”“ Then
MsgBox ”清选择要修改的纪录!“, vbOKOnly, ”提示“
MSFlexGrid1.SetFocus
Exit Sub
End If
If Text3(1)= ”“ Then
MsgBox ”考试期号不能为空!“, vbOKOnly, ”提示“
Text3(1).SetFocus
Exit Sub
End If
If Combo3(0).Text = ”“ Then
MsgBox ”学生班号不能为空!“, vbOKOnly, ”提示“
Combo3(0).SetFocus
Exit Sub
End If
If Combo3(1).Text = ”“ Then
MsgBox ”学生编号不能为空!“, vbOKOnly, ”提示“
Combo3(1).SetFocus
Exit Sub
End If
If Combo3(2).Text = ”“ Then
MsgBox ”考试课程不能为空!“, vbOKOnly, ”提示“
Combo3(2).SetFocus
Exit Sub
End If
If Text3(2)= ”“ Then
MsgBox ”考试分数不能为空!“, vbOKOnly, ”提示“
Text3(2).SetFocus
Exit Sub
End If
txtSQL = ”select * from score_Form where score_NO<>'“ & Trim(Text3(0))& ”' And score_Per='“ & Trim(Text3(1))& ”' and score_Cla='“ & Trim(Combo3(0).Text)& ”' and score_Stu='“ & Trim(Combo3(1).Text)& ”'And score_Cou='“ & Trim(Combo3(2).Text)& ”'“
Set mrc = ExecuteSQL(txtSQL, MsgText)
If mrc.EOF = False Then
MsgBox ”同次同人同科只能添加一次“, vbOKOnly, ”警告“
Text3(2)= ”“
Combo3(0).SetFocus
Exit Sub
End If
txtSQL = ”Delete from score_Form where score_NO='“ & Trim(Text3(0))& ”'“
Set mrc = ExecuteSQL(txtSQL, MsgText)
txtSQL = ”select * from score_Form“
Set mrc = ExecuteSQL(txtSQL, MsgText)
mrc.AddNew
mrc.Fields(0)= Trim(Text3(0))
mrc.Fields(1)= Trim(Text3(1))
mrc.Fields(2)= Trim(Combo3(0).Text)
mrc.Fields(3)= Trim(Combo3(1).Text)
mrc.Fields(4)= Trim(Combo3(2).Text)
mrc.Fields(5)= Trim(Text3(2))
mrc.Update
mrc.Close
MsgBox ”考试信息修改成功!“, vbOKOnly, ”提示"
j = 0
For i = 1 To MSFlexGrid1.Rows1
第四篇:MIS期末考试
1.Explain why information systems are so important today for business and management.Information systems are a foundation for conducting business today.In many industries, survival and even existence without extensive use of IT is inconceivable and IT plays a critical role in increasing productivity.Although information technology has become more of a commodity, when coupled with complementary changes in organization and management, it can provide the foundation for new products, services, and ways of conducting business that provide firms with a strategic advantage.Information technology has become the largest component of capital investment for firms in the United States and many industrialized societies.2.Evaluate the role played by the major types of systems in a business and their relationship to each other.There are four major types of information systems in contemporary organizations.Operational-level systems are transaction processing systems(TPS), such as payroll or order processing, that track the flow of the daily routine transactions that are necessary to conduct business.Management-level systems(MIS and DSS)provide the management control level with reports and access to the organization’s current performance and historical records.Most management information systems(MIS)reports condense information from TPS and are not highly analytical.Decision-support systems(DSS)support management decisions when these decisions are unique, rapidly changing, and not specified easily in advance.They have more advanced analytical models and data analysis capabilities than MIS and often draw on information from external as well as internal sources.Executive support systems(ESS)support the strategic level by providing data of greatest importance to senior management decision makers, often in the form of graphs and charts delivered via portals.They have limited analytical capabilities but can draw on sophisticated graphics software and many sources of internal and external information.The various types of systems in the organization exchange data with one another.TPS are a major source of data for other systems, especially MIS and DSS.ESS primarily receive data from lower-level systems.Today’s business environment calls for more integration among systems than in the past, but such integration is not easy to achieve.3.Analyze how information systems support various business strategies for competitive advantage.Businesses can use strategic information systems to gain an edge over competitors.Such systems change organizations’ goals, business processes, products, services, or environmental relationships, driving them into new forms of behavior.Information systems can be used to support strategy at the business, firm, and industry levels.At the business level of strategy, information systems can be used to help firms become the low-cost producers, differentiate products and services, or serve new markets.Information systems can also be used to lock in customers and suppliers using efficient customer response and supply chain management applications.Value chain analysis is useful at the business level to highlight specific activities in the business where information systems are most likely to have a strategic impact.At the firm level, information systems can be used to achieve new efficiencies or to enhance services by tying together the operations of disparate business units so that they can function as a whole or promote the sharing of knowledge across business units.At the industry level, systems can promote competitive advantage by facilitating cooperation with other firms in the industry, creating consortiums or communities for sharing information, exchanging transactions, or coordinating activities.The competitive forces model, information partnerships, business ecosystems, and network economics are useful concepts for identifying strategic opportunities for systems at the industry level.4.Evaluate the role of Internet technology in facilitating management and coordination of internal and inter-organizational business processes.Private, internal corporate networks called intranets can be created using Internet connectivity standards.Extranets are private intranets that are extended to selected organizations or individuals outside the firm.Intranets and extranets are forming the underpinnings of electronic business by providing a low-cost technology that can run on almost any computing platform.Organizations can use intranets to create collaboration environments for coordinating work and information sharing, and to make information flow between different functional areas of the firm.Intranets also provide a low-cost alternative for improving coordination of cross-functional business processes within the organization.Extranets help coordinate business processes shared with customers, suppliers, and other external organizations.Collaborative commerce builds on extranets to enable multiple organizations to collaboratively design, develop, build, move, and manage products through their life cycles.A firm engaged in collaborative commerce with its suppliers and customers can achieve new efficiencies by reducing product design cycles, minimizing excess inventory, forecasting demand, and keeping partners and customers informed.5
Identify the main moral dimensions of an information society and specific principles for conduct that can be used to guide ethical decisions.The moral dimensions of information systems center around information rights and obligations, property rights and obligations, accountability and control, system quality, and quality of life.Six ethical principles are available to judge conduct.These principles are derived independently from several cultural, religious, and intellectual traditions and include the Golden Rule, Immanuel Kant’s Categorical Imperative, Descartes’rule of change, the Utilitarian Principle, the Risk Aversion Principle, and the ethical “no free lunch” rule.These principles should be used in conjunction with an ethical analysis to guide decision making.The ethical analysis involves identifying the facts, values, stakeholders, options, and consequences of actions.Once completed, you can consider which ethical principle to apply to a situation to arrive at a judgment.6.Define IT infrastructure and describe the components and levels of IT infrastructure.IT infrastructure is the shared technology resources that provide the platform for the firm’s specific information system applications.IT infrastructure includes hardware, software, and services that are shared across the entire firm.Major IT infrastructure components include computer hardware platforms, operating system platforms, enterprise software platforms, networking and telecommunications platforms, database management software, Internet platforms, and consulting services and systems integrators.There are three different levels of IT infrastructure: public, enterprise, and business unit.You can better understand the business value of IT infrastructure investments by viewing IT infrastructure as a platform of services as well as a set of technologies.7.Describe the major standards for wireless networks and for wireless Internet access.The Institute of Electrical and Electronics Engineers(IEEE)has established a hierarchy of complementary standards for wireless computer networks.These include Bluetooth(802.15)for small personal area networks(PANs), Wi-Fi(802.11)for local area networks(LANs), and WiMax(802.16)for metropolitan area networks(MANs).Bluetooth can link up to eight devices within a 10 meter area using low-power, radio-based communication and can transmit up to 722 Kbps in the 2.4-GHz band.Wireless phones, keyboards, computers, printers, and PDAs using Bluetooth can communicate with each other and even operate each other without direct user intervention.The most popular of the 802.11 standards is currently 802.11b, which can transmit up to 11 Mbps in the unlicensed 2.4-GHz band and has an effective distance of 30 to 50 meters, although this range can be extended outdoors by using tower-mounted antennas.The 802.11b standard has been the most widely used standard for creating wireless LANs and providing broadband wireless Internet access.However, 802.11b is vulnerable to penetration by outsiders and interference from other wireless devices in the same frequency spectrum.WiMax has a wireless access range of up to 31 miles and a data transfer rate of up to 75 Mbps, making it suitable for providing broadband Internet access in areas lacking DSL and cable lines.The 802.16 specification also has robust security and quality of service features to support voice and video.Major cellular carriers are also upgrading their networks to provide wireless broadband access to the Internet at an average speed of 300 to 500 Kbps.Verizon’s service, called BroadBand Access, uses a technology called EV-DO to provide Internet access over a cellular network.8.Assess how supply chain management systems provide value for businesses and explain how they work.Supply chain management systems automate the flow of information between members of the supply chain so they can use it to make better decisions about when and how much to purchase, produce, or ship.More accurate information from supply chain management systems reduces uncertainty and the impact of the bullwhip effect.The correct movement of information makes it possible to time orders, shipments, and production properly to minimize inventory levels and expedite deliveries to customers.Supply chain management software includes software for supply chain planning and for supply chain execution.Supply chain planning systems enable the firm to generate demand forecasts for a product and to develop sourcing, manufacturing, and distribution plans.Supply chain execution systems manage the flow of products through the final stages of production, distribution, and delivery.Supply chain management systems provide data such as fill rates, inventory turns, or source/make cycle time for evaluating the performance of supply chain processes.Firms can use intranets to improve coordination among their internal supply chain processes, and they can use extranets to coordinate supply chain processes shared with their business partners.Internet technology facilitates the management of global supply chains by providing the connectivity for organizations in different countries to share supply chain information.Improved communication among supply chain members also facilitates efficient customer response and movement toward a demanddriven model.9 Assess how customer relationship management systems provide value for businesses and describe how they work.Customer relationship management(CRM)systems integrate and automate many customer-facing processes in sales, marketing, and customer service, providing an enterprise-wide view of customers.These systems track all of the ways in which a company interacts with its customers and analyze these interactions to maximize customer lifetime value for the firm.CRM systems capture and integrate customer data from all over the organization, analyzing the data and distributing the results to customer-related systems and customer touch points across the enterprise.Companies can use this customer knowledge when they interact with customers to provide them with better service or to sell new products and services.These systems can also identify profitable or nonprofitable customers or opportunities to reduce the churn rate.The major customer relationship management software packages integrate customer-related processes in sales, marketing, and customer service and provide capabilities for both operational CRM and analytical CRM.They often include modules for managing relationships with selling partners(partner relationship management)and for employee relationship management.If properly implemented, CRM systems help firms increase customer satisfaction, reduce direct marketing costs, and lower costs for customer acquisition and retention.Information from CRM systems can increase sales revenue by identifying the most profitable customers and segments for focused marketing, cross-selling, and up-selling.Customer churn can be reduced as sales, service, and marketing better respond to customer needs.10.Define and describe the major types of knowledge work systems and assess how they provide value for firms.Knowledge work systems(KWS)support the creation of new knowledge and its integration into the organization.KWS require easy access to an external knowledge base;powerful computer hardware that can support software with intensive graphics, analysis, document management, and communications capabilities;and a user-friendly interface.These capabilities can increase the productivity of highly paid knowledge workers.KWSs often run on workstations that are customized for the work they must perform.Computeraided design(CAD)systems and virtual reality systems, which create interactive simulations that behave like the real world, require graphics and powerful modeling capabilities.KWS for financial professionals provide access to external databases and the ability to analyze massive amounts of financial data very quickly.
第五篇:MIS课程设计报告
管理信息系统课程设计
专 业: 信息管理与信息系统 课程名称: MIS课程设计 课题名称: 学生管理系统 教 师: 许炜 小组成员: 张浩 张旭 周杨 徐俊杰
2014年 12 月 26 日 目录
第一章 系统规划..................................................1 1.1设计背景....................................................1 1.2系统设计目标................................................1 1.3 可行性分析..................................................1 第二章 系统分析..................................................2 2.1组织结构分析................................................2 2.2业务流程图..................................................2 2.3功能需求....................................................2 第三章 系统设计..................................................4 3.1 界面设计....................................................4 第四章 系统实施.................................................11 4.1 系统操作使用的简要说明.....................................11 4.2 系统评价...................................................11 课程设计总结....................................................13 参考资料........................................................13 江苏科技大学苏州理工学院 商学院
课 程 设 计 报 告
第一章 系统规划 1.1设计背景
学生信息系统是一项数据量很庞大的管理信息系统,需要实现的功能也越来越复杂,越来越全。因此,对于学生信息的管理系统的设计要求越来越严格,其功能的全面性,简便性要求也逐步增强。
1.2系统设计目标
本系统是基于AxureRP软件设计搭接用户界面的学生信息管理系统,实现对学生在校信息的全面集中管理。
1.3 可行性分析
技术可行性:本系统采用AxureRP软件,软件具有以下优点:
网站构架图(Site Structure):AxureRP可以快速绘制树状的网站构架图,而且可以让构架图中的每一个页面节点,直接连接到对应网页。
示意图(Wireframe):Axure RP内建了许多会经常使用到的widget元件,例如:按钮(Button)、图片(Image)、文字面板(Text Panel)、选择钮(Radio Button)、下拉式菜单(Droplist)。流程图(Flowchart):AxureRPFlowDiagram快速建立流程图就像建立wireframe一样容易,Flow Widget中有设计流程图时会经常用到的形状,您可以轻松在流程之间加入连接线并设定连接的格式。
交互设计(InteractionDesign):大多数的widget可以对一个或多个事件产生动作,包括OnClick、OnMouseOver和OnMouseLeave等
自动输出网站原型(HTML Prototype): Axure RP可以将wireframe,输出成符合InternetExplorer或Firefox等不同浏览器的HTML prototype。江苏科技大学苏州理工学院 商学院
课 程 设 计 报 告
第二章 系统分析
2.1组织结构分析
2.2业务流程图 2.3功能需求
主要功能:
※登录界面:用户名、密码登录,密码丢失,用户注册 学籍管理:包括入学注册、学籍信息查询和更新
班级管理:包括班级信息添加、更新和删除 ※课程管理:包括课程查询,学生选课系统 江苏科技大学苏州理工学院 商学院
课 程 设 计 报 告
成绩管理:包括成绩录入、查询和统计
收费管理:学生缴费信息输入、查询和统计 ※打印统计:打印统计结果 江苏科技大学苏州理工学院 商学院
课 程 设 计 报 告
第三章 系统设计
3.1 界面设计 登陆界面:
注册界面:
密码修改界面: 江苏科技大学苏州理工学院 商学院
课 程 设 计 报 告
系统功能界面:
江苏科技大学苏州理工学院 商学院
课 程 设 计 报 告
学籍管理界面:
学籍修改界面: 江苏科技大学苏州理工学院 商学院
课 程 设 计 报 告
班级管理界面: 江苏科技大学苏州理工学院 商学院
课 程 设 计 报 告
课程管理界面: 江苏科技大学苏州理工学院 商学院
课 程 设 计 报 告
成绩管理界面: 江苏科技大学苏州理工学院 商学院
课 程 设 计 报 告
收费管理界面: 江苏科技大学苏州理工学院 商学院
课 程 设 计 报 告
打印系统界面:
第四章 系统实施
4.1 系统操作使用的简要说明
本系统是基于学生信息管理过程进行设计的简明版信息存储管理系统。由登录界面进入,若还未注册或者密码遗忘,可以进行相应的找回、修改功能。之后,便可以进行学生学籍、课程、成绩以及学费管理等方面的信息查询与统计功能,最后,也可以对之前的统计结果进行打印。
4.2 系统评价
4.1.1采用的有特色的技术与技巧
1)动态面板部件。在运用AxureRP软件设计学生管理系统流程界面时,不仅使用了江苏科技大学苏州理工学院 商学院
课 程 设 计 报 告
系统一般常用的部件进行常规设计,而且使用了动态面板部件,可以让你实现高级的交互功能,实现原型的高保真度。
2)菜单控件。菜单控件用于创建简单的弹出菜单,菜单控件分为垂直菜单(Vertical Menu)和水平菜单(Horizontal Menu),可以通过控件面板中拖入菜单控件到线框图中创建菜单,每一层的菜单项可以继续向下新增子菜单。图例:
3)OnChange事件。OnChange事件可用于下拉框(Droplist)和列表框(List Box)控件。OnChange事件是在下拉框或列表框的选项选择时发生。这在原型中以下拉框进行导航非常有用,即当选择下拉框的某个选项时跳转到相应的页面上。在本次实验中,此应用很多地方用到就不一一例举。
4.2.2成功之处与主要特点
1)模块化。本系统主要分为七个模块,分别为登录界面、学籍管理、班级管理、课程管理、成绩管理、收费管理、打印统计,每一个模块中也有细分具体功能板块,这样编排,使得学生与管理员使用都很清楚、明朗;
2)简明而全面。本系统实现了学籍、班级、课程、成绩、收费的五个功能,具体而全面地涵盖了关于学生日常涉及的事务处理;
3)实用性。本系统在本校已有系统功能的基础上,完善了部分未能使用,却是学生需要的功能,如个人、专业学分计算与统计功能等。江苏科技大学苏州理工学院 商学院
课 程 设 计 报 告
4.2.3系统会改进完善之处和进一步工作的打算
1)各部信息之间关联性太强,一处信息的错误可能导致整个系统中信息错误。2)现有系统在用户角色和用户权限设置上没有相关的功能。3)在用户界面,用户体验,响应速度等方面存在问题。
改进措施:下一步将进行用户权限系统的设置。不同的用户角色享有不同的权限,方便进行信息的查询、管理和利用。同时也要改进用户界面,提高系统的响应速度,改善用户的体验,做到更便捷、更友好。
课程设计总结
本次课程设计,让我们了解和熟悉了另一种搭建网络页面框架,实现网络功能的软件和方法。虽然有些方面不及Java与ASP.net等其他软件所能实现的页面功能复杂全面,但Axure RP 可以让桌面应用软件和Web网站的设计师创建线框图、流程图、原型和规格说明文档,它比任何当前其它创建静态原型的工具如Visio,、Illustrator、Photoshop、Dreamweaver, Visual Studio、FireWorks、GUI Studio等都要快速、高效,因为它才是真正的专门原型设计工具,并且支持多人协作设计和版本控制管理。
而本次课程设计也提高我们小组成员的动手实践能力与遇到问题时的思考、分析、解决问题的能力,懂得如何实在地搭建一个我们自己生活学习中所接触到,使用到的网络界面,网站数据查询与统计功能,真正的学而致用,理解的也更全面透彻,提高了学习计算机的兴趣,增强了信心。
在本次课程设计中,我们因为不熟悉,也遇到了很多的困难。虽如此,每当克服一个困难时,我们都非常的兴奋,这些都是自己努力的结果。现在,我们有信心面对接下来的挑战,在不断的实践中锻炼自己,提高自己!
参考资料
[1] Axure第一书(作者马克)[2] Axure快速原型设计(第二版)