• <tr id="yyy80"></tr>
  • <sup id="yyy80"></sup>
  • <tfoot id="yyy80"><noscript id="yyy80"></noscript></tfoot>
  • 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
    白水县| 夏津县| 三亚市| 孟连| 涿州市| 二连浩特市| 清水河县| 双峰县| 理塘县| 西城区| 莱西市| 虞城县| 龙川县| 宾阳县| 大足县| 平定县| 昌乐县| 修武县| 吉安市| 济源市| 鄄城县| 四子王旗| 淄博市| 榆林市| 安远县| 泗水县| 建昌县| 邯郸市| 阳高县| 通化市| 和林格尔县| 金坛市| 牡丹江市| 南安市| 合水县| 耒阳市| 巴林左旗| 濉溪县| 大厂| 防城港市| 禄劝|