第12章 游标和事务(例题)

《第12章 游标和事务(例题)》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、游标的应用利用所学知识，结合示例分析如何创建、使用游标。【例12-7】创建游标，并读取游标的数据。显示学生表（tblStudents）的信息。USECJMS--使用数据库CJMSDECLAREST_cursorSCROLLCURSOR--声明游标名FORSELECT*FROMtblStudents--标准游标--FORREADONLY只读游标--FORUPDATE更新游标OPENST_cursor--打开游标FETCHFIRSTFROMST_cursor--返回游标中的第一行FETCHNEXTFROMST_cursor--返回游标中的当前记录的下一行FETCHLA

2、STFROMST_cursor--返回游标中的最后行FETCHPRIORFROMST_cursor--返回游标中的最前行FETCHABSOLUTE2FROMST_cursor--返回游标中的第二行FETCHRELATIVE2FROMST_cursor--返回游标中的当前位置起向后第二行CLOSEST_cursor--关闭游标DEALLOCATEST_cursor--释放游标执行该SQL语句，显示如图12-1所示效果。图12-1游标的基本操作【例12-8】利用游标更新数据，首先查看tblStudents表中的每一行，将Classes等于‘电子0801’的记录的Dep

3、artment改为‘电子工程系’。USECJMS--使用数据库CJMSDECLARE@studentIdnchar(10),@namenchar(10),@sexnchar(2),@classesnchar(50),@Departmentsnchar(50)DECLAREedit_cursorCURSOR--声明游标名FORSELECTStudentID,Sname,Sex,Classes,DepartmentFROMtblStudents--标准游标--FORREADONLY只读游标FORUPDATE--更新游标OPENedit_cursor--打开游标FETC

4、HNEXTFROMedit_cursorINTO@studentId,@name,@sex,@classes,@Departments--从游标中提取第一行WHILE@@FETCH_STATUS=0BEGINIF@classes='电子0801'UPDATEtblStudentsSETDepartment='电子工程系'WHERECURRENTOFedit_cursorFETCHNEXTFROMedit_cursorINTO@studentId,@name,@sex,@classes,@Departments--从游标中提取下一行ENDCLOSEedit_curs

5、or--关闭游标DEALLOCATEedit_cursor--释放游标运行该SQL代码，显示如图12-2所示的效果。图12-2利用游标更新数据【例12-9】利用游标判断记录是否存在，查找tblStudents表中StudentID等于‘S200820005’的记录是否存在。USECJMSDECLARESER_CURSORCURSORFORSELECT*FROMtblStudentsWHEREStudentID='08102101'OPENSER_cursorFETCHNEXTFROMSER_CURSORIF@@FETCH_STATUS=0PRINT'该记录存在'E

6、LSEPRINT'该记录不存在'CLOSESER_cursorDEALLOCATESER_cursor运行该SQL代码，显示如图12-3所示的效果。图12-3利用游标判断记录是否存在事务的应用【例12-10】在成绩管理系统中删除课程信息表（tblCourses）中“操作系统（C8030268）”这门课程，将学生课程成绩表（tblScore）中的“操作系统”的课程号（C8030268）改为“计算机操作系统”的课程号（C8030268）。BEGINTRANSACTIONmy_Tran_delete--开始一个事务USECJMS--使用数据库CJMSGODELETEFR

7、OMtblCoursesWHERECourseID='C8030268'SAVETRANSACTIONafter_delete--设置事务恢复点UPDATEtblScoreSETCourseID='C8030269'WHERECourseID='C8030268'--将学生课程成绩表（tblScore）中的“操作系统”的课程号改为“计算机操作系统”的课程号IF@@ERROR<>0OR@@ROWCOUNT=0--检查是否更新成功，@@ERROR返回上一个SQL语句状态，非零即说明出错，错则回滚之BEGINROLLBACKTRANafter_delete--回滚到保存

8、点afte