新農(nóng)村信息化管理系統(tǒng)

杜欽生，朱 妍

(長春大學(xué) 計算機科學(xué)技術(shù)學(xué)院，長春 130022)

1 系統(tǒng)功能介紹

課題組對農(nóng)村進行認真調(diào)研，確立了所建系統(tǒng)的功能需求[1-2]。總體目標(biāo)是對村委會信息、村民信息、村務(wù)信息等進行信息化管理。系統(tǒng)功能圖，如圖1所示。

圖1 系統(tǒng)功能圖

1.1 村委會管理模塊

該模塊的主要功能包括對村委會成員管理信息、農(nóng)業(yè)補貼信息、村建設(shè)辦證的信息的增、刪、改、查。

1.1.1 村委會成員管理

用于記錄村委會的個人基本信息，統(tǒng)計村委會的成員信息，主要包括姓名、性別、籍貫等。

1.1.2 農(nóng)業(yè)補貼

用于統(tǒng)計村民的農(nóng)業(yè)補貼情況，便于對村民的生活情況進行監(jiān)督；還可以統(tǒng)計村民的其他補貼情況，有利于村委會對村民各方面補助的安排。

1.1.3 村建設(shè)辦證

用于記錄村建設(shè)的信息，統(tǒng)計村民的成員信息以及建設(shè)情況的信息，有利于對農(nóng)村進行規(guī)劃。

1.2 村民管理模塊

該模塊的主要功能包括對村民資料信息、耕作登記信息的增加、刪除、修改和查詢。

1.2.1 村民資料

可以對轄區(qū)內(nèi)的常住人口和暫住人口登記，并進行管理。

1.2.2 耕作登記

統(tǒng)計村民耕作的類型和面積等信息。

1.3 村務(wù)管理模塊

實現(xiàn)農(nóng)村日常綜合性事務(wù)的治理。

1.4 黨務(wù)管理模塊

對黨員個人和黨組織進行統(tǒng)一管理。

1.5 信息維護管理模塊

用于維護村、村委會成員、部門、黨員等信息資料。

2 系統(tǒng)設(shè)計

2.1 開發(fā)技術(shù)

我們以Visual Basic為開發(fā)工具、Access為后臺數(shù)據(jù)庫開發(fā)完成新農(nóng)村信息化管理系統(tǒng)。

2.2 數(shù)據(jù)庫設(shè)計

以村委會成員實體為例進行數(shù)據(jù)庫設(shè)計[3]。村委會成員E-R圖，如圖2所示。

圖2 村委會成員E-R圖

村委會成員的結(jié)構(gòu)如表1所示，其中允許空字段中的0表示關(guān)鍵字不允許空，1表示允許空。

表1 村委會成員表

下面簡要列出本系統(tǒng)中主要表的屬性信息：

(1)農(nóng)業(yè)補貼表：包括編號、姓名、水費、電費、住宿費、其他費用、總補貼、經(jīng)手人和補貼日期等。

(2)村建設(shè)辦證表：包括證件號、姓名、村民編號、時效、證件類型和辦證日期等。

(3)村民資料表：包括村民編號、姓名、貧富等級、登記日期和辦公電話等。

(4)耕作登記表：包括登記編號、姓名、耕作面積、耕作類型、登記日期、備注等。

(5)任務(wù)表：包括村民編號、姓名、部門編號、部門名稱、任務(wù)編號、任務(wù)名稱等。

本系統(tǒng)還有事務(wù)表、文件表、土地變更表、黨員信息表、發(fā)展黨員表、黨員變動表和用戶表等共13張表，它們的E-R圖和表結(jié)構(gòu)可以參照圖2和表1來完成。

2.3 系統(tǒng)功能實現(xiàn)

2.3.1 主界面

系統(tǒng)主界面如圖3所示。

圖3 系統(tǒng)主界面

系統(tǒng)的所有功能都通過下拉式菜單展現(xiàn)給了用戶。隨著用戶權(quán)限的不同，菜單可用的菜單項也隨之不同。當(dāng)不可用的菜單項變成灰色時，用戶將無權(quán)使用此菜單項的功能。系統(tǒng)維護模塊的主要功能是操作員的管理、密碼修改管理、權(quán)限管理。為了系統(tǒng)使用的安全性，系統(tǒng)用戶的賬號是管理員創(chuàng)建的，用戶可以更改初始密碼[4]。

