【正文】
到下一個(gè)替代系統(tǒng)開發(fā)出來,該階段的主要目的是延長系統(tǒng)的生命周期、充分發(fā)揮系統(tǒng)的價(jià)值。 系統(tǒng)運(yùn)行管理 系統(tǒng)運(yùn)行的日常管理不僅僅是機(jī)房環(huán)境和設(shè)施的管理,更主要的是對系統(tǒng)每天運(yùn)行狀況、數(shù)據(jù)輸入和輸出情況以及系統(tǒng)的安全性與完備性及時(shí)如實(shí)地記錄和處置。這些工作主要由系統(tǒng)管理員完成。 系統(tǒng)維護(hù)及操作使用說明 系統(tǒng)維護(hù)主要包括硬件設(shè)備的維護(hù)、應(yīng)用軟件的維護(hù)和數(shù)據(jù)的維護(hù)。硬件維護(hù)應(yīng)有專職的硬件維護(hù)人員來負(fù)責(zé),主要有兩種類型的維護(hù)活動(dòng),一種是定期設(shè)備保養(yǎng)性維護(hù),維護(hù)的內(nèi)容是進(jìn)行例行的設(shè)備檢查與保養(yǎng),易耗品的更換與安裝等,另一種是突發(fā)性故障維修,由專職的維修人員或請廠方的技術(shù)人員來排除故障。軟件維護(hù)主要指根據(jù)需求變化或硬件環(huán)境的變化對應(yīng)用程序進(jìn)行部分或全部的修改。數(shù)據(jù)維護(hù)工作主要是由數(shù)據(jù)庫管理員來負(fù)責(zé),重要負(fù)責(zé)數(shù)據(jù)庫的安全性和完善性以及進(jìn)行并發(fā)性控制。 系統(tǒng)的維護(hù)主要分為糾錯(cuò)性維護(hù)、適應(yīng)性維護(hù)、完善性維護(hù)和預(yù)防性維護(hù)。糾錯(cuò)性維護(hù):由于本系統(tǒng)測試不可能揭露系統(tǒng)中存在的所有錯(cuò)誤,所以當(dāng)系統(tǒng)運(yùn)行到一定時(shí)期后會暴露出系統(tǒng)內(nèi)隱藏的錯(cuò)誤,這時(shí)候要及時(shí)糾正。適應(yīng)性維護(hù):這里指為了使本系統(tǒng)更好的適應(yīng)環(huán)境的變化而進(jìn)行的維護(hù)工作。一方面由于計(jì)算機(jī)技術(shù)的飛速發(fā)展,原來的系統(tǒng)不能適應(yīng)新的軟硬件,另一方面,應(yīng)用的對象也在不斷的發(fā)生變化,將導(dǎo)致系統(tǒng)不能適應(yīng)新的應(yīng)用環(huán)境,因此,有必要對系統(tǒng)進(jìn)行調(diào)整,以保證系統(tǒng)時(shí)時(shí)都能滿足用戶的要求。完善性維護(hù):要根據(jù)用戶不斷提出的新要求來不斷擴(kuò)充原有的系統(tǒng)的功能。預(yù)防性維護(hù): 把維護(hù)工作由被動(dòng)變主動(dòng),來延長本系統(tǒng)的使用壽命。據(jù)統(tǒng)計(jì),完善性維護(hù)占所有維護(hù)工作總數(shù)的50%左右??梢姡到y(tǒng)維護(hù)工作中,一半以上的工作是對系統(tǒng)的完善,一定要多加注意。 本文主要根據(jù)介紹了采購管理系統(tǒng)設(shè)計(jì)的整體思路和流程,結(jié)合本人在海川公司實(shí)習(xí)過程中了解的真實(shí)情況,制訂了一套適合其自身發(fā)展的采購管理系統(tǒng),由于技術(shù)有限,在設(shè)計(jì)過程中出現(xiàn)了不少錯(cuò)誤,經(jīng)過老師的耐心指導(dǎo),已經(jīng)認(rèn)真改正,但是由于時(shí)間限制只實(shí)現(xiàn)了一個(gè)登陸界面、一個(gè)主界面和采購訂單表,設(shè)計(jì)的功能基本符合用戶需求,但是模塊設(shè)計(jì)還不夠完善,界面設(shè)計(jì)也不夠美觀,還有待完善。附錄:訂單的保存功能 Private Sub Command1_Click()Set = New = DSN=k。UID=sa。PWD=。 Set rst = New = adOpenKeyset = adLockOptimistic 采購訂單, , , , adCmdTabledim i as stringFor i = 0 To 6 (i) = Text1(i).Text Next MsgBox 保存成功End Sub登錄界面的代碼Public PasswordKey As StringPublic Try_times As IntegerPublic NameKey As StringPrivate Sub Cmd_Cancel_Click() EndEnd SubPrivate Sub Cmd_OK_Click() Dim j As Single39。數(shù)據(jù)有效性檢查 If txtUser = Then MsgBox 請輸入用戶名 Exit Sub End If If txtPwd = Then MsgBox 請輸入密碼 Exit Sub End If NameKey = MakeStr(txtUser) PasswordKey = MakeStr(txtPwd)39。判斷用戶是否存在 If (NameKey) = False Then MsgBox 用戶名不存在 Try_times = Try_times + 1 If Try_times = 3 Then MsgBox 您已經(jīng)三次嘗試進(jìn)入本系統(tǒng),均不成功,系統(tǒng)將關(guān)閉 DBapi_Disconnect End Else Exit Sub End If End If 39。判斷密碼是否正確 (NameKey) If PasswordKey Then MsgBox 密碼錯(cuò)誤 Try_times = Try_times + 1 If Try_times = 3 Then MsgBox 您已經(jīng)三次嘗試進(jìn)入本系統(tǒng),均不成功,系統(tǒng)將關(guān)閉 DBapi_Disconnect End Else Exit Sub End If End If 39。判斷用戶是否為采購管理員或者普通用戶 If InStr(, 采購管理員) 0 Then () Else MsgBox 您不是采購管理員 Try_times = Try_times + 1 If Try_times = 3 Then MsgBox 您已經(jīng)三次嘗試進(jìn)入本系統(tǒng),均不成功,系統(tǒng)將關(guān)閉 DBapi_Disconnect End Else Exit Sub End If End If39。關(guān)閉自己 Unload MeEnd Sub主界面的代碼Private Sub Form_Load() 1End SubPrivate Sub mn_ByCustomer_Click() 1End SubPrivate Sub mn_ByProduct_Click() 1End SubPrivate Sub mn_ByProType_Click() 1End SubPrivate Sub mn_ChangeUser_Click() 1End SubPrivate Sub mn_Get_Click() 1End SubPrivate Sub mn_Purchase_Click() 1End SubPrivate Sub mn_PwdEdit_Click() 1End SubPrivate Sub mn_Quote_Click() 1End SubPrivate Sub mn_QuoteSts_Click() 1End SubPrivate Sub mn_Return_Click() 1End SubPrivate Sub mn_Search_Click() 1End Sub