1、實驗一 ： SQL Server 數據庫的安裝和創建數據庫一、實驗目的：熟悉SQL Server 2000的安裝過程及運行環境，掌握企業管理器的使用二、實驗內容：在服務器的操作系統下安裝SQL Server 2000版本的服務器端和客戶端軟件，在安裝成功后，登錄SQL Server服務器，運行企業管理器和查詢分析器。三、實驗步驟：實驗二 ：創建表及對表的基本操作一、實驗目的：掌握利用企業管理器創建數據庫、創建表的方法，理解關系型數據庫中的表的屬性名、數據類型及表的主外鍵等二、實驗內容：創建一個名稱為factory的數據庫并建立相關表三、實驗步驟：（1）將主數據庫文件factory-data.M

2、DF放置在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，其結構為

3、：職工號：int，姓名：char（8），出生日期：datatime，工資：dacimal（6，1）。其中“職工號”和“日期”為主鍵。在salary表中輸入如下記錄：（6）建立worker、depart和salary3個表之間的關系。實驗三 ：數據查詢一、實驗目的：掌握各種查詢語句的實現，包括一定程度的復雜查詢，掌握利用SQL Server 2000的查詢分析器書寫SQL語句進行各種查詢、插入記錄值及刪除記錄值二、實驗內容：在factory數據庫中實現查詢、插入數據、刪除數據（1）顯示所有職工的年齡。 （2）求出各部門的黨員人數。 （3）顯示所有職工的姓名和2004年1月份的工資數。 （4）顯示

4、所有職工的職工號、姓名和平均工資。（5）顯示所有職工的職工號、姓名、部門名和2004年2月份工資，并按部門名順序排列。（6）顯示各部門和該部門的所有職工平均工資。（7）顯示所有平均工資高于1200的部門名和對應的平均工資。（8）顯示所有職工的的職工號、姓名和部門類型，其中財務處和人事處屬管理部門，市場部屬市場部門（9）若存在職工號為10的職工，則顯示其工作部門名稱，否則顯示相應提示信息。（10）求出男女職工的平均工資，若男職工平均工資與女職工平均工資在1.50.8之間，則顯示“男職工和女職工的平均工資差不多”的信息：否則，顯示“女職工比男職工的工資高多了”的信息三、實驗步驟：select o.

5、id,c.textfrom sysobjects o inner JOIN syscomments c on o.id=c.idwhere o.type= 'p' and = 'oakland_authors'goalter proc oakland_authorswith ENCRYPTIONas select au_fname,au_lname,address,city,zipfrom pubs.authorswhere state = 'ca'order by au_lname,au_fname goselect o.id ,c

6、.textfrom sysobjects o inner joIn syscomments c on o.id=c.idwhere o.type='p' and ='oakland_authors'goselect customer.customerfrom customer,loanwhere loan.bank= '農業銀行'and loan.laccount= customer.account實驗四 ：索引的應用一、實驗目的：利用企業管理器在數據庫的表上創建索引，理解創建索引的目的意義二、實驗內容：在factory數據庫的三章表

