實驗一-：-SQL-Server-數(shù)據(jù)庫的安裝和創(chuàng)建數(shù)據(jù)庫

實驗一 ： SQL Server 數(shù)據(jù)庫的安裝和創(chuàng)建數(shù)據(jù)庫一、實驗目的：熟悉SQL Server 2000的安裝過程及運行環(huán)境，掌握企業(yè)管理器的使用二、實驗內容：在服務器的操作系統(tǒng)下安裝SQL Server 2000版本的服務器端和客戶端軟件，在安裝成功后，登錄SQL Server服務器，運行企業(yè)管理器和查詢分析器。三、實驗步驟：實驗二 ：創(chuàng)建表及對表的基本操作一、實驗目的：掌握利用企業(yè)管理器創(chuàng)建數(shù)據(jù)庫、創(chuàng)建表的方法，理解關系型數(shù)據(jù)庫中的表的屬性名、數(shù)據(jù)類型及表的主外鍵等二、實驗內容：創(chuàng)建一個名稱為factory的數(shù)據(jù)庫并建立相關表三、實驗步驟：（1）將主數(shù)據(jù)庫文件factory-data.MDF放置在E：DBF文件夾中，其文件大小自動增長為按5MB增長。（2）將事務日志文件factory-data.MDF放置在E：DBF文件夾中，其文件大小自動增長為按1MB增長。（3） 建立職工表worker，其結構：職工號：int，姓名：char（8），性別：char（2），出生日期：datatime，黨員否：bit，參加工作：datatime，部門號：int。其中“職工號”為主鍵。在worker表中輸入如下記錄：（4） 建立部門表depart，其結構為：部門號：int，部門名：char（10）。其中，“部門號”為主鍵。在depart表中輸入如下記錄：（5）建立職工工資表salary，其結構為：職工號：int，姓名：char（8），出生日期：datatime，工資：dacimal（6，1）。其中“職工號”和“日期”為主鍵。在salary表中輸入如下記錄：（6）建立worker、depart和salary3個表之間的關系。實驗三 ：數(shù)據(jù)查詢一、實驗目的：掌握各種查詢語句的實現(xiàn)，包括一定程度的復雜查詢，掌握利用SQL Server 2000的查詢分析器書寫SQL語句進行各種查詢、插入記錄值及刪除記錄值二、實驗內容：在factory數(shù)據(jù)庫中實現(xiàn)查詢、插入數(shù)據(jù)、刪除數(shù)據(jù)（1）顯示所有職工的年齡。 （2）求出各部門的黨員人數(shù)。 （3）顯示所有職工的姓名和2004年1月份的工資數(shù)。 （4）顯示所有職工的職工號、姓名和平均工資。（5）顯示所有職工的職工號、姓名、部門名和2004年2月份工資，并按部門名順序排列。（6）顯示各部門和該部門的所有職工平均工資。（7）顯示所有平均工資高于1200的部門名和對應的平均工資。（8）顯示所有職工的的職工號、姓名和部門類型，其中財務處和人事處屬管理部門，市場部屬市場部門（9）若存在職工號為10的職工，則顯示其工作部門名稱，否則顯示相應提示信息。（10）求出男女職工的平均工資，若男職工平均工資與女職工平均工資在1.50.8之間，則顯示“男職工和女職工的平均工資差不多”的信息：否則，顯示“女職工比男職工的工資高多了”的信息三、實驗步驟：select o.id,c.textfrom sysobjects o inner JOIN syscomments c on o.id=c.idwhere o.type= p and = oakland_authorsgoalter proc oakland_authorswith ENCRYPTIONas select au_fname,au_lname,address,city,zipfrom pubs.authorswhere state = caorder by au_lname,au_fname goselect o.id ,c.textfrom sysobjects o inner joIn syscomments c on o.id=c.idwhere o.type=p and =oakland_authorsgoselect customer.customerfrom customer,loanwhere loan.bank= 農業(yè)銀行and loan.laccount= customer.account實驗四 ：索引的應用一、實驗目的：利用企業(yè)管理器在數(shù)據(jù)庫的表上創(chuàng)建索引，理解創(chuàng)建索引的目的意義二、實驗內容：在factory數(shù)據(jù)庫的三章表中建立索引三、實驗步驟：實驗五 ：視圖的應用一、實驗目的：通過企業(yè)管理器和查詢分析器建立視圖，掌握創(chuàng)建視圖的方法，理解利用視圖的便利之處二、實驗內容：（1）建立視圖view1，查詢所有職工的職工號、姓名、部門名和2004年2月份的工資，并按部門名順序排序（2）建立視圖view2，查詢所有職工的職工號、姓名和平均工資（3）建立視圖view3，查詢各部門和該部門的所有職工的平均工資（4）顯示視圖view3的定義三、實驗步驟：select bankfrom depositegroup by bankhaving sum(account) = all ( select sum(account ) as sumc from deposite where ddate like 2004% group by bank )select sum(account ) from deposite group by bank where ddate = 2004-01-01 and ddate = 2004-12-31 use studentgocreate view 數(shù)據(jù)庫系統(tǒng)概論成績 as select a.sid,a.sname,ame,c.score from t_stu as a inner join t_score as c on a.sid=c.sid inner join t_course as b on b.cid=c.cid where ame=數(shù)據(jù)庫系統(tǒng)概論goselect * from 數(shù)據(jù)庫系統(tǒng)概論成績order by score desc實驗六：存儲過程與觸發(fā)器的應用一、實驗目的：掌握通過企業(yè)管理器和查詢分析器創(chuàng)建存儲過程與觸發(fā)器的方法，理解存儲過程與觸發(fā)器的運行機理二、實驗內容：（1）創(chuàng)建一個為worker表添加職工記錄的存儲過程addworker（2）創(chuàng)建一個存儲過程delworker刪除worker表中指定職工號的記錄（3顯示存儲過程delworker（4）刪除存儲過程delworker和addworker（5）在表depart上創(chuàng)建一個觸發(fā)器depart_update，當更改部門號時同步更改worker表中對應的部門號（6）在表worker上創(chuàng)建一個觸發(fā)器worker_delete，當刪除職工記錄時同步刪除slalry表中對應職工的工資記錄（7）刪除觸發(fā)器depart_update和worker_delete三、實驗步驟：if exists(select name from sysobjects where name= p1 and type = p)drop proc p1gocreate proc p1 bankname varchar(50), count5y varchar(50) outputas select count5y = bankfrom depositewhere bank = bankname and dtype = 定期go declare bankn varchar(50) exec p1 交通銀行,bankn output gocreate proc dbo.dt_addtosourcecontrol vchSourceSafeINI varchar(255) = , vchProjectName varchar(255) =, vchComment varchar(255) =, vchLoginName varchar(255) =, vchPassword varchar(255) =asset nocount ondeclare iReturn intdeclare iObjectId intselect iObjectId = 0declare iStreamObjectId intselect iStreamObjectId = 0declare VSSGUID varchar(100)select VSSGUID = SQLVersionControl.VCS_SQLdeclare vchDatabaseName varchar(255)select vchDatabaseName = db_name()declare iReturnValue intselect iReturnValue = 0declare iPropertyObjectId intdeclare vchParentId varchar(255)declare iObjectCount intselect iObjectCount = 0 exec iReturn = sp_OACreate VSSGUID, iObjectId OUT if iReturn 0 GOTO E_OAError /* Create Project in SS */ exec iReturn = sp_OAMethod iObjectId, AddProjectToSourceSafe, NULL, vchSourceSafeINI, vchProjectName output, SERVERNAME, vchDatabaseName, vchLoginName, vchPassword, vchComment if iReturn 0 GOTO E_OAError exec iReturn = sp_OAGetProperty iObjectId, GetStreamObject, iStreamObjectId OUT if iReturn 0 GOTO E_OAError /* Set Database Properties */ begin tran SetProperties /* add high level object */ exec iPropertyObjectId = dbo.dt_adduserobject_vcs VCSProjectID select vchParentId = CONVERT(varchar(255),iPropertyObjectId) exec dbo.dt_setpropertybyid iPropertyObjectId, VCSProjectID, vchParentId , NULL exec dbo.dt_setpropertybyid iPropertyObjectId, VCSProject , vchProjectName , NULL exec dbo.dt_setpropertybyid iPropertyObjectId, VCSSourceSafeINI , vchSourceSafeINI , NULL exec dbo.dt_setpropertybyid iPropertyObjectId, VCSSQLServer, SERVERNAME, NULL exec dbo.dt_setpropertybyid iPropertyObjectId, VCSSQLDatabase, vchDatabaseName, NULL if error 0 GOTO E_General_Error commit tran SetProperties declare cursorProcNames cursor for select convert(varchar(255), name) from sysobjects where type = P and name not like dt_% open cursorProcNames while 1 = 1 begin declare vchProcName varchar(255) fetch next from cursorProcNames into vchProcName if fetch_status 0 break select colid, text into #ProcLines from syscomments where id = object_id(vchProcName) order by colid declare iCurProcLine int declare iProcLines int select iCurProcLine = 1 select iProcLines = (select count(*) from #ProcLines) while iCurProcLine = iProcLines begin declare pos int select pos = 1 declare iCurLineSize int select iCurLineSize = len(select text from #ProcLines where colid = iCurProcLine) while pos = iCurLineSize begin declare vchProcLinePiece varchar(255) select vchProcLinePiece = convert(varchar(255), substring(select text from #ProcLines where colid = iCurProcLine), pos, 255 ) exec iReturn = sp_OAMethod iStreamObjectId, AddStream, iReturnValue OUT, vchProcLinePiece if iReturn 0 GOTO E_OAError select pos = pos + 255 end select iCurProcLine = iCurProcLine + 1 end drop table #ProcLines exec iReturn = sp_OAMethod iObjectId, CheckIn_StoredProcedure, NULL, sProjectName = vchProjectName, sSourceSafeINI = vchSourceSafeINI, sServerName = SERVERNAME, sDatabaseName = vchDatabaseName, sObjectName = vchProcName, sComment = vchComment, sLoginName = vchLoginName, sPassword = vchPassword, iVCSFlags = 0, iActionFlag = 0, sStream = if iReturn = 0 select iObjectCount = iObjectCount + 1 endCleanUp:close cursorProcNamesdeallocate cursorProcNames select vchProjectName select iObjectCount returnE_General_Error: /* this is an all or nothing. No specific error messages */ goto CleanUpE_OAError: exec dbo.dt_displayoaerror iObjectId, iReturn goto CleanUpGO實驗七 ： SQL語句查詢功能一、實驗目的：掌握利用查詢分析器，使用SQL語句實現(xiàn)上面的各種功能的方法二、實驗內容：（1）刪除factory數(shù)據(jù)庫上各個表之間建立的關系（2）顯示各職工的工資記錄和相應的工資小計。（3）按性別和部門名的所有組合方式列出相應的平均工資。（4）在worker表中使用以下語句插入一個職工記錄：insert into depart values (5,設備處)在對worker 和depart 表進行完整外部連接顯示職工的職工號、姓名、和部門名，然后刪除這兩個插入的記錄(5) 顯示最高工資的職工的職工號、姓名、部門名、工資發(fā)放日期和工資（6）顯示最高工資的職工所在的的部門名（7）顯示所有平均工資低于全部平均工資的職工的職工號、姓名（8）采用游標方式實現(xiàn)(6)的功能（9）采用游標方式實現(xiàn)(7)的功能（10）先顯示worker表中的職工人數(shù)，開始一個事務，插入一個職工記錄，再顯示worker表中的職工人數(shù)，回滾該事務，最后顯示worker表中的職工人數(shù)（11）在worker表中的部門號列上建立一個非聚集索引，若該索引已存在，則刪除后重建（12）在salary表的職工號列和日期列上創(chuàng)建聚集索引，并且強制唯一性三、實驗步驟：delete from employeeswhere year(birthdate) 2000select distinct customer.customerfrom customer,loanwhere customer.account= loan.laccount and loan.bank = 工商銀行 and customer.customerid in ( select customerid from customer,deposite where customer.account= deposite.daccount and deposite.bank = 工商銀行 )實驗八 ：SQL Server 的管理及數(shù)據(jù)庫的備份與還原一、實驗目的：掌握SQL Server 的管理及數(shù)據(jù)庫的備份與還原的方法，自動實現(xiàn)數(shù)據(jù)庫的管理二、實驗內容：（1）創(chuàng)建一個登錄賬號ABC/（2）為factory數(shù)據(jù)庫中創(chuàng)建一個用戶帳號，并將其關聯(lián)到ABC登錄賬號中（3）用企業(yè)管理器對factory數(shù)據(jù)庫執(zhí)行完全備份和還原操作三、實驗步驟：實驗九：數(shù)據(jù)庫與開發(fā)工具的協(xié)同使用一、實驗目的：全面掌握數(shù)據(jù)庫的系統(tǒng)開發(fā)過程，通過實際例子深入理解數(shù)據(jù)庫的管理、使用和維護技巧二、實驗內容：綜合前面所學習的數(shù)據(jù)庫知識，結合VB開發(fā)一個學生檔案系統(tǒng)，完成班級內的學生個人資料管理、學習成績管理、學生成績統(tǒng)計、學期排名等日常教學中比較常用的功能，主要功能如下：（1）學生個人資料管理（2）學生成績管理(3)學生成績統(tǒng)計、學期排名 三、實驗步驟：部分代碼如下將圖片保存到數(shù)據(jù)庫中Private Sub SaveToDB(ByRef PICField As ADODB.Field, DiskFile As String