【文章內(nèi)容簡(jiǎn)介】 3） NOTNULL 取款機(jī) ID 號(hào)（索引） User_id CHARACTER（ 13） NULL 用戶賬號(hào) Card_id CHARACTER（ 16） NULL 用戶卡號(hào) Atm_time Data NULL 存取款時(shí)間 Atm_outin CHARACTER（ 4） NULL 摘要 Atm_out NUMBER（ 6） NULL 取款金額 Atm_in Number(4) NULL 存款金額 User_all NUMBER（ 6） null 總金額 Bankoutin 用戶銀行存取款信息表 列名 數(shù)據(jù)類型 可否為空 說(shuō)明 tms_id CHARACTER（ 6） NOTNULL 操作員 ID 號(hào)（索引） User_id CHARACTER（ 13） NULL 用戶賬號(hào) Card_id CHARACTER（ 16） NULL 用戶卡號(hào) bank_time Data NULL 存取款時(shí)間 bank_outin CHARACTER（ 4） NULL 摘要 Bank_out NUMBER（ 6） NULL 取款金額 bank_in Number(4) NULL 存款金額 bank_all NUMBER（ 6） null 總金額 Userall 用戶存取款信息表 列名 數(shù)據(jù)類型 可否為空 說(shuō)明 User_id CHARACTER（ 13） NULL 用戶賬號(hào) Card_id CHARACTER（ 16） NULL 用戶卡號(hào) outin_time Data NULL 存取款時(shí)間 user_out NUMBER（ 6） NULL 取款金額 user_in Number(4) NULL 存款金額 User_all NUMBER（ 6） null 總金額 TMS 管理系統(tǒng)的用戶口令表 列名 數(shù)據(jù)類型 可否為空 說(shuō)明 Tms_user CHARACTER（ 6） NULL 用戶名（索引） Tms_pswd CHARACTER（ 6） NULL 口令 第五章 系統(tǒng)實(shí)施 主要界面的功能及代碼 管理員登錄界面 此界面主要是為了增強(qiáng)銀行管理的安全性，不讓非法用戶進(jìn)入。保證了銀行賬戶的安全。 其密碼驗(yàn)證的主要代碼為： if empty() or empty() messagebox(對(duì)不起！你輸入的信息不完整 ,48,信息不全 ) =39。39。 =39。39。 else sele tms locate for tms_user=alltrim() if tms_pswd=alltrim() messagebox(密碼正確 ,64,通過(guò) ) cMessageTitle=39。進(jìn)入系統(tǒng) 39。 cMessageText=39。選擇“是”進(jìn)入帳戶管理，選擇“否”進(jìn)入 ATM 機(jī)管理 39。 nDialogType=4+32 nAnswer=messagebox(cMessageText,nDialogType,cMessageTitle) do case case nAnswer=6 do form account\form\supervise1 case nAnswer=7 do form account\form\supervise2 endcase else messagebox(對(duì)不起！你輸入的信息有誤，請(qǐng)重試 ,64,錯(cuò)誤 ) inpswd1=inpswd1+1 if inpswd1=3 管理員登錄界面 else =39。39。 =39。39。 endif endif endif 賬戶管理界面 此界面為銀行的賬戶管理界面，此界面實(shí)現(xiàn)了銀行的辦公自動(dòng)化處理，從而減輕了工作人員的工作量。 主要代碼為： 存款 local countid,cardid,moneyin,allhere countid=alltrim() cardid=alltrim() moneyin=val() if empty(cardid) and empty(countid) messagebox(您輸入的信息不完整，請(qǐng)重輸！ ,48) else if empty(cardid) sele user locate for alltrim()=countid if eof() messagebox(對(duì)不起，沒有這個(gè)帳號(hào)！ ) else if moneyin=0 messagebox(您輸入的存款金額有誤，請(qǐng)重輸！ ,48) else allhere= allhere=allhere+moneyin replace with allhere 賬戶管理界面 if allhere=0 replace with 正常 sele card locate for alltrim()=alltrim(countid) replace with allhere with 正常 sele userall go bottom append blank replace user_id with countid。 user_in with moneyin。 outin_time with date()。 outin with 存入 。 user_all with allhere messagebox(操作成功 ,48) endif endif =allhere endif else sele card locate for alltrim()=cardid if eof() messagebox(對(duì)不起，沒有這個(gè)卡號(hào)！ ) else countid= if moneyin=0 messagebox(您輸入的存款金額有誤，請(qǐng)重輸！ ,48) else allhere= allhere=allhere+moneyin replace with allhere if allhere=0 replace with 正常 sele user locate for alltrim()=alltrim(countid) replace with allhere with 正常 sele userall go bottom append blank replace user_id with countid。 user_in with moneyin。 outin_time with date()。 outin with 存入 。 user_all with allhere messagebox(操作成功 ,48) endif endif =allhere endif endif endif =39。39。 主要代碼 ——— 取款 local countid,cardid,moneyin,allhere countid=alltrim() cardid=alltrim() moneyin=val() if empty(cardid) and empty(countid) messagebox(您輸入的信息不完整，請(qǐng)重輸！ ,48) else if empty(cardid) sele user locate for alltrim()=countid if eof() messagebox(對(duì)不起，沒有這個(gè)帳號(hào)！ ) else if moneyin=0 messagebox(您輸入的存款金額有誤，請(qǐng)重輸！ ,48) else allhere= allhere=allhere+moneyin replace with allhere if allhere=0 replace with 正常 sele card locate for alltrim()=alltrim(countid) replace with allhere with 正常 sele userall go bottom append blank replace user_id with countid。 user_in with moneyin。 outin_time with date()。 outin with 存入 。 user_all with allhere messagebox(操作成功 ,48) endif endif =allhere endif else sele card locate for alltrim()=cardid if eof() messagebox(對(duì)不起，沒有這個(gè)卡號(hào)！ ) else countid= if moneyin=0 messagebox(您輸入的存款金額有誤，請(qǐng)重輸！ ,48) else allhere= allhere=allhere+moneyin replace with allhere if allhere=0 replace with 正常 sele user locate for alltrim()=alltrim(countid) replace with allhere with 正常 sele userall go bottom append blank replace user_id with countid。 user_in with moneyin。 outin_time with date()。 outin with 存入 。 user_all with allhere messagebox(操作成功 ,48) endif endif =allhere endif endif endif 致 謝 經(jīng)過(guò)緊張的設(shè)計(jì)和開發(fā)，銀行賬戶管理系統(tǒng)的功能基上都實(shí)現(xiàn)了。能夠完成用戶的查詢、銀行卡的辦理和掛失等功能。并提供部分系統(tǒng)維護(hù)功能。對(duì)于數(shù)據(jù)的一致性問(wèn)題也通過(guò)程序進(jìn)行了有效的解決。因設(shè)計(jì)時(shí)間有限，以至于在開發(fā)過(guò)程中遇到了許多意想不到的困難。盡管本系統(tǒng)還有許多不盡人意的地方。如：用戶界面不夠美觀，系統(tǒng)穩(wěn)定性等方面還會(huì)出現(xiàn)不可預(yù)料的問(wèn)題。但總體上來(lái)說(shuō)還算是差強(qiáng)人意吧。通過(guò)此次畢 業(yè)設(shè)計(jì)，我基本上又比系統(tǒng)地了解了 編程的語(yǔ)言。據(jù)此來(lái)看，還是受益不淺的。 本篇論文到此結(jié)束了，但對(duì)于銀行賬戶管理系統(tǒng)及其在銀行中的應(yīng)用這一課題我們的研究和思考仍將繼續(xù)下去。在本文的寫作過(guò)程中，我得到了許多老師、同學(xué)、領(lǐng)導(dǎo)和朋友的幫助，在此我謹(jǐn)向他們致以最衷心的感謝。尤其要感謝的是張敏和馬獻(xiàn)果老師，他們細(xì)致、耐心的指導(dǎo)是我的論文得以完成的關(guān)鍵。另外，我要向我在河北科技大學(xué)學(xué)習(xí)期間授課的全體老師和同學(xué)致以特別的感謝，感謝他們對(duì)我的教育、培養(yǎng)和無(wú)微不至的幫助 。 參考文獻(xiàn) 1 薛華成 . 管理信息系統(tǒng) . 第 3 版 .北京：清華大學(xué)出版社， 1999 2 鄺孔武 ,王曉敏 .信息系統(tǒng)分析與設(shè)計(jì) .北京 :清華大學(xué)出版社 ,1999 3 Chris Todman ．支持人事的數(shù)據(jù)倉(cāng)庫(kù)設(shè)計(jì)．機(jī)械工業(yè)出版社 , 4 宏波．電信企業(yè)客戶關(guān)系管理．機(jī)械工業(yè)出版社 , 2021. 5 陳花生，單啟成 .Visual FoxPro 教程 . 蘇州大學(xué)出版社， 1999 6 張治文，何磊等 . Visual 開發(fā)實(shí)例 .清華大學(xué)出版社 .1999 7黃梯云 .管理信息系統(tǒng) .高等教育出版社 .2021 8黃梯云 .管理信息系統(tǒng) .經(jīng)濟(jì)科學(xué)出版社 .1997 9 羅小沛，侯炳輝 .系統(tǒng)分析員教程 .清華大學(xué)出版社 .1998 10 陳曉紅，吳良剛 .管理信息系統(tǒng)理論與實(shí)踐 .中南工業(yè)大學(xué)出版社 .1996 11 張基溫，王一平 .信息系統(tǒng)開發(fā)案例 .