7、中建立索引三、實驗步驟：實驗五 ：視圖的應用一、實驗目的：通過企業管理器和查詢分析器建立視圖，掌握創建視圖的方法，理解利用視圖的便利之處二、實驗內容：（1）建立視圖view1，查詢所有職工的職工號、姓名、部門名和2004年2月份的工資，并按部門名順序排序（2）建立視圖view2，查詢所有職工的職工號、姓名和平均工資（3）建立視圖view3，查詢各部門和該部門的所有職工的平均工資（4）顯示視圖view3的定義三、實驗步驟：select bankfrom depositegroup by bankhaving sum(account) >= all ( select sum(account

8、) 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 數據庫系統概論成績 as select a.sid,a.sname,ame,c.score from t_stu as a inner join t_sco

9、re as c on a.sid=c.sid inner join t_course as b on b.cid=c.cid where ame='數據庫系統概論'goselect * from 數據庫系統概論成績order by score desc實驗六：存儲過程與觸發器的應用一、實驗目的：掌握通過企業管理器和查詢分析器創建存儲過程與觸發器的方法，理解存儲過程與觸發器的運行機理二、實驗內容：（1）創建一個為worker表添加職工記錄的存儲過程addworker（2）創建一個存儲過程delworker刪除worker表中指定職工號的記錄（3顯示存儲過程delworker（4）

10、刪除存儲過程delworker和addworker（5）在表depart上創建一個觸發器depart_update，當更改部門號時同步更改worker表中對應的部門號（6）在表worker上創建一個觸發器worker_delete，當刪除職工記錄時同步刪除slalry表中對應職工的工資記錄（7）刪除觸發器depart_update和worker_delete三、實驗步驟：if exists(select name from sysobjects where name= 'p1' and type = 'p')drop proc p1gocreate proc p

11、1 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 var

12、char(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 V

13、SSGUID = 'SQLVersionControl.VCS_SQL'declare 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 VSS

14、GUID, 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_O

15、AError 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 vch

16、ParentId = 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, 'VCSSourceSafeIN

17、I' , 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 cursorPro

18、cNames 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

19、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 iCurLineSiz

20、e 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

21、= 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, sProj

22、ectName = vchProjectName, sSourceSafeINI = vchSourceSafeINI, sServerName = SERVERNAME, sDatabaseName = vchDatabaseName, sObjectName = vchProcName, sComment = vchComment, sLoginName = vchLoginName, sPassword = vchPassword, iVCSFlags = 0, iActionFlag = 0, sStream = '' if iReturn = 0 select iOb

23、jectCount = 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實驗七

24、： SQL語句查詢功能一、實驗目的：掌握利用查詢分析器，使用SQL語句實現上面的各種功能的方法二、實驗內容：（1）刪除factory數據庫上各個表之間建立的關系（2）顯示各職工的工資記錄和相應的工資小計。（3）按性別和部門名的所有組合方式列出相應的平均工資。（4）在worker表中使用以下語句插入一個職工記錄：insert into depart values (5,設備處)在對worker 和depart 表進行完整外部連接顯示職工的職工號、姓名、和部門名，然后刪除這兩個插入的記錄(5) 顯示最高工資的職工的職工號、姓名、部門名、工資發放日期和工資（6）顯示最高工資的職工所在的的部門名（7）

25、顯示所有平均工資低于全部平均工資的職工的職工號、姓名（8）采用游標方式實現(6)的功能（9）采用游標方式實現(7)的功能（10）先顯示worker表中的職工人數，開始一個事務，插入一個職工記錄，再顯示worker表中的職工人數，回滾該事務，最后顯示worker表中的職工人數（11）在worker表中的部門號列上建立一個非聚集索引，若該索引已存在，則刪除后重建（12）在salary表的職工號列和日期列上創建聚集索引，并且強制唯一性三、實驗步驟：delete from employeeswhere year(birthdate) <2000select distinct customer.c

26、ustomerfrom 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 的管理及數據庫的備份與還原一、實驗目的：掌握SQL Server 的管理及數據庫的備

27、份與還原的方法，自動實現數據庫的管理二、實驗內容：（1）創建一個登錄賬號ABC/123456（2）為factory數據庫中創建一個用戶帳號，并將其關聯到ABC登錄賬號中（3）用企業管理器對factory數據庫執行完全備份和還原操作三、實驗步驟：實驗九：數據庫與開發工具的協同使用一、實驗目的：全面掌握數據庫的系統開發過程，通過實際例子深入理解數據庫的管理、使用和維護技巧二、實驗內容：綜合前面所學習的數據庫知識，結合VB開發一個學生檔案系統，完成班級內的學生個人資料管理、學習成績管理、學生成績統計、學期排名等日常教學中比較常用的功能，主要功能如下：（1）學生個人資料管理（2）學生成績管理(3)學生成績統計、學期排名 三、實驗步驟：部分代碼如下'將圖片保存到數據庫中Private Sub SaveToDB(ByRef PICField As ADODB.Field, DiskFile As String)Const BLOCKSIZE = 4096 '每次讀寫數據塊的大小Dim byteData() As Byte &