• 
    

    
    

      99热精品在线国产_美女午夜性视频免费_国产精品国产高清国产av_av欧美777_自拍偷自拍亚洲精品老妇_亚洲熟女精品中文字幕_www日本黄色视频网_国产精品野战在线观看

      ?

      高校職工考核管理系統(tǒng)的設計*

      2012-11-15 01:02:48顧遠利
      濰坊學院學報 2012年6期
      關鍵詞:窗體教職工管理系統(tǒng)

      顧遠利

      (濰坊學院,山東 濰坊 261061)

      隨著近年來高校間競爭的加劇,對管理工作的要求越來越高,只有利用先進的技術手段,改進傳統(tǒng)的管理方式,才能進一步提高管理效能,取得良好的管理效果。利用校園網(wǎng),把人事信息、教學、科研等教職工管理的各個環(huán)節(jié)全部納入計算機管理,實現(xiàn)管理數(shù)據(jù)由用戶分別錄入,歸口部門審核確認的管理工作過程,建成各部門信息共享、查詢自如、方便快捷的教職工考核管理系統(tǒng),將為學校的日常管理和領導科學決策提供必要的平臺支持。

      1 系統(tǒng)需求分析

      通過對高校教職工管理制度和管理方式的調研,在深入分析教職工各項管理工作流程的基礎上,確立了以模塊管理為主線,基于C/S與B/S相結合的體系結構[1],滿足高校教職工管理需求的系統(tǒng)解決方案。首先,從系統(tǒng)的功能和性能兩方面進行系統(tǒng)需求分析,列出部分功能模型和業(yè)務流程圖;進行系統(tǒng)設計時,再根據(jù)系統(tǒng)分析得到的結果,細化系統(tǒng)定義,制定系統(tǒng)設計原則及所采用的技術路線和體系結構,進行系統(tǒng)具體功能模塊劃分和數(shù)據(jù)庫設計。

      系統(tǒng)主要包括教職工基本信息、教學、科研管理三個主要的業(yè)務模塊。各個模塊之間共享人事基本信息。系統(tǒng)的模塊設計如圖1所示。

      圖1 系統(tǒng)的模塊設計圖

      教職工考核管理系統(tǒng)以教職工工號作為教職工的唯一標識,將教職工的個人基本信息、教學、科研等管理數(shù)據(jù)信息進行整合,形成一個統(tǒng)一的教職工管理、評價工作平臺。將教職工的結構化數(shù)據(jù)信息和非結構化文檔、多媒體數(shù)據(jù)信息統(tǒng)一起來,構成全校范圍內的教職工考核管理信息數(shù)據(jù)庫,以便各職能部門的管理人員及時準確地把握教職工全部考核信息,為實現(xiàn)深入的數(shù)據(jù)分析奠定堅實的信息基礎。

      教職工考核管理業(yè)務流程設計的主要原則是:管理科學、脈絡清晰、操作簡便。根據(jù)高校教職工考核管理業(yè)務流程定義及需求分析結果,可以獲得教職工發(fā)出信息審核申請到綜合評價各階段的業(yè)務流程圖,并用它來指導后面的程序設計[2]。整個教職工考核評價工作主要過程如圖2所示。

      圖2 教職工綜合評價流程圖

      2 系統(tǒng)設計

      本系統(tǒng)設計采用瀏覽器/服務器的體系架構,利用ASP動態(tài)網(wǎng)頁技術作為程序開發(fā)工具,采用SQL Server 2000數(shù)據(jù)庫[3],使用ADO數(shù)據(jù)庫作為訪問接口??蛻舳送ㄟ^訪問服務器的網(wǎng)頁實現(xiàn)系統(tǒng)登陸,系統(tǒng)運行環(huán)境可以是Windows2000、WindowXP等。

      采用ASP技術,具有如下優(yōu)點:客戶端訪問迅速,使用簡便;程序編寫簡單,兼容性強,易于擴展;安全性強。

      在教職工考核管理系統(tǒng)中,權限管理體系主要由數(shù)據(jù)庫控制、權限管理、運行控制三個部分構成。系統(tǒng)運行時,這三部分相互配合,共同構成教職工考核管理系統(tǒng)的強大權限管理體系,保障系統(tǒng)安全。部分窗體程序設計如下:

      信息管理窗體主要設計程序:

      public

      modi:boolean;

      xcaption:string;

      end;

      var

      yggl_Form:Tyggl_Form;

      implementation

      uses main;

      {$R*.dfm}

      procedure Tyggl_Form.FormClose(Sender:TObject;var Action:TCloseAction);

      begin

      Action:=caFree;

      MainForm.N21.Enable:=True;

      end;

      //確定按鈕單擊事件

      procedure Tyggl_Form.cmdokClick(Sender:TObject);

      var

      bmdm,sqlstr:String;

      begin

      //生成檢索所有教職工的SQL語句

      if bmdm_CBox=0then

      begin

      sqlstr:='select a.* b.bmmc,c.zcmc,d.zwmc from ygb a,bmdm b,';

      sqlstr:=sqlstr+'zcdm c,zwdmd where(a.bmdm=b.bmdm)and(a.zcdm=c.zcdm)';

      sqlstr;=sqlstr+'and(a.zwdm=d.zwdm)order by a.bmdm,a.bh');

      end

      else

      //生成檢索某一部門員工的SQL語句

      begin

      bmdm:=IntToStr(bmdm_Cbox.ItemIndex-1);

      sqlstr:='select a.* ,b.bmmc,c.zcmc,d.zwmc from ygb a,td_bmdm b,';

      sqlstr:=sqlstr+'and(a.zwdm=d.zwdm)and(a.bmdm='"+bmdm+"')order by a.bh';

      end;

      Query1.Close;

      Query1.SQL.Clear;

      Query1.SQL.Add(sqlstr);

      Query1.Open;

      //根據(jù)檢索結構,修改探出菜單項的可操作性

      if Query1.RecordCount>0then

      begin

      N1.Enabled:=True;

      N2.Enabled:=True;

      N3.Enabled:=True;

      end

      else

      begin

      N1.Enabled:=False;

      N2.Enabled:=False;

      N3.Enabled:=False;

      end;

      end;

      人員管理設計程序主要部分:

      /添加員工探出菜單單擊事件

      procedure Tyggl_Form.N1Click(Sender:TObject);

      begin

      //設置表識

      Xcaption:='添加教職工信息';

      modi:=False;

      //打開添加/修改教職工信息窗體

      Application.CreateForm(Tygxx_Form,ygxx_Form);

      ygxx_Form.ShowModal;

      end;

      //修改員工 彈出菜單單擊事件

      procedure Tyggl_Form.N2Click(Sender:TObject);

      begin

      //設置表識

      Xcaption:='修改教職工信息';

      modi:=True;

      //打開添加/修改員工信息窗體

      Application.CreateForm(Tygxx_Form,ygxx_Form);

      ygxx_Form.ShowModal;

      end;

      //刪除教職工 彈出菜單單擊事件

      procedure Tyggl_Form.N3Click(Sender:TObject);

      var

      id:String;

      begin

      if MessageDlg('確認要刪除選中教職工信息嗎?',mtconfirmation,[mbYes,mbNo],0)=mrYes

      then

      begin

      id:=Query1.FieldbyName('id').AsString;

      with TQuery.Create(nil)do

      begin

      try

      Close;

      SQL.Clear;

      SQL.Add('delete from ygb where id='"+id+"');

      ExecSQL;

      finally

      Free;

      end;

      end;

      ShowMessage('成功刪除教職工信息');

      end;

      end;

      procedure Tyggl_Form.cmdcloseClick(Sender:TObject);

      begin

      with TQuery.Create(nil)do

      try

      Close;

      SQL.Clear;

      SQL.Add('select*from bmdm order by bmdm');

      Open;

      First;

      //將數(shù)據(jù)表中的所有部門添加到部門列表中

      bmdm_CBox.Items.Add('所有部門');

      while not Eof do

      begin

      bmdm_CBox.Items.Add(FieldByName('bmmc').AsString;

      Next;

      end;

      bmdm_CBox.ItemIndex:=0;

      finally

      Free;

      end;

      end;

      3 結束語

      本系統(tǒng)采用了B/S模式,以學校的校園網(wǎng)為平臺予以開發(fā)設計。在開發(fā)工具的選擇上,使用ASP和SQL server開發(fā)系統(tǒng),是一種較好的MIS開發(fā)模式。該系統(tǒng)具有數(shù)據(jù)集中程度高,系統(tǒng)可操作性強;數(shù)據(jù)存儲靈活,通用性強;信息較全面,安全可靠等特點。依托這一有效平臺,學校管理者能夠借助智能分析手段找出管理工作的不足,及時調整管理政策,不斷提升管理工作水平的目的。

      [1]徐曉霞,貝雨馨.B/S模式與C/S模式之比較[J].延邊大學學報:自然科學版,2002,28(2):126-129.

      [2]紀紅.人事管理信息系統(tǒng)的設計與實施[J].管理信息系統(tǒng),2000,(6):46-49.

      [3]Tony Bain.SQL Server 2000數(shù)據(jù)倉庫與 Analysis Services[M].邵勇,譯.北京:中國電力出版社,2003.

      猜你喜歡
      窗體教職工管理系統(tǒng)
      基于James的院內郵件管理系統(tǒng)的實現(xiàn)
      集大教職工抗疫優(yōu)秀作品選登
      試談Access 2007數(shù)據(jù)庫在林業(yè)檔案管理中的應用
      檔案天地(2019年5期)2019-06-12 05:12:02
      從教職工福利談高校工會工作的創(chuàng)新
      記者觀察(2018年14期)2018-11-19 21:22:23
      基于LED聯(lián)動顯示的違停管理系統(tǒng)
      海盾壓載水管理系統(tǒng)
      中國船檢(2017年3期)2017-05-18 11:33:08
      用先進文化引領教職工思政教育創(chuàng)新
      學習月刊(2015年20期)2015-07-09 03:39:38
      淺談教職工思想政治工作
      基于RFID的倉儲管理系統(tǒng)實現(xiàn)
      基于LayeredWindow的異形窗體局部刷新
      中文信息(2014年2期)2014-03-06 23:49:14
      合山市| 若羌县| 海南省| 奎屯市| 溧水县| 那曲县| 城口县| 阿克苏市| 黄山市| 广饶县| 新沂市| 九台市| 朝阳县| 天全县| 科尔| 仲巴县| 永吉县| 赣州市| 扶绥县| 武清区| 淳安县| 花垣县| 余庆县| 阳山县| 汾阳市| 丽江市| 麻江县| 五家渠市| 弥勒县| 隆化县| 永吉县| 丰原市| 漳州市| 杭锦旗| 专栏| 竹北市| 虎林市| 台山市| 祁门县| 平凉市| 兴安县|