老鄉(xiāng)會會員信息管理系統(tǒng)

1、老鄉(xiāng)會會員信息管理系統(tǒng) 2008 屆 經(jīng)濟管理 系專 業(yè) 學 號 學生姓名 指導教師 完成日期 2011年7月2日1. 系統(tǒng)分析 1.1 需求分析1.1.1系統(tǒng)實現(xiàn)的目標隨著交通條件的不斷改善，人們可以走向全國各地各地。面對龐大的信息量，需要相應的管理系統(tǒng)來提高同鄉(xiāng)間管理工作的效率，做到信息的規(guī)范管理、科學統(tǒng)計和快速查詢，以減少管理方面的工作量。本系統(tǒng)便于大家查詢基本資料、聯(lián)系方式、各省市老鄉(xiāng)信息共享，讓老鄉(xiāng)資源發(fā)揮更大作用，產(chǎn)生社會效益和經(jīng)濟效益。1.1.2功能需求分析本系統(tǒng)實現(xiàn)了同鄉(xiāng)好友的查詢、添加、刪除、維護與管理以及用戶管理等功能，方便老鄉(xiāng)會信息的正確性，完整性。系統(tǒng)中的信息可分為會員

2、的基本信息和特殊信息（較重要活隱秘信息）兩類，系統(tǒng)分為三個模塊：管理員、會員和游客，各個功能模塊如下：(1)管理員模塊：對所有信息的查詢、修改。查看系統(tǒng)公告打印報表修改自身及其他用戶密碼(2)會員模塊：對會員基本信息和特殊信息的查詢會員信息的打印修改自身密碼（3）游客模塊：對會員基本信息的查詢系統(tǒng)公告的查詢會員基本信息打印1.2 開發(fā)工具本系統(tǒng)程序基于powerbuilder而 9.0開發(fā)，使用odbc數(shù)據(jù)庫。開發(fā)平臺：win xp + powerbuilder 9.02. 系統(tǒng)設計2.1 系統(tǒng)業(yè)務流程管理員會員基本信息管理會員信息會員基本 信息查詢會員信息登錄系統(tǒng)會員游客瀏覽系統(tǒng)查詢系統(tǒng)公告

3、系統(tǒng)公告用戶名 密碼用戶名 密碼查詢基本信息會員基本信息密碼信息管理密碼信息管理系統(tǒng)公告系統(tǒng)公告信息導出會員基本信息會員特殊信息密碼信息系統(tǒng)公告修改個人密碼信息查詢系統(tǒng)公告會員信息導出 會員基本信息會員特殊 信息會員特殊信息會員信息查詢會員基本信息會員特殊信息會員特殊信息圖1 系統(tǒng)業(yè)務流程圖2.2 系統(tǒng)功能結(jié)構(gòu)根據(jù)老鄉(xiāng)會信息管理系統(tǒng)的實際需求，將老鄉(xiāng)會信息管理系統(tǒng)劃分為游客、會員、管理員三個角色；功能包括信息管理、信息查詢、信息導出、用戶管理及系統(tǒng)公告管理等多個部分，各個部分的具體功能的系統(tǒng)功能結(jié)構(gòu)圖如圖2所示。基本信息查詢特殊信息查詢信息查詢系統(tǒng)公告查詢個人密碼修改信息導出會員老鄉(xiāng)會信息管理

4、系統(tǒng)管理員會員管理用戶密碼管理系統(tǒng)公告管理游客瀏覽基本信息系統(tǒng)公告查詢會員查詢個人密碼管理會員導出基本信息查詢特殊信息查詢基本信息查詢特殊信息查詢基本信息查詢特殊信息查詢圖2系統(tǒng)功能結(jié)構(gòu)圖2.3 數(shù)據(jù)庫設計本系統(tǒng)使用的數(shù)據(jù)庫管理系統(tǒng)為sql server 2005。數(shù)據(jù)庫中的表如下：表1user字段名稱數(shù)據(jù)類型 長度允許空主鍵用戶名char10not null密碼char10not null權限char10not null表2基本信息字段名稱數(shù)據(jù)類型 長度允許空主鍵編號char10not null姓名char10not null性別char10yes null籍貫char40yes null婚

5、否char10yes nullqq號char20yes null表3特殊信息字段名稱數(shù)據(jù)類型 長度允許空主鍵編號char10not null工作單位char20yes null所在部門char20yes null擔任職務char20yes null 移動電話char20yes null家庭住址char20yes null3. 系統(tǒng)實現(xiàn)3.1 歡迎界面用戶點擊進入圖3歡迎界面3.2 登錄界面登錄可分為游客登錄和用戶登錄。若為游客則可點擊直接登錄，用戶登錄時輸入用戶名，密碼，根據(jù)自己的不同權限應用不同菜單功能，如果用戶輸入的內(nèi)容和數(shù)據(jù)表中的內(nèi)容相符，則通過驗證，登錄成功并轉(zhuǎn)向相應的操作頁面；否則登

