【正文】 任務書事實數據存放于綜合數據庫中，其結構見表411。 表411 開課任務書數據庫表字段名稱說明功能數據類型寬度小數XQDH學期代號記錄開課的學期int16KCDH課程代號記錄所開課程的代號int8JSDH教師代號記錄所開課程任課老師的代號int8XSS學時數記錄所開課程的學時int3QSZ起始周記錄所開課程的起始周int2ZZZ終止周記錄所開課程的終止周int2KKZS開課周數記錄所開課程的周次int2ZXS周學時記錄所開課程的周學時int3KCXZ課程性質記錄所開課程的是考試課還是考查課char8RS人數記錄所開課程講授對象的人數int3JSH教室號記錄各個教室代號int6BJDH班級代號記錄所開課程的班級int6對學期代號給出一種便于理解又能清楚反映其屬性的表述方式。用一個整數串作為學期的代號，整數串含有6位整數,如圖412所示:例： 整數串 2006 01 年份 學期號 圖 412 學期代號示例1時間模式數據庫表用于存放用戶選定的時間組合方式及其相應的優(yōu)先級信息。其結構見表412。表 412 時間模式數據庫表字段名稱說明功能數據類型寬度小數ZXS周學時記錄課程的周學時數int6YSJ優(yōu)先級記錄該時間組合所設的優(yōu)先級int1Z1周一記錄周一上課時段int4Z2周二記錄周二上課時段int4Z3周三記錄周三上課時段int4Z4周四記錄周四上課時段int4Z5周五記錄周五上課時段int41教學信息數據庫表用于存放排課中所需要的教師上課信息和教師提出的上課要求，為編排課表提供約束條件。其結構見表413。表413教學信息數據庫表字段名稱說明功能數據類型寬度小數JSDH教師代號記錄課程的主講教師代號int16KCDH課程代號記錄所上課程的課程代號int8ZDSJ指定時間記錄教師所要求上課的時間char6JSLX教室類型記錄教師所上課的教室類型int8BJDH班級代號記錄上該課程的班級代號int8RS人數記錄上該課程的總人數int3ZYDH專業(yè)代號記錄上該課程班級的所屬專業(yè)代號int61教室占用情況表用于存放各個教室的占用情況，用來給教室報表提供數源。其結構見表414。表 414 教室占用情況數據庫表字段名稱說明功能數據類型寬度小數JSLDH教學樓代號記錄教室所在的教學樓代號int4JSDH教室代號記錄該教室的代號int8ZYQK占用情況記錄該教室的占用情況char21沖突信息數據庫排課系統(tǒng)綜合數據包括作為排課事實的班級、課程、課時、教師等初始信息，也包括作為排課系統(tǒng)輸出的課表數據及其它輔助數據。 沖突信息數據庫:存放有關死鎖課程的相關信息。具體見表415表 415 沖突信息數據庫表字段名稱說明功能數據類型寬度小數KCDH課程代號記錄沖突課程的代號int4ZXS周學時記錄課程的周學時數int2JSXM主講教師記錄主講教師姓名char8BJMC班級名稱記錄該授課班級名稱char10JSDH人數記錄班級的總人數int3XBMC系部記錄上課班級所屬系部char121用戶密碼數據庫表Password存放個用戶名稱、口令、權限。該表通過設置用戶的權限和密碼來實現(xiàn)系統(tǒng)功能設計中的分角色設計不同的用戶可以設定不同的權限級別，不同的級別則對應不同的操作內容。具體見表416。表416 用戶密碼數據庫表字段名稱說明功能數據類型寬度小數YH用戶記錄用戶名稱char20MM密碼記錄用戶登陸的密碼char20QX權限記錄該用戶所擁有的權限char8以班為單位的課表，其形式如表417所示。表417 以班級為單位的課程表節(jié)次星期一星期二星期三星期四星期五12課程名、教室名、教師名、總學時、周學時課程名、教室名、教師名、總學時、周學時課程名、教室名、教師名、總學時、周學時課程名、教室名、教師名、總學時、周學時課程名、教室名、教師名、總學時、周學時34課程名、教室名、教師名、總學時、周學時課程名、教室名、教師名、總學時、周學時課程名、教室名、教師名、總學時、周學時課程名、教室名、教師名、總學時、周學時課程名、教室名、教師名、總學時、周學時56課程名、教室名、教師名、總學時、周學時課程名、教室名、教師名、總學時、周學時課程名、教室名、教師名、總學時、周學時課程名、教室名、教師名、總學時、周學時課程名、教室名、教師名、總學時、周學時78課程名、教室名、教師名、總學時、周學時課程名、教室名、教師名、總學時、周學時課程名、教室名、教師名、總學時、周學時課程名、教室名、教師名、總學時、周學時課程名、教室名、教師名、總學時、周學時這顯然不是一個關系(二維表)，因此不能以此來直接建立數局庫。我們可以看到，課表中涉及教師、教室、課程、班級四類對象，課程的總學時、周學時是課程對象的一個屬性。為了實現(xiàn)排課，系統(tǒng)要知道這個對象的有關信息，例如關于教室要知道其座位數，要知道課程的總學時、周學時、對教室的要求等。按照實體－聯(lián)系分析方法，這四類數據對象建立的數據庫，其字段可定義為對象的屬性。通過對這個對象類中的具體對象編號，可以對數據庫進行訪問，當對象的屬性發(fā)生變化時，僅對該對象的數據庫進行操作即可，小會對其他對象產生影響。課表可表示為對象之間的聯(lián)系，為這個聯(lián)系建立一個數據庫(稱為課程表數據庫)，做儲存排課結果之用。 對于課程表庫，我們可以采用以教室為關鍵字段建立數據庫，將上述生成的課程信息存儲起來。按照這一思路，每個教室的一個上課時段為一個記錄，包括有教室編號和上課時間、班級編號、課程名稱、任課教師等字段。此結構的最大優(yōu)點是與過去手工排課方式吻合，便于統(tǒng)計教室情況。因此采用這個結構。若學校教室規(guī)模為250個，每周按5天，每天按5大節(jié)課考慮，則數據庫的最大記錄數是6250個。數據庫管理系統(tǒng)是整個數據庫系統(tǒng)的核心，ACCESS作為優(yōu)秀的數據庫管理系統(tǒng)，提供了數據管理與維護的強大手段，為用戶訪問與操縱數據庫提供了友好的圖形界面與簡便的手段。在排課系統(tǒng)中主要用到以下功能和技術：數據庫管理系統(tǒng)是數據獨立于應用而存在，這種應用程序對數據庫系統(tǒng)的非依賴性對應用的開發(fā)至關重要，它使得對數據的變動不至于影響所開發(fā)的應用。 接受SQL指令，在應用開發(fā)過程中，很多對數據庫的操作是通過SQL語句完成的。 事務處理是一種機制，它確保多個SQL語句被當作單個單元來處理。課表編排過程數據的一致性和可恢復性要求很高，在其中采用了事務處理機制。 數據庫規(guī)則施加在數據庫類表上的約束條件，是在數據庫設計中設定的。它可以限定列的取值范圍和是否為可控等等。如果用戶給此列輸入的值不滿足約束條件，在存盤時數據庫會報錯，數據庫只接受滿足條件的數據。因此，規(guī)則可以保證輸入的數據滿足要求的條件。在自動排課系統(tǒng)的基表設計中留一些字段的設計賦予了約束條件，這樣可以通過數據庫系統(tǒng)自動控制用戶的輸入滿足規(guī)定的要求。 視圖是查看一個或多個表中數據的一種方式。排課結果的查詢本質是多表查詢，在此利用了視圖技術，根據不同的查詢要求，設計不同的視圖，以達到查看一個或多個表中的數據的目的。第5章 計算機排課系統(tǒng)的實現(xiàn)淄博職業(yè)學院計算機自動排課系統(tǒng)的總體流程圖如圖51所示：失敗開 始用戶登錄讀取用戶信息退出程序初始設置輔助設置排課管理課表管理管理自己的用戶信息管理所有的用戶信息失敗超過3次普通用戶系統(tǒng)管理員成功重試否是 圖51 排課系統(tǒng)流程圖該排課系統(tǒng)由1個主窗體和5個功能模塊組成，基礎數據錄入模塊、自動排課模塊、查詢模塊、報表輸出模塊和用戶管理模塊。計算機自動排課系統(tǒng)的主窗體實現(xiàn)排課系統(tǒng)的所有功能。主要包括：基礎數據的錄入、班級的管理、課表的管理、時間段管理、自動排課功能、數據報表功能、用戶管理功能等。如圖52所示。圖52計算機自動排課主窗體打開主窗體，在窗體的右邊有班級管理、課程管理、時間段設置和用戶管理等幾個功能模塊，如果要對班級進行管理，點擊班級管理模塊，就可以實現(xiàn)對班級的添加、刪除、修改等各種操作，其它模塊的管理與班級管理類似。在主窗體中部有生成課表、報表輸出、課表查詢等模塊，其中課表輸出可以直接輸出也可以輸出到電子表格中。在主窗體創(chuàng)建過程中，使用了工程。具體設計如下：打開Visual Basic后，單擊文件|新建工程，在工程模板里選擇標準 EXE,這時Visual Basic將自動產生一個Form窗體，刪除這個窗體，把這個工程保存為“工程1”。部分程序代碼：Dim Classprint As New OpenRs 39。定義打印記錄集Dim xlApp As New Dim sendsql As StringPrivate Sub gridcs() 39。對grid所需求進行初始化On Error GoTo finishSelect Case (hang, 7).Text Case 周一至周五 = 5 * nknumber + 1 = 5 * nknumber + 1 Case 周一至周六 = 6 * nknumber + 1 = 6 * nknumber + 1 Case 周一至周日 = 7 * nknumber + 1 = 7 * nknumber + 1End Select 39。以下是列出對應的教師資源以及班級資源(1, 1, 1, 1).ClearText(1, 1, 1, 1).ClearTextSet kc2 = (select 占用 from 占用 where 教師姓名=39。 amp。 (hang, 5).Text amp。 39。)For i = 1 To 1(1, i).Text = Mid((0), i, 1)Next(1, 1, 1, 1).Alignment = cellCenterCenterSet kc2 = (select 占用 from 課程占用 where 班級=39。 amp。 amp。 39。)For i = 1 To 1(1, i).Text = Mid((0), i, 1)NextExit Subfinish:MsgBox End SubPrivate Sub grid4hq() 39。獲取教師與班級之間的課程點On Error GoTo finish = 1Dim m As IntegerFor i = 1 To 1 Step n 39。通過對比對教師與班級之間的可以排課點進行規(guī)納 If (1, i).Text = 0 Then If (1, i).Text = 0 Then = + 1 ( 1, 1).Text = i End If End If Next Exit Subfinish:MsgBox End SubPrivate Sub asPopup1_Click(Cancel As Boolean)kctable = 登陸 = 用戶管理 1End SubPrivate Sub asPopup10_Click(Cancel As Boolean)kctable = 班級名稱 = 班級管理 1End SubPrivate Sub asPopup2_Click(Cancel As Boolean)kctable = 教學時間段 = 教學時間段設置 1End SubPrivate Sub asPopup3_Click(Cancel As Boolean)EndEnd SubPrivate Sub asPopup4_Click(Cancel As Boolean)kctable = 課程名 = 課程管理 1End SubPrivate Sub asPopup5_Click(Cancel As Boolean) 39。這里是對一些生成錯誤的數據進行還原Dim vyes As Stringvyes = MsgBox(當系統(tǒng)出現(xiàn)排課錯誤時進行的完全還原操作,確定嗎？, vbQuestion + vbYesNo, 提示)If vyes = vbYes ThenSet kc2 = (update 占用 set 占用=39。00000000000