Khóa luận Xây dựng chương trình quản lý nhân sự của chi cục Dự trữ Sóc Sơn dựa trên ngôn ngữ VISUAL BASIC

nguån d÷ liÖu vËt lý n»m trong c¬ së d÷ liÖu Server, c¬ së d÷ liÖu Access chØ l­u c¸c b¶ng liªn kÕt logic nh­ng chóng ho¹t ®éng nh­ c¸c b¶ng b×nh th­êng kh¸c cña c¬ së d÷ liÖu Access. MÆc dï kh¶ n¨ng hç trî cho m«i tr­êng Client/Server ch­a cao Access lµ mét hÖ qu¶n trÞ c¬ së d÷ liÖu quan hÖ rÊt m¹nh. Víi thÕ m¹nh trong c«ng nghÖ phÇn mÒm nãi chung vµ c«ng nghÖ m¹ng nãi riªng, trong t­¬ng lai ch¾c ch¾m c¸c nhµ ph¸t triÓn cña h·ng Microsoft sÏ kh¾c phôc ®­îc nh­îc ®iÓm nµy. V× vËy ta cã thÓ kh¼ng ®Þnh r»ng Access lµ m«i tr­êng tèt cho viÖc x©y dùng, ph¸t triÓn c¸c øng dông phÇn mÒm c¬ së d÷ liÖu kh«ng nh÷ng hiÖn t¹i mµ c¶ trong t­¬ng lai. III.Ng«n ng÷ Visual Basic 6.0 1. Microsoft Visual Basic vµ c¸c phiªn b¶n Microsoft Visual Basic lµ mét ng«n ng÷ lËp tr×nh ®­îc h·ng Microsoft ph¸t triÓn .Visual Basic g¾n liÒn víi kh¸i niÖm lËp tr×nh trùc quan, nghÜa lµ khi thiÕt kÕ ch­¬ng tr×nh b¹n nh×n ngay thÊy ngay kÕt qu¶ qua tõng thao t¸c vµ giao diÖn khi ch­¬ng tr×nh thùc hiÖn. §©y lµ thuËn lîi lín so víi ng«n ng÷ lËp tr×nh kh¸c, Visual Basic cho phÐp b¹n chØnh söa ®¬n gi¶n, nhanh chãng mµu s¾c, kÝch th­íc, h×nh d¸ng cña c¸c ®èi t­îng cã mÆt trong øng dông. VÒ mÆt c«ng nghÖ lËp tr×nh còng nh­ tæ chøc m«i tr­êng lµm viÖc, phiªn b¶n 5.0 vµ 6.0 cã nhiÒu ­u ®iÓm h¬n. MÆt kh¸c, phiªn b¶n 5.0 32 bit vµ 6.0 ®­îc phÐp x©y dùng c¸c øng dông 32 bit víi m«i tr­êng lµm viÖc lµ Microsoft Windows 95 Window 2000. Cô thÓ: - Version 5.0: Phiªn b¶n 32 bit, phiªn b¶n t­¬ng thÝch hoµn toµn trªn m«i tr­êng Windows. HÖ thèng th­ viÖn sö dông c¸c DLL ( Dynamic Link Library ) vµ c¸c th­ viÖn OLE theo c«ng nghÖ OCX. Phiªn b¶n 32 tá ra thùc sù cã ­u ®iÓm trong m«i tr­êng Windows 95 & 97 nÕu cÊu h×nh m¸y tÝnh cña ng­êi sö dông ®­îc c¸c nhu cÇu sö dông cao. - Version 6.0: Lµ phiªn b¶n míi hiÖn nay ch¹y trªn m«i tr­êng Windows 9.X. HÖ thèng sö dông th­ viÖn DLL vµ c¸c th­ viÖn OLE theo c«ng nghÖ OCX, nhu cÇu ®ßi hái cÊu h×nh cña m¸y tÝnh ph¶i ®ñ m¹nh (m¸y tÝnh tõ 586 trë lªn ). 2. Tæ chøc cña Mirosoft Visual Basis - Project: Lµ s¶n phÈm lËp tr×nh trong m«i tr­êng Microsoft ®­îc tæ chøc thµnh mét Project bao gåm: - MDI form: Mét Project cã thÓ cã mét mµn h×nh lµm theo chÕ ®é Multi Document Interfaccce. Form: C¸c mµn h×nh lµm viÖc cña Project. Form: C¸c mµn h×nh lµm viÖc cña Project. - Module: §­îc sö dông ®Ó khai b¸o c¸c Sub, Function, Type, Constant tæng qu¸t trong Proect. Class Module: khai b¸o ®èi t­îng trong Project. Controls: C¸c ®èi t­îng ®­îc sö dông trong form Präject lµ c¸c th­ viÖn kiÓu VBX hoÆc OCX. Mçi ®èi t­îng ®­îc ®Æc tr­ng Properties vµ c¸c Events. C¸c ®èi t­îng cña Microsoft Visual Basic cã thÓ ph©n chia thµnh c¸c nhãm sau: C¸c control chuÈn cña hÖ ®iÒu hµnh Windows. - C¸c ®èi t­îng do Microsoft cung cÊp ( Data control, Rich Text Control...). C¸c ®èi t­îng do h·ng phÇn mÒm thø ba hç trî. 3. Kh¸i qu¸t lËp tr×nh trªn Mirosoft Visual Basis. X©y dùng Project trªn c¬ së ph©n tÝch hÖ thèng bµi to¸n. ThiÕt kÕ c¸c ®èi t­îng. - §iÒu khiÓn tÝnh chÊt c¸c ®èi t­îng vµ viÕt m· lÖnh xö lÝ trªn c¸c sù kiÖn vµ c¸c ®èi t­îng. 4. LËp tr×nh trªn Mirosoft Visual Basis Mirosoft Visual Basis hç trî sö dông Query trong ch­¬ng tr×nh cña m×nh. Do vËy viÖc xö lÝ d÷ liÖu cã nhiÒu thuËn lîi, ®Æc biÖt CSDL cña Access. Trong khi viÕt ch­¬ng tr×nh cã mét sè vÊn ®Ò quan träng cÇn chó ý ®ã lµ lçi vµ xö lÝ lçi. C«ng cô gì rèi: Khi ch¹y thö ch­¬ng tr×nh cã thÓ sö dông c«ng cô gì rèi kh¸ m¹nh cña Mirosoft Visual Basis ( Debug ). C«ng cô nµy cho phÐp hiÖu chØnh phÇn c©u lÖnh ngay trong khi thùc hiÖn ch­¬ng t×nh ®èi víi c¸c l«Ü kh«ng quan träng. §Ó thiÕt kÕ c¬ së d÷ liÖu cã thÓ sö dông mét trong c¸c c«ng cô sau: Sö dông phiªn b¶n Micosofft Access t­¬ng øng víi phiªn b¶n cña cu¶ Mirosoft Visual Basis. Sö dông ch­¬ng tr×nh DataManager ®­îc cung cÊp kÌm theo Visual Basic - ThiÕt kÕ b¸o c¸o: §Ó thiÕt kÕ mÉu biÓu b¸o c¸o cã thÓ sö dông mét trong c¸c c«ng cô sau: - Sö dông phiªn b¶n DataEnviroment t­¬ng øng trong Microsoft Visual Basic Sö dông DataReport ®­îc cung cÊp kÌm theo. 5. Visual Basic vµ Microsoft Access. Visual Basic lµ ng«n ng÷ lËp tr×nh h­íng sù kiÖn cã thÓ gi¶i quyÕt ®­îc mäi bµi to¸n. Visual Basic còng gi¶i quyÕt ®ù¬c c¸c bµi to¸n qu¶n lÝ mµ c¸c ng«n ng÷ kh¸c kh«ng cã. §Ó ph¸t huy hÕt kh¶ n¨ng Visual Basis hay Acces chóng ta ph¶i hiÓu thËt râ c¬ chÕ xö lÝ d÷ liÖu ( Jet Engine ), Jet Engine cho phÐp lµm viÖc víi nhiÒu dang thøc d÷ liÖu kh¸c nhau vµ cung cÊp giao diÖn lËp tr×nh h­íng ®èi t­îng ®Ó lµm viªc víi CSDL. JetEngin lµ thµnh phÇn cèt lâi cña hÖ qu¶n trÞ CSDL Access do ®ã cã thÓ trë thµnh mét nhµ lËp tr×nh chuyªn nghiÖp víi Visual Basis th× ®iÒu ®Çu tiªn lµ Jet Engine. Tuy nhiªn mçi ng«n ng÷ lËp tr×nh cã mét hÖ thèng m¹nh riªng cña nã, ë lÜnh vùc nµy nã kh«ng ®¸p øng ®­îc, kh«ng thÝch hîp ®­îc nh­ng ë lÜnh vùc kh¸c th× l¹i lµm ®­îc. VÝ dô nh­ Access cã c«ng cô thiÕt kÕ b¸o biÓu m¹nh h¬n nhiÒu so víi Visual Basis, trong Visual Basis cã bé thiÕt kÕ b¸o biÓu kh«ng do Microsoft ph¸t triÓn mµ l¹i do h·ng Seagate, vµ ®­îc ®­a vµo nh­ mét OLE Custom Control ®éc lËp. V× vËy tuú theo yªu cÇu cña mét bµi to¸n cô thÓ mµ ng­êi lËp tr×nh chän mét ng«n ng÷ thÝch hîp ®Ó gi¶i quyÕt chóng. Visual Basis 6.0 cho phÐp ng­êi lËp tr×nh nhóng c¸c ®èi t­îng hay sö dông c¸c hµm th­ viÖn DLL mét c¸c dÔ dµng. Visual Basis 2.0 ®· nhanh h¬n, m¹nh h¬n vµ cßn sö dông h¬n Visual Basis 1.0. Visual Basis 3.0 t¨ng thªm nh÷ng c¸ch thøc ®¬n gi¶n ®Ó ®iÒu khiÓn c¸c c¬ së d÷ liÖu m¹nh nhÊt s½n cã. Visual Basis 4.0 hç trî sù ph¸t triÓn 32 - bit vµ b¾t ®Çu tiÕn tr×nh chuyÓn Visual Basis thµnh mét ng«n ng÷ lËp tr×nh h­íng ®èi t­îng ®Çy ®ñ. Phiªn b¶n 5.0 vµ 6.0 cã nhiÒu tÝnh n¨ng m¹nh h¬n, ®Æc biÖt lµ tèc ®é gia t¨ng ®¸ng kÓ (kho¶ng 20% nhanh h¬n so víi Visual Basis 4.0) vµ nh÷ng ®Æc tÝnh liªn quan ®Õn Web. Cã 3 khÝa c¹nh kh¼ng ®Þnh Visual Basis 6.0 thùc sù lµ mét ng«n ng÷ lËp tr×nh ®a n¨ng: Thêi gian nhËp biÓu (Form) vµ ®iÒu khiÓn (control) nhanh h¬n h¼n Visual Basis 4.0 tèc ®é truy cËp d÷ liÖu nhanh, c«ng nghÖ tèi ­u cña Mirosoft Visual C++ ®­îc dïng trong Visual Basis 5.0 vµ 6.0, phiªn b¶n Visual Basis 6.0 cã thªm mét sè tÝnh n¨ng ng«n ng÷ mong muèn, t¨ng c­êng cho Internet vµ c¸c tÝnh n¨ng c¬ së d÷ liÖu m¹nh h¬n. Ngoµi ra Visual Basis 5.0 vµ 6.0 cßn cã c«ng cô trî gióp th«ng minh, c«ng cô gì rèi cao, c¸c c«ng cô t¹o lËp ActiveX, cho phÐp truy cËp nhiÒu nguån d÷ liÖu kh¸c nhau. Visual BasisÖ chuyÓn øng dông sang m«i tr­êng Web ®­îc thùc hiÖn dÔ dµng vµ nhanh chãng h¬n. IV. Mèi liªn hÖ gi÷a Access vµ Visual Basis. Microsoft hiÖn ®ang lµm chñ 2 hÖ Qu¶n trÞ CSDL ( Visual Foxpro vµ Access). Access do Microsoft ph¸t triÓn tõ ®Çu vµ trë thµnh mét trong nh÷ng s¶n phÈm thµnh c«ng nhÊt. Visual Basis dïng kÕt nèi database engine cña Access ®Ó xö lÝ d÷ liÖu, Visual Basis kh«ng ph¶i lµ mét hÖ qu¶n trÞ d÷ liÖu mµ lµ mét ng«n ng÷ v¹n n¨ng. Víi Visual Basis ta cã thÓ ph¸t triÓn nhiÒu øng dông kh¸c nhau. Nã bao gåm c¶ tr×nh biªn dÞch, cho phÐp nhµ ph¸t triÓn sinh ra c¸c tËp tin .EXE ch¹y ®éc lËp ( dÜ nhiÔn cÇn cã thªm c¸c th­ viÖn DLL, VBX, OCX ) cßn Access hoµn toµn lµ mét hÖ qu¶n trÞ CSDL. Access kh«ng cã tr×nh biªn dÞch nh­ Visual Basis. Tuy nhiªn Microsoft cung cÊp thªm bé Access Run time ®Ó ch¹y c¸c øng dông mµ kh«ng cÇn cµi ®Æt Access. C¸ch thiÕt kÕ trùc quan vµ c¸ch lËp tr×nh h­íng sù kiÖn ®­îc ¸p dông trong Access vµ Visual Basis. Access tá ra m¹nh h¬n khi cho phÐp qu¶n lÝ c¸c sù kiÖn tinh tÕ h¬n ch¼ng h¹n nh­ Text Box control, Access cho phÐp xö lÝ c¸c cù kiÖn liªn quan ®Õn sù thay ®æi d÷ liÖu: OnChange, BeforeUpdate, AfterUpdate trong khi Visual Basis 4.0 chØ cã thÓ kiÓm tra sù kiÖn Change. V× vËy Access cho phÐp ph¸t triÓn c¸c ch­¬ng tr×nh cËp nhËt d÷ liÖu th«ng minh h¬n do kiÓm so¸t ®­îc d÷ liÖu nhËp mét c¸ch tinh tÕ. Ban ®Çu Access ®¬n gi¶n chØ lµ qu¶n trÞ CSDL quan hÖ ( Relation Database Management System ) dïng trong v¨n phßng ( n»m trong bé Microsft Professional Word, Exccel, Power Point ) do ®ã Microsft ®Æc biÖt chó träng ®Õn ng­êi sö dông cuèi (end user) h¬n lµ nhµ ph¸t triÓn. §iÒu nµy lµm cho c«ng cô hç trî thiÕt kÕ ( giao diÖn thiÕt kÕ, c¸c Wizard cho phÐp tù ®éng ho¸ c¸c qu¸ tr×nh thñ c«ng trong qu¸ tr×nh thiÕt kÕ form, table, query) cña Access tá ra rÊt m¹nh, h¬n h¼n Visual Basis. Ch¼ng h¹n nhiÒu lËp tr×nh viªn kinh nghiÖm khi viÕt c¸c c©u lÖnh SQL trong Visual Basis th­êng dïng kÒm bé thiÕt kÕ Query trong Access ®Ó sinh ra trong c©u lÖnh SQL mét c¸ch dÔ dµng. Access Basic cã nh÷ng kh¸c biÖt nhÊt ®Þnh so víi Visual Basis. ChØ ®Õn phiªn b¶n Access 7.0. Visual Basis vÒ sau vµ Access míi dïng chung ng«n ng÷ lËp tr×nh mµ Microsft gäi lµ VBA - Visual Basis for Application. Ta thÊy Access vµ Visual Basis kh¸c nhau ë c¸ch chÕ t¹o ra c¸c øng dông so víi c¸c c«ng cô thiÕt kÕ kh¸c nhau nh­ng thµnh phÇn xö lÝ CSDL th× cã nhiÒu ®iÓm t­¬ng ®ång v× cïng sö dông Jet Engine. Visual Basis cho phÐp biÖn dÞch c¸c øng dông thµnh tËp tin EXE, trong khi Access ta phØ ph©n phèi lu«n c¶ tµi nguyªn thiÕt kÕ. Kh¸i ng­êiÖm CSDL trong Access bao gåm c¶ phÇn d÷ liÖu (c¸c b¶ng) vµ phÇn øng dông ( query, form, table, report, macro, module ), trong khi ®èi víi c¸c hÖ kh¸c, CSDL chØ bao gåm phÇn d÷ liÖu. ChiÕn l­îc b¶o mËt tµi nguyªn thiÕt kÕ ph¶i ®­îc ®Æt lªn hµn ®Çu khi chän Access lµm c«ng cô ph¸t triÓn øng dông. HÖ thèng giao diÖn hç trî thiÕt kÕ ( ®Æc biÖt trong Access ) còng kh¸ r¾c rèi khiÕn ng­êi ch­a cã kinh nghiÖm hay lÉn lén gi÷a c¸c thøc dµnh cho ng­êi dïng cuèi vµ nh÷ng thø dµnh cho ng­êi lËp tr×nh, thø chØ dïng cho thiÕt kÕ vµ thø cã thÓ mang vµo øng dông. Ch­¬ng III ThiÕt kÕ C¬ së d÷ liÖu I. Th«ng tin vµo ra cña hÖ thèng Qua t×m hiÓu l­u tr÷ HSCB cña phßng tæ chøc trong c¬ quan vµ c¨n cø vµo c¸c th«ng tin l­u tr÷ trong sæ lý lÞch HSCB ta t¹m chia hai lo¹i th«ng tin nh­ sau: T.tin vµo HT T.tin ra khái hÖ thèng HT Qu¶n lý c¸n bé 1.1. Th«ng tin vµo hÖ thèng - Th«ng tin vÒ hå s¬ c¸ nh©n (C¸c CB míi ®­îc chuyÓn ®Õn hay míi ®­îc biªn chÕ), nã bao gåm tÊt c¶ c¸c tr­êng ®­îc l­u tr÷ trong sæ hå s¬ lý lÞch c¸n bé, khi nhËp HS th× c¸n bé qu¶n lý ph¶i nhËp toµn bé c¸c th«ng tin liªn quan ®Õn c¸n bé trong sæ lý lÞch c¸n bé vµo m¸y tÝnh. - Th«ng tin thay ®æi vÒ c¸ nh©n hµng n¨m nh­: lªn l­¬ng, lªn chøc vô, §¶ng, §oµn...hµng n¨m CBTC yªu cÇu nh÷ng c«ng chøc trong c¬ quan khai thªm phÇn bæ sung lý lÞch c¸ nh©n, ®©y lµ viÖc lµm b¾t buéc mµ c¸c CB vÒ qu¶n lý nh©n sù ph¶i cËp nhËt nh÷ng th«ng tin thay ®æi ®ã vµo trong sæ lý lÞch CB. - Th«ng tin vÒ häc tËp, b»ng cÊp: hµng n¨m c¬ quan th­êng cö CB ®i häc ë c¸c tr­êng §H vµ c¸c líp båi d­ìng nghiÖp vô cña ngµnh, sè CB ®· hoµn thµnh nhiÖm vô vÒ tiÕp tôc c«ng t¸c trong c¬ quan. - Th«ng tin khen th­ëng kû luËt: ®©y lµ nh÷ng th«ng tin cã thÓ x¶y ra hµng n¨m ®èi víi CBCC v× vËy nã còng ®­îc coi lµ th«ng tin vµo cña hÖ thèng. - Th«ng tin vÒ c¸n bé thuyªn chuyÓn c«ng t¸c: C¸n bé trong c¸c ®¬n vÞ cã thÓ chuyÓn qua c¸c phßng ban kh¸c nh­ng vÉn n»m trong c¬ quan, ®Ó xö lý viÖc thay ®æi nµy b»ng c¸ch ta chØ thay ®æi m· phßng hay m· ban cßn c¸c th«ng tin kh¸c vÉn gi÷ nguyªn. - Th«ng tin vÒ c¸n bé bÞ chÕt ®ét xuÊt, hay th«i viÖc ®©y lµ phÇn thay ®æi mµ kh«ng dù ®o¸n tr­íc ®­îc, viÖc nµy th­êng Ýt x¶y ra nh­ng chóng ta còng cÇn ph¶i tÝnh ®Õn. 1.2. Th«ng tin ra khái hÖ thèng TrÝch yÕu lý lÞch C¸c b¶ng thèng kª theo yªu cÇu cña l·nh ®¹o T×m kiÕm th«ng tin vÒ mét c¸ nh©n nµo ®ã Thèng kª theo dâi nh©n sù toµn c¬ quan Thèng kª vÒ t×nh h×nh häc vÊn Danh s¸ch ®Ò b¹t bæ nhiÖm Thèng kª chøc vô Thèng kª tr×nh ®é chÝnh trÞ Thèng kª tr×nh ®é ngo¹i ng÷ Thèng kª phßng, ban Danh s¸ch CB chuyÓn c«ng t¸c Dach s¸ch CB lªn l­¬ng Danh s¸ch CB nghØ h­u Danh s¸ch CB ®i häc Thèng kª khen th­ëng kû luËt. II. ThiÕt kÕ c¬ së d÷ liÖu cho hÖ thèng qu¶n lý c¸n bé Sù thay ®æi th«ng tin vµo ®Òu ¶nh h­ëng tíi th«ng tin ra khái hÖ thèng. Mäi sù thay ®æi t¹o nªn luång d÷ liÖu mang tÝnh tù nhiªn chÞu sù ¶nh h­ëng cña hÖ thèng DL vµ nh­ vËy ®Ó x©y dùng ®­îc ch­¬ng tr×nh ta cã thÓ chia th«ng tin thµnh nh÷ng tÖp chÝnh gåm: c¸c tËp tin dïng ®Ó l­u gi÷ th«ng tin vµ tËp tin thèng kª ®Þnh kú, t×m kiÕm theo yªu cÇu nµo ®ã cña ng­êi qu¶n lý. Trong hÖ thèng qu¶n lý th«ng tin vÊn ®Ò quan t©m lµ th«ng tin cña hÖ thèng ®­îc lÊy ë ®©u, viÖc khai th¸c DL nh­ thÕ nµo? ng­êi sö dông khai th¸c ch­¬ng tr×nh nh­: nhËp, söa, thªm bít DL do vËy khi thiÕt kÕ File CSDL, chóng ta cÇn quan t©m ®Õn DL nµo cÇn l­u tr÷, kiÓu DL ®­îc l­u tr÷, sè bé nhí giµnh cho nã ®Ó ®ì l·ng phÝ bé nhí. ViÖc t¸ch th«ng tin lµm cho CSDL gän nhÑ h¬n, ®ång thêi viÖc tæ chøc l­u tr÷ th«ng tin khoa häc h¬n dÉn ®Õn c«ng viÖc t×m kiÕm th«ng tin sÏ nhanh h¬n, lµm gi¶m bé nhí vµ tÇn sè truy cËp. H¬n n÷a l­u tr÷ khoa häc sÏ ®ì th«ng tin chång chÐo nhau, th«ng tin kh«ng ®­îc chuÈn ho¸ dÉn ®Õn d­ thõa th«ng tin vµ t×m kiÕm sÏ khã kh¨n vµ thiÕu chÝnh x¸c... Tõ nh÷ng nhËn ®Þnh trªn ta thiÕt kÕ c¸c tr­êng DL t­¬ng øng víi c¸c kiÓu DL nh­ sau: - M· nh©n viªn: Tªn tr­êng lµ MANV cã kiÓu DL lµ Text ®é réng lµ 10. - Tªn phßng ban: Tªn tr­êng lµ: TENPHONG cã kiÓu DL lµ Text ®é réng lµ 20. - Chøc vô: Tªn tr­êng lµ CV cã kiÓu DL lµ Text ®é réng lµ 20. - Hä vµ tªn: Tªn tr­êng lµ HOTEN cã kiÓu DL lµ Text, ®é réng lµ 30. - Ngµy sinh: Tªn tr­êng lµ NSINH cã kiÓu DL lµ Date cã ®é réng lµ 10. - N¬i sinh (n¬i m×nh sinh ra): Tªn tr­êng lµ NOISINH cã kiÓu DL lµ Text cã ®é réng lµ 30. - Quª qu¸n (n¬i sinh cña bè mÑ ®Î): §Ó phï hîp dïng kiÓu DL Text cã ®é réng lµ 30, tªn tr­êng lµ QUEQUAN - Giíi tÝnh: Tªn tr­êng lµ GIOITINH, cã kiÓu DL lµ Text cã ®é réng lµ 3. - N¬i th­êng tró: Tªn tr­êng lµ NOITT, cã kiÓu DL lµ Text cã ®é réng lµ 30. - §Þa chØ liªn l¹c: Tªn tr­êng lµ DIACHI, cã kiÓu DL lµ Text ®é réng lµ 30. - §iÖn tho¹i: Tªn tr­êng lµ §T, cã kiÓu DL lµ Text ®é réng lµ 10. - D©n téc: Tªn tr­êng lµ DANTOC, cã kiÓu DL lµ Text ®é réng 10 (kinh, tµy nïng...). - Tr×nh ®é häc vÊn: Tªn tr­êng lµ TRINHDOHV, cã kiÓu DL lµ Text, ®é réng 30 (12/12, C/m«n KT, Kü s­, gi¸o s­...). - T«n gi¸o: Tªn tr­êng lµ TONGIAO, cã kiÓu DL lµ Text, ®é réng 15 (phËt gi¸o, håi gi¸o, cao ®µi, hoµ h¶o...). - Sè chøng minh nh©n d©n: Tªn tr­êng SOCMND, cã kiÓu DL lµ Text, ®é réng 13. - Ngµy cÊp: Tªn tr­êng lµ NGAYCAP, cã kiÓu DL Date, ®é réng 10. - N¬i cÊp: Tªn tr­êng lµ NOICAP, cã kiÓu DL lµ Text, ®é réng 30 (CA tØnh hoÆc TP trùc thuéc TW....) - Thµnh phÇn gia ®×nh: BÇn n«ng, CB, tiÓu t­ s¶n...cã kiÓu DL Text ®é réng 20, tªn tr­êng lµ THANHPHANG§. - Tr×nh ®é chÝnh trÞ: S¬ cÊp, trung cao cÊp...tªn tr­êng lµ TRINHDOCT, cã kiÓu DL Text ®é réng 15. - Tr×nh ®é ngo¹i ng÷: §H Anh ng÷, Ph¸p ng÷, Trung ng÷, cã kiÓu DL lµ Text, ®é réng lµ 43, tªn tr­êng lµ TRINH§¤NN - Ngµy vµo ngµnh: Tªn tr­êng lµ NGAYVAON cã kiÓu DL lµ Date, ®éng réng 10. - Ngµy vµo §CSVN: Tªn tr­êng lµ NGAYVAO§ kiÓu DL lµ Date, cã ®é réng lµ 40. - Chøc vô: Tªn tr­êng lµ CHUCVU, cã kiÓu DL Text, ®é réng lµ 20 (chøc vô ®¶ng, ®oµn thÓ, nh­: gi¸m ®èc, tr­ëng phßng, bÝ th­...). - BËc l­¬ng (hÖ sè l­¬ng, møc bËc l­¬ng): Cã kiÓu DL NUMBER, ®é réng lµ 8, tr­êng DL lµ BACLUONG - Khen th­ëng (n¨m khen th­ëng, néi dung khen th­ëng, cÊp quyÕt ®Þnh): Tªn tr­êng lµ KHENTHUONG, kiÓu DL lµ Text, ®é réng 30. - Kû luËt (th¸ng, n¨m, h×nh thøc kû luËt, cÊp quyÕt ®Þnh): Tªn tr­êng KYLUAT, kiÓu d÷ liÖu lµ Text, ®é réng. 1.T§NN. MDB (tr×nh ®é ngo¹i ng÷). Do sè ngo¹i ng÷ h¹n chÕ nªn ta dïng ®é réng cña tr­êng nµy lµ 2 vµ nã cã thÓ l­u tr÷ tèi ®a lµ 100 tªn ngo¹i ng÷ kh¸c nhau, tªn tr­êng ngo¹i ng÷ nh­: tiÕng Anh, tiÕng Ph¸p, tiÕng §øc, tiÕng Trung Quèc... vµ tr­êng nµy cã ®é réng lµ 15. STT Tªn tr­êng KiÓu DL §é réng Null Gi¶i thÝch 1 MaNN Text 2 No M· ngo¹i ng÷ 2 T§NN Text 15 No Tªn ngo¹i ng÷ 3 GC Text 255 yes Ghi chó 2.T§HV.MDB (Tr×nh ®é häc vÊn) T­¬ng tù nh­ File T§NN.MDB, ta còng thiÕt kÕ File CSDL nµy cã hai tr­êng. STT Tªn tr­êng KiÓu DL §é réng Gi¶i thÝch 1 MaHV Text 2 M· häc vÊn 2 T§HV Text 15 B»ng cÊp m· CB ®¹t ®­îc 3 GC Text 255 Ghi chó 3.CHUCVU.MDB (Chøc vô). File nµy chøa danh s¸ch c¸c chøc vô t­¬ng ®­¬ng cña CB, gåm cã gi¸ trÞ nh­: Gi¸m ®èc, phã gi¸m ®èc, tr­ëng, phã phßng, c¸n bé, cã 2 tr­êng lµ: M· vµ tªn chøc vô kiÓu DL lµ Text, ®é réng lµ 20. STT Tªn tr­êng KiÓu DL §é réng Gi¶i thÝch 1 MaCV Text 2 M· chøc vô 2 CHUCVU Text 20 Chøc vô 3 GC Text 255 Ghi chó 4.PHONG.MDB (Phßng). File nµy gåm danh s¸ch c¸c phßng trong c¬ quan gåm m· nh©n viªn vµ tªn phßng, cã 2 tr­êng, m· cã ®é réng lµ 2 phßng cã ®é réng lµ 40, cã kiÓu DL lµ Text. STT Tªn tr­êng KiÓu DL §é réng Gi¶i thÝch 1 MaP Text 2 M· phßng 2 PHONG Text 40 Tªn phßng 3 GC Text 255 Ghi chó 5.DT.MDB (D©n téc) T­¬ng tù nh­ File T§NN.MDB, ta còng thiÕt kÕ File CSDL nµy cã hai tr­êng. STT Tªn tr­êng KiÓu DL §é réng Gi¶i thÝch 1 MaDT Text 2 M· d©n téc 2 TDT Text 15 Tªn d©n téc 3 GC Text 255 Ghi chó 6.CT.MDB (ChÝnh trÞ) T­¬ng tù nh­ File T§NN.MDB, ta còng thiÕt kÕ File CSDL nµy cã hai tr­êng. STT Tªn tr­êng KiÓu DL §é réng Gi¶i thÝch 1 MaCT Text 2 M· chÝnh trÞ 2 TCT Text 30 Tªn chÝnh trÞ 3 GC Text 255 Ghi chó 7.HOSOCB.MDB ( Hå s¬ c¸n bé). File HOSOCB (Hå s¬ c¸n bé) lµ File chÝnh cña hÖ thèng qu¶n lý CB, trong hå s¬ chóng ta l­u tr÷ tÊt c¶ c¸c th«ng tin liªn quan ®Õn CB. Do ®ã nã kh¸ lín vµ cång kÒnh nªn ta ph¶i l­îc bít sao cho th«ng tinh l­u tr÷ võa ®ñ nh­ng kh«ng thiÕu vµ c¸c th«ng tin ph¶i ®­îc chuÈn ho¸ hay ®­îc thay thÕ b»ng c¸c m· ®Ó cho DL cµng gän nhÑ. STT Tªn tr­êng KiÓu DL §é réng Gi¶i thÝch 1 Manv Text 10 M· nh©n viªn 2 TenPB Text 20 Tªn phßng ban 3 MaCV Text 2 M· Chøc vô 4 Hoten Text 30 Hä tªn 5 Ngaysinh Date 10 Ngµy sinh 6 Noisinh Text 30 N¬I sinh 7 Quequan Text 30 Quª qu¸n 8 Gioitinh Text 3 Giíi tÝnh 9 Noithuongtru Text 30 N¬I th­êng tró 10 §iachi Text 30 §Þa chØ liªn l¹c 11 Tel Text 10 §iÖn tho¹i 12 MaDT Text 2 M· D©n téc 13 MaTDHV Text 2 M· Tr×nh ®é häc vÊn 14 Tongiao Text 15 T«n gi¸o 15 So CMND Text 15 Sè chøng minh nh©n d©n 16 Ngaycap Date 10 Ngµy cÊp 17 Noicap Text 30 N¬i cÊp 18 Thanhphang® Text 10 Thµnh phÇn gia ®×nh 19 Trinhdoct Text 15 Tr×nh ®é chÝnh trÞ 20 MaNN Text 2 M· Tr×nh ®é ngo¹i ng÷ 21 Ngayvn Date 10 Ngµy vµo ngµnh 22 Ngayvao §CSVN Date 10 Ngµy vµo §¶ng CSVN 23 Chuvu Text 20 Chøc vô hiÖn t¹i 24 Bacluong Text 8 BËc l­¬ng 25 Khenthuong Text 30 Khen th­ëng 26 Kyluat Text 20 Kû luËt 27 Namnghih­u Text 10 N¨m nghØ h­u 28 MaCT Text 2 M· ChÝnh trÞ 3.2. BiÓu ®å thùc thÓ liªn kÕt 3.4. ThiÕt kÕ modul ch­¬ng tr×nh Ch­¬ng tr×nh qu¶n lý c¸n bé bao gåm nhiÒu chøc n¨ng riªng biÖt nh­ ®· ®­îc m­u t¶ trong biÓu ®å chøc n¨ng cña hÖ thèng, nh­ vËy khi thiÕt kÕ ch­¬ng tr×nh qu¶n lý c¸n bé ta thiÕt kÕ tõng modul cho mçi chøc n¨ng t­¬ng øng, nh­ vËy khi ch­¬ng tr×nh lçi sÏ dÔ ph¸t hiÖn vµ söa ch÷a, mçi modul chÝnh ta l¹i chia tiÕp thµnh modul con, cø nh­ vËy cho ®Õn khi kh«ng chia ®­îc n÷a th× dõng. Ch­¬ng 4 ph©n tÝch vµ thiÕt kÕ HÖ thèng I. Môc ®Ých Ph©n tÝch lµ c«ng viÖc ®Çu tiªn kh«ng thÓ thiÕu ®­îc trong qu¸ tr×nh x©y dùng hÖ qu¶n trÞ trªn m¸y tÝnh. Kh«ng thÓ ®­a tin häc hãa trong vÊn ®Ò qu¶n lý mµ kh«ng qua giai ®o¹n ph©n tÝch. HiÖu qu¶ ®em l¹i cña hÖ thèng phô thuéc vµo ®é n«ng s©u cña kÕt qu¶ ph©n tÝch ban ®Çu Môc ®Ých cña nã lµ x¸c ®Þnh xem bé phËn nµo cña hÖ thèng nªn xö lý b»ng m¸y tÝnh, vµ bé phËn nµo ®ã con ng­êi thùc hiÖn. Tæng quan vÒ c¸c c«ng t¸c qu¶n lý ë trªn, ta thÊy r»ng ch­¬ng tr×nh qu¶n lý nh©n sù khi ch­a sö dông m¸y tÝnh, c¸c c«ng cô nh­ thªm nh©n viªn, thªm nh©n viªn… ®Òu do con ng­êi lµm, nªn viÖc nhËp thªm, l­u tr÷ vµ t×m kiÕm rÊt khã kh¨n v× sè l­îng TÝnh to¸n rÊt lín. S¬ ®å chøc n¨ng cña hÖ thèng qu¶n lý c¸n bé Qu¶n lý CB CËp nhËt Tra cøu B¸o c¸o Hå s¬ Hä vµ tªn Danh s¸ch CB phßng Danh môc phßng ban Chøc vô Danh s¸ch CB lªn l­¬ng Danh môc chøc vô Tra cøu theo yªu cÇu Danh s¸ch CB nghØ h­u In CB chuyÓn CT Danh môc tr×nh ®é Thay ®æi nh©n sù Tho¸t II. S¬ ®å luång d÷ liÖu §Ó x¸c ®Þnh ®­îc yªu cÇu cña c«ng viÖc th× ng­êi ta ph¶i ph©n tÝch s¬ ®å luång d÷ liÖu, s¬ ®å luång d÷ liÖu nªu ra mét m« h×nh vÒ hÖ thèng th«ng tin chuyÓn vËn qua c¸c qu¸ tr×nh hoÆc c¸c chøc n¨ng kh¸c nhau. §iÒu quan träng lµ ph¶i cã s½n c¸c th«ng tin vµo vµ biÕt ®­îc yªu cÇu cña th«ng tin ra tr­íc khi cho thùc hiÖn mét qu¸ tr×nh. C¸c thµnh phÇn cña biÓu ®å luång d÷ liÖu · C¸c chøc n¨ng xö lý: Lµ c¸c chøc n¨ng dïng ®Ó chØ ra mét chøc n¨ng hay mét qu¸ tr×nh. Chøc n¨ng quan träng trong m« h×nh luång d÷ liÖu lµ biÕn ®æi th«ng tin tõ ®Çu vµo theo mét c¸ch nµo ®ã. · T¸c nh©n ngoµi: Lµ mét ng­êi, mét nhãm ng­êi ë bªn ngoµi lÜnh vùc nghiªn cøu cña hÖ thèng, nh­ng cã trao ®æi th«ng tin vÒ hÖ thèng. · T¸c nh©n trong: Lµ mét chøc n¨ng hoÆc mét qu¸ tr×nh ë bªn trong hÖ thèng ®­îc m« t¶ ë trang kh¸c cña biÓu ®å, nh­ng cã trao ®æi th«ng tin víi hÖ thèng. · Luång d÷ liÖu: Lµ luång th«ng tin vµo ra cña mét qu¸ tr×nh hoÆc mét chøc n¨ng xö lý, mòi tªn chØ ra h­íng cña luång th«ng tin. · Kho d÷ liÖu: Lµ luång th«ng tin l­u tr÷ trong mét kho¶ng thêi gian ®Ó mét hoÆc nhiÒu chøc n¨ng truy nhËp vµo, chóng cã thÓ lµ c¸c tÖp d÷ liÖu ®­îc l­u trong m¸y tÝnh. 1. BiÓu ®å luång DL møc ng÷ c¶nh B¸o c¸o Ban tæ chøc CB TT thay ®æi NS HÖ thèng qu¶n lý c¸n bé T.tin tra cøu T.tin vÒ CB C¸n bé BiÓu ®å møc ng÷ c¶nh cho chóng ta thÊy c¸i nh×n kh¸i qu¸t cña hÖ thèng. §©y lµ giai ®o¹n ho¹ch ®Þnh ban ®Çu cña qu¸ tr×nh ph©n tÝch ®­îc dïng ®Ó v¹ch ph¹m vi ho¹t ®éng cña hÖ thèng, nã bao gåm c¸c thµnh phÇn nh­ sau: - T¸c nh©n ngoµi hÖ thèng. - HÖ thèng * T¸c nh©n ngoµi "C¸n bé" cña hÖ thèng nh©n sù, cung cÊp cho ta nh÷ng th«ng tin trong hå s¬ c¸n bé, th«ng tin nµy ®­îc cËp nhËt vµo hÖ thèng l­u tr÷ vµ xö lý DL. * T¸c nh©n ngoµi "Phßng tæ chøc" ®­a vµo nh÷ng th«ng tin yªu cÇu ®èi víi hÖ thèng nh­: in danh s¸ch nh÷ng c¸n bé, thèng kª nh÷ng c¸n bé cã ®é tuæi < 40, tr¶ l¹i nh÷ng thèng kª, b¸o c¸o theo yªu cÇu cña cÊp trªn. 2. BiÓu ®å luång DL chøc n¨ng cña hÖ thèng møc ®Ønh. Phßng tæ chøc C¸n bé 1. NhËp d÷ liÖu 3. B¸o c¸o Hå s¬ Thay ®æi nh©n sù B¸o c¸o Hå s¬ D÷ liÖu ®· xö lý 2. Tra cøu yªu cÇu TT sau tra cøu Cho ta thÊy ®­îc c¸c chøc n¨ng chÝnh cña hÖ thèng, gåm phÇn DL tra cøu, thèng kª theo ®Þnh kú. Chøc n¨ng nhËp DL lµm nhiÖm vô nhËp c¸c th«ng tin vÒ CB vµo File HOSOCB, cã kiÓm tra DL tr­íc khi nhËp vµ nhËp c¸c danh môc phô trî nh­: danh s¸ch phßng, ®¬n vÞ, chøc vô..., chøc n¨ng nµy rÊt quan träng v× DL cã chÝnh x¸c hay kh«ng, c¸ch l­u tr÷ th«ng tin cã khoa häc hay kh«ng ®Òu ¶nh h­ëng rÊt lín ®Õn qu¸ tr×nh khai th¸c th«ng tin sau nµy. Chøc n¨ng tra cøu: Dïng ®Ó phô cho viÖc tra cøu t×m kiÕm do l·nh ®¹o yªu cÇu. Th«ng tin phôc vô cho viÖc tra cøu gåm c¸c File CSDL mµ hÖ thèng ®ang l­u tr÷ mµ c¸c yªu cÇu mµ ng­êi sö dông ®­a vµo hÖ thèng.Chøc n¨ng nhËp danh s¸ch b¸o c¸o th«ng th­êng ®­îc chia lµm 2 lo¹i: lo¹i thø nhÊt lµ chÕ ®é thèng kª th­êng xuyªn cã thÓ bÊt cø lóc nµo mµ l·nh ®¹o yªu cÇu, lo¹i nµy th«ng tin th­êng phong phó v× cã sù kÕt hîp gi÷a th«ng tin l­u tr÷ vµ th«ng tin yªu cÇu. Lo¹i thø hai lµ thèng kª theo ®Þnh kú, th¸ng, quý, n¨m nã mang tÝnh æn ®Þnh. BiÓu ®å dßng d÷ liÖu møc 1 chøc n¨ng nhËp Ban tæ chøc c¸n bé Hå s¬ c¸n bé 1.1 NhËp, söa d÷ liÖu 1.2 danh môc chøc vô Danh môc Hå s¬ c¸n bé T.tin vÒ c¸n bé Yªu cÇu söa ®æi D÷ liÖu D÷ liÖu D÷ liÖu 1.3 danh môc PB D÷ liÖu T.tin T.tin 1.4 danh môc T§ D÷ liÖu T.tin S¬ ®å dßng d÷ liÖu møc 2 chøc n¨ng tra cøu Ban tæ chøc CB Tra cøu theo tªn Tra cøu theo yªu cÇu Hå s¬ Tr¶ lêi Tra cøu theo CV Tr¶ lêi Yªu cÇu Tr¶ lêi D÷ liÖu D÷ liÖu Yªu cÇu Yªu cÇu BiÓu ®å dßng d÷ liÖu møc 3 chøc n¨ng b¸o c¸o DS c¸n bé lªn l­¬ng DS c¸n bé ®¬n vÞ TK theo chøc vô In CB chuyÓn c.t¸c DS c¸n bé lªn l­¬ng DS c¸n bé cña ®¬n vÞ T. kª theo chøc vô In CB chuyÓn ®æi Phßng tæ chøc c¸n bé DL ®· qua xö lý DL ®· qua xö lý DL ®· qua xö lý Hå s¬ c¸n bé Yªu cÇu Yªu cÇu DL ®· qua xö lý Hå s¬ c¸n bé Hå s¬ c¸n bé Ch­¬ng V C¸c form chÝnh vµ code ch­¬ng tr×nh I . Mét sè form chÝnh cña ch­¬ng tr×nh 1. Form th«ng tin vÒ c¸ nh©n H×nh 2: Giao diÖn form-th«ng tin tõng c¸ nh©n 2. Form th«ng tin vÒ tr×nh ®é häc vÊn H×nh 3: Giao diÖn form-thèng kª vÒ tr×nh ®é häc vÊn 3. Form th«ng tin vÒ c¸n bé ®i häc H×nh 4: Giao diÖn form-danh s¸ch c¸n bé ®i häc 4 Form danh s¸ch c¸n bé lªn l­¬ng H×nh 5: Giao diÖn form-danh s¸ch c¸n bé lªn l­¬ng 5. Form danh s¸ch c¸n bé nghØ h­u H×nh 6: Giao diÖn form-danh s¸ch c¸n bé nghØ h­u II. Mét sè Code cña ch­¬ng tr×nh Option Explicit Dim nut As Integer Private Sub CboChucvu_GotFocus() CboChucvu.SelStart = 0 CboChucvu.SelLength = Len(CboChucvu.Text) End Sub Private Sub CboHovaten_Click(Area As Integer) AdoDihoc.Recordset.MoveFirst Do Until AdoDihoc.Recordset.EOF If AdoDihoc.Recordset.Fields(0).Value = CboHovaten.BoundText Then CboMahoso.Text = AdoDihoc.Recordset.Fields(0).Value TxtNgaysinh.Text = AdoDihoc.Recordset.Fields(2).Value CboPhong.Text = AdoDihoc.Recordset.Fields("Phßng").Value CboChucvu.Text = AdoDihoc.Recordset.Fields("Chøc vô").Value TxtKhenthuong.Text