2.3.2 村委會管理模塊設(shè)計

在村委會管理模塊中，村委會成員管理負責(zé)管理村委會成員信息；農(nóng)業(yè)補貼管理負責(zé)管理補貼金額信息；村建設(shè)辦證管理負責(zé)管理證件信息[5]。

(1)村委會成員管理。管理人員登錄系統(tǒng)后，單擊【村委會管理】|【村委會成員管理】命令，彈出【村委會成員管理】界面，如圖4所示。

圖4 村委會成員管理主界面

村委會成員信息的添加、修改、刪除、查詢等功能的核心實現(xiàn)代碼[6]，如下所示：

①添加成員檔案。

If flag = 1 Then

sql1 = "select * from村委會成員表 where 編號='" & Text1(0).Text & "'or 姓名='" & Text1(1).Text & "'"

Set rs1 = TransactSQL(sql1)

If Not rs1.EOF Then

MsgBox ("您要添加的成員已經(jīng)存在！")

Exit Sub

End I

sql2 = "insert into村委會成員表 values('" & Text1(0).Text & "','" & Text1(1).Text & "','" & Combo1(0).Text & "','" & Text1(2).Text & "','" & Text1(3).Text & "','" & Combo1(1).Text & "','" & Combo1(2).Text & "','" & Combo1(3).Text & "','" & Combo1(4).Text & "','" & Combo1(5).Text & "','" & Text1(4).Text & "','" & Text1(5).Text & "')"

Set rs1 = TransactSQL(sql2)

MsgBox ("成員信息添加成功！")

End If

②修改成員檔案。

If flag = 2 Then

sql2 = "update村委會成員表 set 姓名='" & Text1(1).Text & "',所在村名='" & Combo1(1).Text & "',所在小組='" & Combo1(2).Text & "',所在部門='" & Combo1(3).Text & "',所在職位='" & Combo1(4).Text & "' ,政治面貌='" & Combo1(5).Text & "' ,家庭住址='" & Text1(4).Text & "' ,備注='" & Text1(5).Text & "'where 編號='" & Text1(0).Text & "' "

Set rs1 = TransactSQL(sql2)

MsgBox ("成員信息修改成功！")

End If

③刪除成員檔案。

If Text1(0).Text <> "" Then

sql2 = " delete * from村委會成員表 where 編號='" & Text1(0).Text & "'"

Set rs1 = TransactSQL(sql2)

MsgBox ("成員信息刪除成功！")

Else

MsgBox ("成員信息為空，無信息可刪除！")

End If

④查詢成員檔案。

sql2 = "select * from村委會成員表 where 編號='" & Text1(0).Text & "'"

Set rs1 = TransactSQL(sql2)

If rs1.EOF Then

MsgBox ("沒有您要找的成員的信息！")

Else

Text1(1).Text = rs1.Fields(1)

Text1(2).Text = rs1.Fields(3)

Combo1(0).Text = rs1.Fields(2)

Text1(3).Text = rs1.Fields(4)

Combo1(1).Text = rs1.Fields(5)

Combo1(2).Text = rs1.Fields(6)

Combo1(3).Text = rs1.Fields(7)

Combo1(4).Text = rs1.Fields(8)

Combo1(5).Text = rs1.Fields(9)

Text1(4).Text = rs1.Fields(10)

Text1(5).Text = rs1.Fields(11)

Set DataGrid1.DataSource = rs1

End If

(2)農(nóng)業(yè)補貼。管理人員登錄系統(tǒng)后，單擊【村委會管理】|【農(nóng)業(yè)補貼】命令，彈出【農(nóng)業(yè)補貼】界面，如圖5所示。

圖5 農(nóng)業(yè)補貼主界面

2.3.3 其他子模塊設(shè)計

村民管理子模塊、村務(wù)管理子模塊、黨務(wù)管理子模塊與村委會管理子模塊的設(shè)計大致相同，這里不再介紹。

3 結(jié)語

新農(nóng)村信息化管理系統(tǒng)基本上滿足了農(nóng)村管理的需求，界面友好、靈活、實用、安全，與預(yù)期相符，提高了農(nóng)村的工作效率。