《管理信息系统上机实验报告[汇编]》由会员分享，可在线阅读，更多相关《管理信息系统上机实验报告[汇编]（13页珍藏版）》请在金锄头文库上搜索。
1、中国矿业大学徐海学院 实 验 报 告 课程名称管理信息系统 姓名李志谦班级工业 10-2 班 学号日期成绩 教师董成亮 一、实验名称：管理信息系统综合实验 二、实验对象：工业工程专业 三、实验目的： 掌握管理信息系统中常规二维表数据的增加、修改、删除以及查询、报表等 功能的设计方法。 四、实验内容 （一） 有如下两张表： class （班级表） 字段名字段类型长度说明 cidvarchar50班级编号 cnamevarchar50班级名称 student（学生表） 字段名字段类型长度说明 snovarchar50学号 snvarchar50姓名 sextinyint1性别 ageint4年龄
2、class_novarchar50班级 开发一模块，要求实现如下功能： 1在一个网页中，实现S表的增加、修改、删除、查询、打印功能。 2查询功能要求能够根据学生的学号、姓名、班级进行查找。 3增加、修改要有合法性验证，删除要有删除确认提示。 4打印时，仅打印当前查询的内容。 5报告内容包括程序界面截图和逻辑处理代码。 实验过程： 1 在 SQL SERVER 中建立表class和表 s（即表 student ） ，并预填数据如下： 表 class： 表 s： 2 打开 MS VISUAL STUDIO 2008，并新建一个网站 打开文件，找到节点，将该节点改为： 3将默认创建的页面转为“设计”
3、状态，在工具箱的“数据”标签中找到GridView 控件 和 SqlDataSource 控件，并将GridView 控件和 SqlDataSource控件拖放到中。 4 配置数据源：选择SqlDataSource 控件，点击右上角按钮，并点击“配置数据源”，弹出 的窗口中，“数据连接”下拉框选择SYSConnectionString ，点击下一步，选择“指定自定义 SQL语句或存储过程” ，在 SELECT 标签中输入SQL语句： SELECT , , CASE WHEN sex = 1 THEN 男 ELSE 女 END AS sex, , FROM s LEFT OUTER JOIN c
4、lass ON = 点击下一步，直至完成。 5关联数据源： 选中 GridView 控件，点击右上角按钮，“选择数据源” ， 选择 “SqlDataSource1” 。 6.修改列标题：选择gridview1，点击右上角按钮，点击“编辑列”，在“选定的字段”列表 中，分别选中 “sid,sname,sex,age,cname”字段， 然后， 将其对应的HeaderText 属性改为 “学 号、姓名、性别、年龄、班级”。 7.添加表格显示主题 选中 GridView 控件，点击右上角按钮，点击“自动套用格式”，在主题格式对话框中，选择 一款主题，点击“确定”。 8添加编辑功能： （1） ：选中
5、GridView 控件，点击右上角按钮，点击“编辑列”，在“编辑列”对话框中， 在“可用字段”列表中，展开commandField 节点，选择“编辑、更新、取消”节点，并点 击“添加”按钮，再选择“删除”节点，并点击“添加”按钮，在“选定的字段”列表中， 选中“性别”和“班级”字段，点击右下方的“将此字段转换为TemplateField” ，点击“确 定” 。 （2） ： 拖放一新的SqlDataSource 控件到页面上，此时该控件名称为“SqlDataSource2” ，并 为该控件配置数据源，步骤与SqlDataSource1的步骤一样，其中SQL语句中的SELECT 标签 页填写内容如
6、下：select cname,cid from class ，选中 GridView 控件，点击右上角按钮，点击 “编辑模板” ，在模板框中， “显示”下拉列表里，选择“性别”列中的“EditItemTemplate ” 项， 在 sex 字段的 EditItemTemplate 编辑面板中， 将原 Label 控件删除，添加一个DropdownList 控件如下，为该控件添加两个选择项： 选项 1： text 值=男value 值=1；选项 2：text 值 =女value 值=0 （注：该控件的ID 值改为“ dpsex” ）在 cname 字段的 EditItemTemplate 编辑面
7、板中，将原 TextBox控件删除，添加一个DropdownList（注：该控件的ID 值改为“ dpclass” ） ，在模板框 中， “显示”下拉列表里，选择“班级”列中的“EditItemTemplate ”项，在数据源配置框中， “数据源”选择“SqlDataSource2” ， “显示的数据字段”选择“cname” ， “值选择数据字段” 选择“ cid” ，如下图。点击“确定”，选择模板框，点击右上角的按钮，选择“结束模板编 辑” 。 （3） ： 选在 SqlDataSource1，点击右上角按钮，点击“配置数据源”，一直下一步，在“定 义自定义语句或存储过程”窗口中，选择“UPD
8、ATE ”标签，填写update 语句如下： UPDATE s SET sn = sn, sex = sex, age = age, class_no = class_no WHERE (sno = sno) 然后，一直下一步，完成。 打开页面，类名选择GridView1，方法名称选择：RowUpdating，键入代码： Protected Sub GridView1_RowUpdating( ByVal sender AsObject, ByVal e AsHandles Dim gr As GridViewRow gr = (sex).DefaultValue = CType(dpsex)
9、, DropDownList). (class_no).DefaultValue = CType(dpclass), DropDownList). EndSub 9添加删除功能： （1）选择 SqlDataSource1，点击右上角按钮，点击“配置数据源”, 一直下一步，在“定义 自定义语句或存储过程”窗口中，选择“DELETE ”标签，填写delete 语句如下： DELETE FROM s WHERE sno = sno，然后，一直下一步，完成。 （2）为删除添加确认效果：点击GridView1 ，选择“编辑列” ，在“选定字段中”选择“删 除”项，点击右下方的“将此字段转换为Templa
10、teField” ，再点击“编辑模板” ， 选中“删除”，在“属性”栏中，找到“OnClientClick ” ，添加该属性值。 return ( 确定要删除吗 )，如图： 点击结束模板编辑并保存。 10.添加新增功能： （1）设置界面如图： （2）择 SqlDataSource1 控件，点击右上角按钮，点击“配置数据源”，在“定义自定义语 句或存储过程”对话框中的“INSERT ”标签，填写语句如下： INSERT INTO s(sno, sn, sex, age, class_no) VALUES (sno, sn, sex, age, class_no) （3）3 设置添加代码：Btin
11、sert 按钮双击，添加点击事件如下： Protected Sub btinsert_Click(ByVal sender As Object, ByVal e AsHandles (sno).DefaultValue = (sn).DefaultValue = (sex).DefaultValue = (age).DefaultValue = (class_no).DefaultValue = () EndSub 运行页面，查看效果。 11.设置验证功能 （1） 学号必填验证： 工具箱中，展开验证标签页， 拖放一个RequiedFieldValidator 控件到 txtsid 控件的后面，
12、 设置 RequiredFieldValidator1 的 ControlToValidate 属性为 “txtsno” 和 ErrorMessage 属性为“必须填写！ ”同样的方法为txtsname 和 txtage 添加必填验证。 （2） 年龄必须为整形的验证：在验证标签页中，找到RegularExpressionValidator 控件，拖 放一个 RegularExpressionValidator 控件到 txtage 的后面， 设置 RegularExpressionValidator1 的 ControlToValidate、ErrorMessage 、ValidationEx
13、pression 属性分别为： “ txtage” ； “整数型”； “/d+ ” （3） 为验证分组 将以上添加的RequiredFieldValidator 和 RegularExpressionValidator 控件以及btinsert 控件的 ValidationGroup 属性设为abc， （4） 设置学号不能重复验证： 首先添加验证函数如下： Public Function havethisid(ByVal sn As String) AsBoolean Dim cnn AsDim adpt AsDim rst AsNewcnn = New SYSConnectionString
14、).ConnectionString) adpt = New select * from s where sno= & , cnn) (rst) havethisid = (0). 0 EndFunction EndClass 更改 btinsert 的点击事件如下： Protected Sub btinsert_Click(ByVal sender As Object, ByVal e AsHandles If havethisid = FalseThen (sno).DefaultValue = (sn).DefaultValue = (sex).DefaultValue = (age).
15、DefaultValue = (class_no).DefaultValue = () Else , , alert( 当前学号不存在！), True) EndIf EndSub （5）修改要有合法性验证： 1） 2）将“年龄”字段转化为TemplateField 3）点击“编辑模板”，选择 4） 在验证标签页中， 找到 RegularExpressionValidator控件， 拖放一个 RegularExpressionValidator 控 件 到TextBox1 的 后 面 ， 设 置RegularExpressionValidator2的ControlToValidate 、 Err
16、orMessage 、ValidationExpression 属性分别为： “TextBox1” ； “整数型”； “/d+ ” 12设置查询功能：在上一个网站的基础上，新建一文件夹Query，并在该文件夹下新建一 网页，网页上拖放HTML 标签下的table 控件，设为 1 列 2 行，在第二行中放置一个GridView 控件，并拖放一个SqlDatasource 控件，在SqlDatasource 控件的 Select 标签页中设置查询语 句： select sid,sname,case sex when 1 then 男 else 女 end as sex ,age,cname from student left join class on = 并将 GridView 的数据源指向SqlDatasource 控件，设置 GridView 的列标题， 在第一个单元格 中拖放一个TextBox控件， 3 个 RadioButton 控件， 1 个 Button 控件，控件的属性： 控件属性属性值 TextBox(ID)txtval