6、錄失敗。如圖4所示。圖4登錄界面3.3 主界面圖5主界面3.4 信息管理部分（1） 基本信息的界面圖6基本信息管理界面（2） 特殊信息的界面圖7特殊信息管理界面3.5 信息查詢部分（1） 基本信息圖8基本信息查詢界面（2） 特殊信息圖9特殊信息查詢界面3.6 信息導出部分圖9特殊信息打印界面基本信息打印與特殊信息的類似3.7 密碼修改界面圖10密碼修改界面3.8 用戶管理界面圖11用戶管理界面3.9 系統(tǒng)公告界面圖12系統(tǒng)公告界面4. 算法核心代碼(1) 連接數(shù)據(jù)庫代碼：/ profile studbstring strkeyboot,strcurrdirectory,keyvaluestrc

7、urrdirectory=getcurrentdirectory()+datastrkeyboot=hkey_local_machinesoftwareodbcodbc.inidatabaseregistryget(strkeyboot,databasefile,regstring!,keyvalue)if keyvaluedatabase then registryset(strkeyboot,databasefile,regstring!,strcurrdirectory+database.db) registryset(strkeyboot,databasename,regstring!

8、,database) registryset(strkeyboot,driver,regstring!,c:program filessybasesql anywhere 8win32dbodbc8.dll) registryset(strkeyboot,enginename,regstring!,database) registryset(strkeyboot,pwd,regstring!,dba) registryset(strkeyboot,start,regstring!,c:program filessybasesql anywhere 8win32dbeng8.exe -d -c8

9、m) registryset(strkeyboot,uid,regstring!,sql)end ifsqlca.dbms = odbcsqlca.autocommit = falsesqlca.dbparm = connectstring=dsn=database;uid=dba;pwd=sqlconnect;if sqlca.sqlcode0 thenmessagebox(提示,連接失敗，具體原因請與系統(tǒng)管理員聯(lián)系！,stopsign!)end ifopen(w_welcome)(2) 登錄代碼：string username,passwordstring uname,pwordusern

10、ame=trim(sle_username.text)password=trim(sle_password.text) select user.用戶名, user.密碼 ,user.身份 into :uname, :pword,:sf from user where ( user.用戶名 = :username ) and ( user.密碼 = :password ) ;/if unameusername then messagbox(,fail)if sqlca.sqlcode=100 thenmessagebox(提示,用戶名或密碼錯誤，請重新輸入)elseopen(w_main)clo

11、se(parent)end if(3) 主窗體代碼：choose case sf case 管理員 case 會員m_main.m_信息管理.enabled=falsem_main.m_用戶管理.enabled=false case 游客 m_main.m_信息管理.enabled=falsem_main.m_信息查詢.m_特殊信息查詢.enabled=falsem_main.m_信息導出.enabled=falsem_main.m_用戶管理.enabled=falsem_main.m_密碼修改.enabled=falseend choose(4) 窗口連接數(shù)據(jù)代碼：dw_1.settrans

12、object( sqlca)dw_1.retrieve( )dw_retrieve.settransobject( sqlca)dw_retrieve.retrieve( )(5) 添加代碼：dw_insert.insertrow( 1)dw_insert.scrolltorow( 1)(6) 刪除代碼：long currowcurrow=dw_insert.getrow( )dw_insert.deleterow(currow)dw_insert.update( )(7) 修改代碼：string mima,usename/ 數(shù)據(jù)庫連接參數(shù)/ profile jnsqlca.dbms = od

13、bcsqlca.autocommit = falsesqlca.dbparm = connectstring=dsn=老鄉(xiāng)會/連接數(shù)據(jù)庫connect;/檢索用戶名和密碼記錄select user.用戶名, user.密碼 into :usename, :mima from user where user.用戶名 = :sle_1.text ;/判斷用戶輸入的用戶名是否正確if sle_1.text= or sle_2.text= or sle_3.text= or sle_4.text= or sle_3.textsle_4.text thenmessagebox(錯誤！,用戶名或密碼不能為

14、空,并且新密碼不能兩次輸入相同！,exclamation!,ok!,2)elseif usename=sle_1.text and mima=sle_2.text then/修改用戶的密碼update user set 密碼 = :sle_4.text where user.用戶名 = :sle_1.text ;messagebox(密碼修改成功！,請記住新密碼，下次登錄時請使用新密碼！,information!,ok!,2)elsemessagebox(錯誤！,用戶名或密碼錯誤，請重新輸入！,exclamation!,ok!,2)end ifend if(8) 報表代碼：dw_employe

15、e.setrowfocusindicator(hand!)/設置事物對象dw_employee.settransobject(sqlca)/獲取數(shù)據(jù)dw_employee.retrieve()/隱藏水平軌跡條htb_zoom.visible=truest_zoom.visible=truest_1.visible=truest_2.visible=true(9) 打印預覽報表代碼：if cb_preview.text=打印預覽 then /執(zhí)行打印一覽功能dw_employee.object.datawindow.print.preview=yes/顯示標示dw_employee.object.datawindow.print.preview.rulers=yescb_preview.text=取消預覽elsecb_preview.text=打印預覽dw_employee.object.datawindow.print.preview=noend if5. 結(jié)論經(jīng)過一周的時間，在同學和老師的幫助下基本完成本次課程的設計，基本達到了工資管理系統(tǒng)的要求。通過這次課程設計，使我受到一次轉(zhuǎn)業(yè)知識、專業(yè)技能分析和解決問題能力的全面系統(tǒng)鍛煉，是我在管理信息系統(tǒng)知識的使用方面，在pb軟件開發(fā)的基本思想、方法及在常用編程設計思路技巧的掌握方面都能